I need to get rid of the option to DELETE a sheet. However, when I password protect the WORKBOOK (which does this fine) none of the Macro buttons will execute, even with Macro security settings set to ENABLE ALL.
Looks like I will need some VBA code to not allow any of the sheets in the workbook to be deleted.
I know excel has a built in function for this. But it won't do what I need for this below.
Say, I have 9 worksheets open. In cell N7 on sheet 1 I need it to count the worksheet tabs. But the dilema is to only count the tabs that will equal sheet 1, sheet 2, sheet 3, sheet 4, sheet 5, Notice, I have a space before the number. Other sheets have a specific names to them which I do not want to count.
So if sheets 1 thru 3 are visible with the other named sheets visible cell N7 will count 3
My wife and I run an apartment complex with 2 employees, a manager and a maintenance man.
We use excel to produce a paystub for these employees twice a month.
There are a number of variables including incentives for renting apartments, overtime, variable hours in a pay period etc.
We have a separate spreadsheet for each employee and a separate sheet tab for each pay period named for the pay date... e.g. the first paystub had one sheet named "Jan 15"... the next pay period the paystub had 2 sheets: "Jan 31" and "Jan 15". The third paystub had 3 sheets and so on.
The paystubs have a column with the numbers for the pay period and then a column with the year to date sum (for straight pay, over time, federal withholding, social security, medicare, state withholding, etc.)
Right now I edit the formulas for all these sums for each payperiod. e.g. =sum('Feb 15':'Jan 15'!B35) for the third pay period is editted to =sum('Feb 28':'Jan 15'!B35) for the fourth pay period.
I would like to be able to just copy the prior spreadsheet and not have to find and replace values in 11 spreadsheet cells for each pay period.
I have figured out how to get the name of the current spreadsheet to appear in a cell on that sheet using VBA... but not how to get that cell content to be part of the arguments for =sum(. on the formula bar...
I am pulling my hair out trying to figure this out. Any help at all is greatly appreciated. I created a spreadsheet for a friend to track his profit/loss for his business; he is not very computer literate so I created separate tabs for each month. I have no idea what he did but the horizontal scroll bar and all of the tabs are not visible, he is using excel 2000 on windows XP. Unfortunately we are not in the same area so I canít go look at his screen. When he emailed the file back to me and I opened it, it looks fine. Also when he opens any other file it does the same thing. I have gone through all of the obvious causes, everything is correct in the tools, options.
I am using the following codes to hide the menu, formula bar and the headings. One more thing I need to do but do not know how - hiding the tabs at the bottom of the sheet. The idea is not to let users to right click and unhide other sheets.
'Hide main menu Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)" 'Hide headings ActiveWindow.DisplayHeadings = False 'Hide formula bar Application.DisplayFormulaBar = False
I have a file that will have a maximum of about 25 tabs in it. They are all the same format - Column A have account codes, Column B have the account name and Column C through to Column AD have figures. Column B has a drop down menu, so not all tabs will have the same account code on the same row.
I thought that I would create another spreadsheet in the file and call it a master sheet with the same formats as all the other tabs but this master file will have all of the account codes available and will not have a drop down menu in column B. What I wanted to do was consolidate all of the 25 tabs in the master sheet.
Example Worksheets TAB 1 Acc Code Desc Amount 1________a___10 2________b___10
I have a workbook with multiple tabs. On sheet one a person chooses a date to initialise a formula. That date is then copied to sheet two and placed in cell D5. The date is projected out for two weeks and then the next fornight starts on sheet three and so on. The start date for each new fortnight appears in cell D5 of each sheet. I want that information to be the name of the tab for sheet two, three etc. I have put this code into the "This Workbook" section:
Private Sub Worksheet_Change(ByVal Target As Range)
' Renames all worksheet tabs with each worksheet's cell A1 contents. 'If cell A1 has no content, then that tab is not renamed.
For i = 1 To Sheets.Count If Worksheets(i).Range("$D$4").Value "" Then Sheets(i).Name = Worksheets(i).Range("$D$4").Value End If Next End Sub
I have also tried:
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$D$4" Then ActiveSheet.Name = Left(Target.Value, 10) End Sub
I then go back into sheet one and change the date and nothing happens. I seem to be missing something. Can anyone please help?
This macro helps me create a blank worksheet and automatically names it from the list in column A. Unfortunately, it adds the worksheets to the left of my 'master' sheet called "Tab Names". When I try adding "after" when it adds a new sheet, I keep getting a "compile error: Expected: end of statement". I am positive you will know what steps I'm missing.
' Vendor List Subroutine to ' Open New Worksheet called Tab Names worksheet ' With data from Tab Names ' Rename sheet to name from list and start again ' For all names in list Sub NewTabsFromList() Dim cCell As Object, i As Integer 'Two variables cCell (current Cell) object and i (standard counting integer) Cells(1, "A").Select 'Ensure that we start each time at the top of the worksheet Application. ScreenUpdating = False 'Turn of screen updates whilst macro is running For Each cCell In Range(Cells(1, "A"), Cells(1, "A").End(xlDown)) 'Will run our code through each cell with text Set NewSheet = Sheets.Add(Type:=xlWorksheet) 'Add new worksheet NewSheet.Name = "Tab Names Worksheet" 'rename worksheet Sheets("Tab Names worksheet").Name = cCell.Value Next cCell End Sub
I know this is probably an easy one, but can anyone help, I have a spreadsheet with aboout 8 worksheet tabs, for some reason they have disappeared I have emailed the spreadsheet to my work email and everything is fine, does anyone out there know what I have done. I have checked the tools options and view tab as informed and the sheet tabs are definately checked, also I have ensured that the tabs are not hidden.
Basically I inherited a Excel Workbook which has 128 different tabs, unsurprising this is almost impossible to manage.
My requirement is to merge all of the 128 tabs into 1 tab 'Sheet1'. The macro should keep going even if there are blanks, it should move onto the next tab only when there are over 10 consecutive blanks in Column B.
I have tried searching the forum but nothing seems to cater for the specifics of this case. I would really appreciate some help. I mean really, i am in a mad panic thinking i will have to do 128 tabs manually otherwise.
my sheet tabs sometimes disappears when I open excel. I know you can go through the start button and the advanced option to display the sheet tabs. Is there code I can incorporate so that on the opening of the excel file after the splash screen runs its course, the sheet tabs are displayed.