wsheet

hi all, i am using a udf that uses vlookallsheets, the code below needs teaking, I would like to know how to add another sheet (Summary!) in this line, i dont know how its written [If wSheet.Name <> "master" Then], is it something like -- If wSheet.Name <> "master" and & or "summary"...

I'm using a VBA code (that I found and modified by lurking here, kudos!) to create a dynamic index that I then use 15 different Indirect formulas to populate cells with values that create a summary. Basically each cel from B2-P2 is populated with some variation of...

Good day all. I have a spreadsheet with 80 (and growing) tabs. When this file is distributed, I would like all tabs to be protected with a password. I have VBA which does this: Dim wSheet As Worksheet Dim Pwd As String Pwd = InputBox("Enter your password to...

Hello, I'm trying to create a macro to protect all sheets at the same time. Below is what I have been trying, but its not working. ANy ideas? Sub protectsheets() Dim wSheet As Worksheet For Each wSheet In ActiveWorkbook.Worksheets wSheet.Protect Password:="margin" Next wSheet End Sub Sub...

Hi, I hope someone can help, I have two spreadsheets which have loads of tabs on them and I created an index tab to help manage them, however, new tabs I have created don't seem to want to show up on the index tab. This is the vba code used in each of them, which appears to have worked fine up...

I have a button assigned to open up a UserForm with a text box. I sort of have it set up so that when you input the unprotect pword in to that text box, then it unprotects the sheet. However I have an issue that when the incorrect pword is entered it gives me a run time error. Can someone help...

Can anyone tell me why this is not working correctly? I can protect all the sheets but when I go to unprotect the sheets I get the error message? Sub protectsheets() Dim wsheet As Worksheet Dim Pwd As String Pwd = InputBox("Password:", "Protect Sheets") For Each wsheet In...

I have the following codes which creates an index I would like "back to Index" hyperlink not to be inserted on sheet Summary" Your assistance is most appreciated Private Sub Worksheet_Activate() Dim wSheet As Worksheet Dim M As Long M = 1 With Me .Columns(1).ClearContents...

Hi Experts, Here comes a new problem. With Excel 2019 for Mac, when you open a file, it doesn't display Customised Macro Buttons. The workaround is to change the zoom level and they all magically appear. So I wrote a code to change zoom level of all worksheets in one click. But it seems to...

Hello, I have the following code which i have to protect my workbook and allow filtering. Sub ProtectSheets() Dim wsheet As Worksheet For Each wsheet In ActiveWorkbook.Worksheets If wsheet.NAME <> "TB - EPM" And wsheet.NAME <> "ACT - GLORY" And wsheet.NAME <> "ACT - BARC" And wsheet.NAME <>...

Hi Everyone, Im hoping someone may be able to help me out. I have a large selection of excel files within folders that I need to process. Some files have protected worksheets and some don't I have the password required but Im trying to find a way that I can get a macro to go through all the...

in the workbook I created - there are several worksheets - I want to password protect/unprotect all sheets except for 2 named "dwg" and "usage" I used the following macro - it does it to all - how do I insert the exempted worksheet? Sub Sheets_Protect() Dim wSheet As Worksheet...

Hello, I want to have a list of all the worksheets in my workbook listed on another sheet. Right now I have; Sub SheetNames() Dim wsheet As Worksheet Set wsheet = Worksheets("Lists") With ws Columns(1).Insert For i = 1 To Sheets.Count Cells(i, 1) = Sheets(i).Name Next i End...

Sub clearsheets () Dim Wsheet As Worksheet For Each WSheet In Worksheets Select Case Wsheet.CodeName Case "Sheet1", "Sheet2","Sheet3" Case Else Wsheet.Range(Wsheet.Cells(7, 2), Wsheet.Cells (200, 15)).Select Selection.ClearContents End Select...

This code works but seems slow. Anyone got a cleaner way to do this? - Index Worksheet starts off blank. - When a new worksheet is added, the name of the new worksheet automatically appears on the Index worksheet in alphabetical order. - When a new worksheet is added, a link is automatically...

Hi there. I've been working on some code, that among other things, is to convert all content to values (i.e. formulas and references). This is designed to run against multiple files in a single folder, with some of the files rather complex. This is giving me some trouble, particularly with...