Visibility Of Cell A1 On All Worksheets When Macro Finished
How can I loop through all worksheets in a workbook and, not only select cell A1 in each worksheet at the end of a macro, but have the visibility of cell A1, no matter where you last clicked on the worksheets, such as a remote cell like BK244.
I would like the user to see the first row and further most left cell (cell A1) when they click any sheet in the workbook, because my macro causes several rows of data to be written, leaving the viewer to see something like row 244, instead of the top row which is where the titles are.
View Complete Thread with Replies
Sponsored Links:
Related Forum Messages:
To Return A Value- Whether It Is PLANNED, STARTED Or FINISHED
I have 4 columns: X, Y, Z, AA. X - Start month e.g. 1, 2, 3, etc Y - Start year e.g. 2006 Z - Finish month e.g. 1, 2, 3, etc AA - Finish year e.g. 2006 In column AK, I need to return a value, whether it is PLANNED, STARTED or FINISHED. PLANNED is if start date and completed date are both > than now() STARTED is if started >now() but completed date is > now() FINISHED is if completed date is < now() Issues: 1. Start date is computed using Y as year, and X as month and the day is assumed to be 1. Same princilple for the finished date. 2. Column X, Y, Z, AA can be blank. If month (X and/or Z) is blank but year is not, then date is beginning of the year. If either start year is blank but finish year is not, then status should be based on the finish year and vice versa. 3. If both year (Y and Z) are blank, then status should be "NOT SPECIFIED".
View Replies!
View Related
Transferring(Transposing) Data To A Finished Sheet
I am trying to find an automatic way to create a finished report format that draws information from a different sheet within the same workbook. The trouble I'm running into is: The raw data consists of some lines without any data, and some lines with data. The purpose of the final report is to display only those rows with data in them. I have a sample spreadsheet attached, with the first sheet containing raw data, and the second containing a rough Idea of what I'd like the final infomation to look like. Somehow this seems like it should be really simple, maybe doable with an if statement, but I can't figure out how to get it to just ignore the empty rows without skipping a row in the final doc.
View Replies!
View Related
Ensuring Visibility Of Text
I created an automation process where worksheets are generated. But after the sheets are generated I noticed that one of the company names is missing from the list. As I am watching the worksheets generate I can see the name quickly printing on the screen. When I use a message box to validate the data entry, the name does appear. After all is generated, the name is still missing. Does anyone know what this could be? Could it be a software malfunction?
View Replies!
View Related
Hide Toolbars & Restore Visibility
I have a procedure that stores the Commandbar names and visibility settings in an array on open. Another procedure hides all Commandbars on open and restores their original visibility settings on close. For some reason the "Standard" and " Formatting" toolbars don't return to visible on close. My error log says "08/13/07 18:21:37 [QA.xls]MCommandBars.bRemoveMenus(), Error -2147467259: Method 'Visible' of object 'CommandBar' failed". I have tried manually testing the hide/unhide procedure with hard coded settings and checked the correct variables are being sent and all seems to be correct. I am pretty confident that the procedure to store settings is correct but have included the code just in case, also just noticed the "Standard" and "Formatting" toolbars are the only two visible at programme start. Public gsaMenus() As String Public Function bMenuSettings() As Boolean Const sSOURCE As String = "bMenuSettings()" Dim bReturn As Boolean Dim iCounter As Integer Dim cbrMenu As office.CommandBar
View Replies!
View Related
Set Control Visibility Based On Tag Property
I have a userform which uses the tag property of the frame to determine whether a frame is visible (and hence the controls that reside within the frame). A frame contains three combo boxes, and six text boxes. The tag property of the frame matches the number of frames that are visible on the form, so that if the user selects five frames, frames 1 through five become visible and for all other frames visible = false. A frame contains all the data for a single entry. There can be up to fifty frames/ entries that are visible on the form depending on the user selection. I want to use the visibility property to do two things: first the combo boxes are filled from an array after the user selects the number of frames (or entries). I only want to fill the comboboxes where the frame is visible. The second thing is that I have a function which uses the data from the text boxes and combo boxes as required arguments. Since these are required arguments, I will get a data mismatch error if I try to call it and the controls are empty. Therefore, I only want to call the function if the frame which houses the controls is visible. Public Sub Visible1(Entry As String) Dim ctrl As Control For Each ctrl In UserForm2.Controls If TypeName(ctrl) = "Frame" And ctrl.Tag <= Entry Then With ctrl .Visible = True End With Else If TypeName(ctrl) = "Frame" And ctrl.Tag > Entry Then With ctrl .Visible = False.............
View Replies!
View Related
Embed Picture Into Worksheet & Toggle Visibility
I am trying to embed a picture into a worksheet, hide the picture, then call it up later when a macro runs. I know how to insert a picure using a macro, but I want to embed the picture so that I can take the file with me that includes the picture and be able to call the picuture in my macro. Right now, the picture is on my hard drive and the picture will not load if I take the file to a different computer and run the macro.
View Replies!
View Related
Toggle Shape Visibility On Different Sheet Than Event Code
I have found that this only works on the sheet being viewed, how can I make it work on a different sheet than the one that I am on? Option Explicit Private Sub Worksheet_Calculate() If Range("C1").Value = "5" Then ActiveSheet.Shapes("rectangle 1").Visible = True Else ActiveSheet.Shapes("rectangle 1").Visible = False End If End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range)
View Replies!
View Related
Macro: Switch Between The Two Worksheets
If I have an excel workbook open and then, select the side-by-side option to open another workbook, and I want to write a macro that will switch between the two - how can I do this? The problem is, I don't want it to switch by file names (one workbook constantly changes names), I just want it to switch between active workbook and inactive workbook. Once I have the code to switch between active workbook and inactive workbook, how can I have my macro look at a cell and see if data is present and if so, drop down to the cell below. Windows("Job Number Request form.xls").Activate Range("C9").Select Selection.Copy Windows("Backup Copy of 2007 Capex Job Log.xls").Activate Range("E570").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False
View Replies!
View Related
Macro: Selecting All Worksheets
I am currently working on a simple macro to help with formatting a spreadsheet. The number of tabs on the spreadsheet will change to reflect the number of companies I'm running reports for. But the same process is to be applied to each tab. The issue I'm facing is I don't know the appropriate code to select all tabs without specifically referencing them. The code that I would like to apply to all tabs is as follows: ActiveSheet.PageSetup.PrintArea = "$A$1:$J$85" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = "" .RightHeader = "" .LeftFooter = "" .CenterFooter = "" .RightFooter = ""
View Replies!
View Related
Apply Macro To All Worksheets
I need to run the below code on all work sheets: Sub Remove_Duplicate() On Error Resume Next Columns("a").Insert With Range("b1", Range("b" & Rows.Count).End(xlUp)).Offset(, -1) .Formula = "=If(CountIf(B$1:B1,B1)=1,"""",False)" .SpecialCells(-4123, 4).EntireRow.Delete End With Columns("a").Delete End Sub Basically I have lots of worksheets and I want to remove the duplicates in column B for each work sheet with a duplicate entry...
View Replies!
View Related
Macro: Hide Worksheets
I have an Excel spreadsheet from which I run a macro to open another workbook. This other workbook has multiple worksheets. The problem I have is that I never know which worksheet was left active whenever it was last saved. How do I revise my macro to open this workbook and make a specific worksheet active and hide all other worksheets?
View Replies!
View Related
Macro To Search All Worksheets
I've been writing a little macro to prompt a user with a form which lets them select 2 reports to open and also lets them select a month. One report contains financial data for the month and the other report contains all data for the year. So each month someone has to copy data from report 1 into report 2. I have so far been able to: -create form with error handling to open files - select values from a pivot table in report 1 - search pivot table 1 (single sheet) and copy the Name and Total $ fields what i haven't been able to do: When i get the data from report 1 I switch to report 2. When i get to report to i need to search all the sheets in order to find a name with the original Name field from report 1 (I then have a HUGE case statement that will tell me if name = this and month = that then paste in cell $x$y). However, whenever i try to run my search across all sheets it will only find values on the sheet that is selected at the time. I've attached my search code below, I would appreciate any help i can get as I've spent all day trying to resolve it with no luck Function findinworkbook(TruncName) Dim ws As Worksheet On Error Resume Next For Each ws In ThisWorkbook.Sheets ' Find Function Cells.Find(What:=TruncName, After:=ActiveCell, LookIn:=xlFormulas, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False, SearchFormat:=False).Activate ActiveCell.ClearComments ActiveCell.AddComment ActiveCell.Comment.Text Text:="test" 'test to mark where the matched cells are On Error Goto 0 Next End Function
View Replies!
View Related
Macro To Get Comments From All Worksheets
I am trying to find out if it is possible to do the following I have an excel workbook with comments in a number of worksheets. I have created a macro so I can list the comments and the value of the cells with comments. The macro creates a new worksheet and list the comments and value this great but I can only get it to create the comments from the sheet which is active. Is there a way of getting all the comment and cell value from all the worksheet (the entire workbook) this is the code for the macro Sub shoppinglist() Application. ScreenUpdating = False Dim commrange As Range Dim mycell As Range Dim curwks As Worksheet Dim newwks As Worksheet Dim i As Long Set curwks = ActiveSheet On Error Resume Next Set commrange = curwks.Cells _ .SpecialCells(xlCellTypeComments) On Error Goto 0 If commrange Is Nothing Then MsgBox "no comments found" Exit Sub End If ...
View Replies!
View Related
Macro To Hide/Unhide Worksheets
Develop a macro that will enable me to hide or unhide worksheets. Basically, I have a few worksheets in my workbook and I want to have a page at the front with two buttons. One for Unhide sheet and the other for Hide sheet. Once activated, I want it to give me a list of worksheets that I can click to hide or unhide (depending on the button i click).
View Replies!
View Related
Macro To Delete Hidden Worksheets
It would be great of I could delete all but one of the hidden worksheets. It would be perfect if I could tell the macro not to delete one of the hidden worksheets (called "Test O2 and CO2"), but if that is too difficult, then just one to delete all the hidden sheets would be fine.
View Replies!
View Related
Running A Macro On A List Of Worksheets
I have a workbook that contains a worksheet called CALC , in column A of this worksheet I have a list of other worksheets that I would like to run a macro on. Would it be possible to set up some code that would select the worksheet at the top of the list, perform a macro then select the next worksheet in the list and carry out the macro on that sheet until all worksheets that appear in the list have been updated.
View Replies!
View Related
Macro Changes Header/Footer To All Worksheets
I'm looking for a macro or VBA code that can copy the header/footer and apply them to other worksheets. I have found code to copy to all worksheets but I only want the next two worksheets to have the copied header/footer and not copy to all the worksheets. I have 6 worksheets the first 3 are schedules, the only thing that will be changed in the header/footer will be work periods. example 12/20/09-01/20/10, all other info will be the same. Is there another way to change the dates without having to open each one and manually changing the date.
View Replies!
View Related
Macro: Create & Name New Worksheets
I have a workbook that is tracking part-time faculty appointments. Names and appointment details are entered on the first worksheet ("Entry"). I have another worksheet that pulls data from Entry to generate a summary of the salary for each appointment. Right now, this worksheet is called "Template" that needs to be copied and renamed for each appointment entered. So, Entry could have up to 56 columns of data entered. There are nearly 100 rows of information for each entry (portrait-style for ease of printing). Columns A and B are information and will not have any entries. Column C is the starting point for the entry of appointments. Cell C5 will have the first appointment Name. What I want is to create a macro that will copy the Template worksheet as many times as there are names entered from C5 and beyond (D5, E5, F5, etc.) When it creates each new worksheet, I want it to rename the new worksheet with the contents of row 5. For example, if "Smith, J." (without the quotes) is entered in C5, I want a copy of the worksheet Template called Smith, J. The renaming of the sheet is important because I have a cell in Template that pulls the worksheet name, which is then referenced by cells in Template to pull the information pertaining to that appointment. What I have seen here on Mr.Excel is a macro to rename a worksheet based on a specified cell, and I've seen something that looks like it created new worksheets, but I haven't seen the two put together like I'm looking for. I am also not that adept at the VBA, so I haven't really been able to figure out how to cobble it together myself. To summarize: - I have two worksheets: Entry and Template - Names are entered into cells (C5, D5, E5, F5, etc.) on Entry - I need to copy Template as many times as Names are entered and rename each new copy with that Name (also, new sheets should be generated at the end (right) of the current list of worksheets) - The whole process can be activated by a button on Entry
View Replies!
View Related
Macro: Consolidate Data From 10 Worksheets To 1
I am trying to take a workbook with 10 worksheets and have the contents copied and pasted into a new worksheet without any extra blank rows onto a new spreadsheet. Does anyone know how to achieve this? The purpose is to copy the information off each of the 10 worksheets and be able to use the consolidated information for pivot tables. Important Facts: - Each worksheet starts with data in cell A7 and ends at BL7 - The number of rows on each worksheet is inconsistent (e.g. one sheet ends at row 12 another at row 101) - The columns have uniform titles and data below
View Replies!
View Related
Macro To Print Existing Worksheets
I'd like to create a macro that can access few existing worksheets from different workbooks and print them automatically when i press the button or select them. Tried userform and listbox that were suggested from other thread, but that didnt work quite well since I'm not quite understand the code behind it.
View Replies!
View Related
Macro To Copy Data To Various Worksheets
I need a macro to copy data to various worksheets, in sheet workings, header is row 5, i have list of a/c codes in Col A, i need the macro to do autofilter col a5, and do a custom filter that begins with the following criterias, i then need the macro to copy filtered data to various worksheets, each worksheet is in the order of criteria, so CITI will be copied to CITIBANK_INTERNATIONAL etc. Target range to copy data to various sheets is A7 Criteria Array("CITI", "CHES", "EXIG.AMPS20", "EXIG.COGN20", "BNPP", "ATOH", "ABNA", "BBHA", "BBHT", _ "BONY", "CITA", "JPMT", "NTCT", "STATE") Worksheets Array("CITIBANK_INTERNATIONAL", "CHESS_ASSET_REC", "LIFE_EXIGO", "NOMINEE_EXIGO", "INTL", "MC_AIMS_to_HIPORT", _ "SMP_REC", "SMP_REC", "SMP_REC", "SMP_REC", "SMP_REC", "SMP_REC", "NORTHERN_TRUST", "NOMURA")
View Replies!
View Related
Running Macro On All Worksheets In A Book
I have a macro that I would like to run on every worksheet in my book (over 100 sheets wide). As it takes about 20 secs to run on each sheet, and I don't want to click from sheet to sheet, how can I make it run on every sheet in the book? And no, they aren't named sequentially, either alphabetically or numerically. is there a function in Excel to return the number of sheets in a book?
View Replies!
View Related
Calculate Certain Cells On Two Different Worksheets Using VB Macro?
I have question on how to calculate the certain cells between 2 different worksheets based on the certain calculation parameters and the comparison result (the report) is put into the new worksheet on the same workbooks. 1) Worksheet1 contains: DEPTH, G1, C1, N1, D1, S1, SR1, MR1, DR1 2) Worksheet2 contains: DEPTH, G2, C2, N2, D2, S2, SR2, MR2, DR2 Expected result should be put in Worksheet3: DEPTH, G1, G2, calculation(G1 and G2), CI1, C2, calculation(C1 and C2), so on until the last columns. (find example on attached file "Test_Data.xls) What I have done is to create a template to be filled in by copy and paste DEPTH, G1, G2 on worksheet1, DEPTH, C1, C2 on worksheet2, so on (attached file "Template_QC.xls"). Then I create a calculation macro for each of those worksheets separately to calculate the difference and color them . The calculation macro that I used is as follows:
View Replies!
View Related
Macro - Copy/paste From Different Worksheets
I'd like to copy/paste from different spreadsheets. The place it will be pasted is specific. Sub Family1() Range("A2").Value Sheets("Black Market").Select Range("C3:C35").Copy Sheets("Profiles").Select Range("B2").PasteSpecial Sheets("Real Estate").Select Range("E3:E30").Copy Sheets("Profiles").PasteSpecial End Sub
View Replies!
View Related
Run Macro On Multiple Worksheets
I have a excel macro that I am trying to use with multiple worksheets within the same workbook. The code runs fine on "Sheet1". However, when I click on "Sheet2", and try running the code I get an error message because the data is trying to be placed on "Sheet1". Here is my Sub Organics() 'The code under this section setups up the columns and rows Range("B1:D1").Select With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext
View Replies!
View Related
Apply Macro To Multiple Worksheets
I have a workbook in which I have 31 sheets. I've also recorded a macro that works great when I run it on one sheet, but it comes up with an error when I try to run it on grouped worksheets. I searched Google, and a few articles I saw said that in order to run a macro on grouped sheets, you have to use loops. I don't know if this is true, but I don't know how to run loops anyway, so. I want to run the macro on 30 of the 31 sheets. I was going to put the code in, but when I did that my post didn't work, so I'm thinking there might be a limit on the length of a post.
View Replies!
View Related
Macro: Copy Certain Cells From All Worksheets
I have been at this for days and i can't quite get it right. I have multiple worksheets of clients all formatted the same. I need a Macro/VBA that will take from Each sheet onto a master sheet the Name of the Client(Cell I1 from the sheet) Under the name I need the text Authorization #: then the data(C3) Under that I need the text Dates of Service Expiration: then the data (D5) Then the text 90801 Balance: then the data from (C30) Then the text 90806 Balance: then the data from (F30) Then the text 90847 Balance: then the data from (I30) Then the text 90853 Balance: then the data from (L30) Then a couple Spaces then the same exact data from the next sheet...till all the work sheets are done.....
View Replies!
View Related
Macro To Combine Worksheets And Workbooks
I've got a macro that combines multiple worksheets and workbooks. Just a minor problem, the very last row of each worksheet is being deleted, and I can't seem to pinpoint the cause of the problem. 'This will copy data from all sheets of the selected workbooks 'To a sheet named 'Data' in the sheet in which the macro is run from Dim pasterow As String mainsheetname = ActiveWorkbook.Name MsgBox ("Please select spreadsheets to combine") filestoopen = Application. GetOpenFilename(MultiSelect:=True) responseval = MsgBox("Do you want to leave the combined spreadsheets open?", vbYesNo) Worksheets("Data").Select Range("A1").Select 'open workbooks For Each w In filestoopen...................
View Replies!
View Related
Run Event Macro On Two Worksheets
The macro below works great as a conditional format routine on the Input sheet of the workbook, however I would like it to run on the Data sheet as well, but with a different range (E3:CE117). Can this be done? Private Sub Worksheet_Calculate() Dim dcell As Range Dim icolour As Integer For Each dcell In Range("c15:g27") Select Case dcell.Value Case "GA" icolor = 43 Case "GAC" icolor = 4 Case "LA" icolor = 45.....................
View Replies!
View Related
Macro To Formats Five Worksheets In The Same File
I did this macro which formats five worksheets in the same file. I saved this macro as a PERSONAL.XLS file. Last night when i open new files to re-run this macro it was working fine excep one of the worksheets wasnt formatting properly....the macro on this sheet wasnt working for some reason. Then this morning when i opened new files and tried the macros again it wouldnt work at all. And there is no reacord of them I did five of them and they are all gone! I saved them so why did they disappear! I thought that when you saved a macro as a PERSONAL file that you could open new files and re-run that macro again and again????
View Replies!
View Related
Set Macro For All Worksheets (active Workbook)
Sub display_all_false() With Application .DisplayGridlines = False .DisplayHeadings = False .DisplayOutline = False .DisplayZeros = False .DisplayVerticalScrollBar = False .DisplayWorkbookTabs = False .DisplayFormulaBar = False .DisplayStatusBar = False .ShowWindowsInTaskbar = False .CommandBars("Standard").Visible = False .CommandBars("Formatting").Visible = False .CommandBars("Control Toolbox").Visible = False .CommandBars("Drawing").Visible = False End With End Sub But, when I run the code, seems there're run-time errors detected at these codes: .DisplayGridlines = False .DisplayHeadings = False .DisplayOutline = False .DisplayZeros = False .DisplayVerticalScrollBar = False .DisplayWorkbookTabs = False 1. Is there any way to correct these codes? 2. Does the bolded codes applied to ActiveWindow (Worksheet) only (eg. With ActiveWindow ...)? Can I change it to ActiveWorkbook (perhaps)? 3. Can the command menus (File Edit View Insert Format ...) be hidden also? 4. Does looping method for each worksheet
View Replies!
View Related
Run Formatting Macro On Multiple Worksheets
I am trying to apply a macro to evey worksheet. When I run it, it isn't moving on to other sheets. Instead, it starts from the beginning of the sheet i ran it on. Sub full_Format() Dim ws As Worksheet For Each ws In Worksheets Range("A1:D1").Select Range(Selection, Selection.SpecialCells(xlLastCell)).Select Selection.FormatConditions.Delete Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _ "=MOD(ROW(),2)=0" Selection.FormatConditions(1).Interior.ColorIndex = 15 Dim LastRow As Long Range("C1").Formula = "=VLOOKUP(RC[-2],'[Yahoo Industry List as of June 27, 2008.xlsx]Master Sheet'!R2C[-2]:R1048576C[1],4,FALSE)" LastRow = Range("B1:B" & Range("B1").End(xlDown).Row).Rows.Count Range("C1" & ":C" & LastRow).FillDown ....................................
View Replies!
View Related
1 Macro To Execute Multiple Macros On Different Worksheets
Is it possible to create 1 macro which will execute multiple macros on different sheets? I have approx. 12 macros that I can run in order, and I would like to create 1 button on the first sheet of the workbook to execute all 12 macros, which are contained on various other sheets. Is this possible? When I attempted to do this, the master macro ran an odd function on my first sheet.
View Replies!
View Related
Macro That Deletes All Cells In Column D Of All Worksheets
I need a Macro that deletes all cells in column D of all worksheets in a book that are equal to the word "Timeout" and to shift the cells to the right of the "Timeout" cells into the deleted cells but leaving all other rows where the word "Timeout" is not present. So in the case of Rows 2, 4, 6 and 8 containg the word "Timeout" in column D, I would like cells D2, D4, D6 and D8 deleted and the remaining cells shifted to the left but cells D1, D3, D5 and D7 left as they are. Here is an example line of data: 16:02:30LEXKRunningprocedure:125sth 16:32:30LEXKRunningTimeoutprocedure:X125sth 17:20:54LSXPRunningprocedure:oxford 17:56:48LSXPRunningprocedure:xoxford 18:48:24LEXKRunningprocedure:125sth 19:18:24LEXKRunningTimeoutprocedure:X125sth
View Replies!
View Related
Macro To Copy Worksheets Into Individual Workbooks
Have a workbook with approximately 25 worksheets in it. I want to copy/paste/value each worksheet and save it as it's own workbook. My code doesn't work, it hangs up on ws.copy every single time, on Excel 2007 and prior versions. Sub SaveWS() Dim wb As Workbook Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets ws.Copy Set wb = ActiveWorkbook wb.SaveAs "t:dir1expenses" & ws.Name & ".xls" wb.Close False Next ws End Sub
View Replies!
View Related
Macro To Extract Data From Multiple Worksheets
I have a spreadsheet containing a factory's operational data, with each machine in the factory being represented by its own worksheet. The sheets all have the same structure, with each line of data representing a shift (we have 12-hour continental shifts, so column A of all the pages has the date in an standard format, and column B has either "d" or "n", representing the shift). Various datat is documented on each machine on a shift-per-shift basis. What I need to do is figure out how to do a macro that extracts all of the lines on all of the machines' worksheets that pertain to a particular shift (for instance, all of the lines where column A read "14-Mar" and column B read "d"), and export the values of the entire row to another worksheet, creating a shift summary on one page. To do this, I would like to make the date and shift user-definable variables that appear at the top of what would become the summary sheet, and have a button that activated such a macro at the top of the page as well.
View Replies!
View Related
Macro To Automatically Transfer Text Between Worksheets
I'm looking to build a macro which will automatically transfer a line of text from one worksheet to another within the same workbook. Once the macro has been run, the text in the original sheet should disappear and re-appear in the other worksheet. It should appear in the same column, but different line from the original.
View Replies!
View Related
Create Macro To Rename Worksheets In Other Folders
I have created an appointment schedule spreadsheet. Once I get the spreadsheet running smoothly, I would like to create a worksheet for every day of the year that we are open. I have decided to have one main folder with 26 subfolders in it. In each of those 26 subfolders, there will be one workbook with 12 worksheets in it. That will be two weeks worth of appointments as we are open Mon-Sat. Of course I want to name the worksheet tabs at the bottom of the workbook according to the appropriate calendar date. Then there is also a cell at the top of each page that also has the date, the same as the date on the tab. Just wondering if there is a simple way to create a macro to rename all these worksheet tabs, or if I have to physically open up each workbook, and rename all the worksheet tabs according to the calendar date. Then once the worksheet tab is named, can you make it automatically put the same date into Cell A1?
View Replies!
View Related
|
TRACKER
