Formula To Put Name Of Worksheet Into A Cell While Worksheets Are Grouped
Aug 5, 2006
The formula in cell A1 of the attached inserts the worksheet name, but it doesn't work when pasted to a group of worksheets. The formula doesn't change from sheet to sheet, yet the results refer to the workheet name where the "paste" was originally done. Does anyone know of a similar formula that would work right when applied once across a group of worksheets?
I have a protected worksheet which enables only certain sections to be edited, data inputs etc. I also have a set of rows grouped which need to be activated depending on data type for particular projects to be captured. Problem is, when the sheet is protected, when users click on the + and - buttons to either ungroup and group the rows depending on type of project, this feature is disabled.
I get a popup alert that tells me "You cannot use this command on a protected worksheet. To use this command you must first unprotect the sheet ....". Problem is I don't want all users to have access as giving them the password defeats my purpose of protecting the sheet.
I have sheets with over 40000 rows. I grouped them in 60 and I need the average for every group on the 61st (which is blank). For example, when collapsed I have visible the following blank cells:
A61 A122 A183 A244 and so on.
What I want is to enter a formula in A61 for the average of A1:A60 then drag down and have the correct values in all the rest (average of A62:A121 in A122, etc.).
I am trying to quickly transfer all worksheets in a directory into one worksheet listing all worksheet names in the tabs in number order.
The formula have so far is below. But it does not name the individual tabs as the worksheet names in no order.
Sub GetSheets () Path = "Y: Filename = Dir(Path & "*.xls") Do While filename "" Workbooks.Open Filename:=Path & Filename, ReadOnly:=True Sheet.Copy After:=ThisWorkbook.Sheets (1) Next Sheet Workbooks (Filename) . Close Filename = Dir () Loop End Sub
The worksheets appear as follows 1982-001, 1982-003 up to 1982-250 ( I want them in single workbook but as multiple tabs in number order)
I wanted to know if there is any way possible to get vba to insert a formula in a cell to each worksheet in each workbook in a folder and then using loop to extract all the info from each worksheet of each workbook in same folder into a master workbook?
However, each weeks data is "Grouped" and therefore the .end(xldown) only takes me to the bottom of the visible rows, and the offset function selects one of the hidden cells.
i need to find a way to search for numbers in a cell that are attached at the end of a group of letters. ex. (xxxxxxxxx01-01-001). i want to search backwards in the cell going right to left. what i need to do is once i find the numbers i need to go to the last number ex. (......x01-.....) and in front of it place a space ex. (......x 01-.......). right now i havent come up with a formula that can do this.
I have a table that lists names, eligibility and # of people. That is just one worksheet. I have a total of 30 worksheets in that workbook. The column with the names is completely filled out. I entered a number in the eligibility and # of people columns and Excel copied all three cells (name, eligibility and # of people) to the same cells on all of the worksheets. I have no formula in any of the cells, nor do I have anything linked.
I have got a macro (from Mr Excel's MVP) that hide certain cells according to assigned cell value What I need is: to hide certain ranges in different worksheets according to the assigned cell value in the first worksheet
if sheets1.cell A1= "hi" then range (" goooo") in sheet 1.hide range ("deeeee")in sheet 2 .hide range ("faaaaa") in sheet 3.hide the macro I had is : ==================================== ==================================== Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then If Target.Value = "hi" Then Worksheets("Sheet1").Rows(2).Hidden = True Else Worksheets("Sheet1").Rows(2).Hidden = False End If End If End Sub
I am developing a Workbook where I import data to one worksheet and then disseminate it to other worksheets. I am not sure if I am overthinking the process, but I am having difficulty writing the macro and getting it to run through the entire list of rows.
There are 4 Columns in the one worksheet, named "Update": Column A supplies the name of the worksheet that will be updated Columns B-D contain the data that will update the sheets.
The process that I am trying to write the macro for is a follows: 1. Select/copy the range, starting with B1:D1 on "Update" 2. Navigate to the appropriate worksheet to be update, determined by A1 3. Identify the first blank row, starting with A5 4. Paste the data B1:D1 to A5:C5 (or next available line) 5. Navigate back to "Update" and begin the process again with the next row B2:D2
This process should continue until there is no value in Column B on the "Update" worksheet.
I have a formula to extract the worksheet name and add the "!" to it so it can be used in a copied formula... I'm just having trouble writing the formula to reference the text in the cell with the worksheet name. If it's easier, I also have the list of worksheets without the "!" - e.g., Sheet1, Sheet2, Sheet3, etc...
I want the formula to calculate, in my example, the sum of 2 cells on a different worksheet.
I am trying to use the Indirect function to use the value in a cell to select a sheet with the same name as the value of said cell. I have looked at several posts and attempted multiple methods. I still get an error. I cannot find a thread describing exactly what I am trying to do, which is:
reference a cell value to direct the formula to the correct sheet to then complete an array Sumproduct formula.
Since this description barely makes sense to me reading it, I have attached an example. The problem is in cell C7. Basically, I want cell c7 to look at cell c1 and then go to the tab with the matching name as cell c1 and complete the calcuation.
One of my macros is a tied to a worksheet_change. The macro runs and gives me the result that i want, however excel flips to the sheet that the sub is running for.
example:
Sheet1, Change the cell excel flips the visible to sheet2 macro runs
Its kinda of annoying. I would like excel to stay on sheet1 where i am trying to finish data entry. I suspect it is how i have writen the macro. Any help at all on how to clean it up.. or a better way to write the same thing would be very appreciated.
Sub TermPlacement()
' Term_Placement Macro ' Uses the Value of Term to insert a formula repeatedly in a colum.
Dim sNFormula As String Dim rTerm As Range Dim rStart_Cell As Range Dim rNpayment As Range
'The reference cell located directly above the first cell in column Set rStart_Cell = Worksheets("Floor Plan").Range("$B$13") 'Additional set values....................
I have aprox 700 groups of cells "I selected a set of cells and named them". these groups cover 3500 rows. There sizes very in the number of rows per group but, all have the same number of columns.
What I'm tring to do is create a summary sheet. I want to copy all groups that have meet a single criteria to another sheet. The criteria will always be in the same column. The criteria is part of a function and will change each time I import new data into my excel sheet. Am I even close by trying to group them like this?
Is it possible to link a cell e.g. A10 that has a time value in it (there is a formula in this cell that puts in the time value) to another cell in a range of cells e.g. B1:B1000 that has the same time value?
The content of cell "animal!A1" will change according to a simple vlookup table. Let's say the value can be "dog", "cat", or "horse". In cell "animal!A5", I want to duplicate the content either "dog!A5", "cat!A5", or "horse!A5", depending on the current value of "animal!A1".
I've tried to do a simple reference like:
="A1"!A5
or
=A1!A5
wanting the A1 to actually read either dog, cat, or horse so the reference would refer to the worksheet of the same names. This doesn't work, so I need to know if there is a way to do this.
I'm working on a spreadsheet to track student test scores over the course of the school year. Each score set is grouped by student, but we need to be able to realphabetize when new students are added. is there some way to accomplish this?
I have a few pages of information and have grouped rows collapsed to show only the summary information. When I try to print only visible summary rows, whether I use print, print selection, copy and paste to another sheet or copy and "paste special" values to another sheet, all the hidden/grouped rows print or the summary rows print separately on different pages. Is it possible to print only the summary rows.
I have a spreadsheet with one column for each day. I've grouped the days into months and now I would like to minimize (minimize each month) Is it possible to close all, without having to select each group?
I have a bunch (between 5-10) textboxes grouped together into one object.
When I click one of them, I want its value to be written to a cell on the active worksheet. In other words, simply would like to read the value of one of the textboxes in the group. This sounds trivial, but at this point, I haven't been able to find the correct syntax to access this property. It seems that the fact that they are grouped hides access to their text? I am using Excel 2003.
I have managed to code a workaround, but its performance is atrocious (involves shaperanges, ungrouping, etc..)
I have a spreadsheet where columns belonging to the same topic are grouped together. For every group I want to calculate the sum of numbers in a row. How can I get all the columns belonging to a group?
I want the formula to "see" the sheet name as whatever is in a specific cell.
E.g. Cell B4 says "Type 2". The formula will be:
=IFERROR(INDEX('[WHATEVER NAME IS IN B4]'!$E$5:$F$11,MATCH($C$4,'[WHATEVER NAME IS IN B4]'!$C$5:$C$11,0),MATCH($D$4,'[WHATEVER NAME IS IN B4]'!$E$4:$F$4,0)),"")
I am trying to apply named cell from another worksheet to existing formula.
For example I have a formula in sheet2 which looks like =sheet1!A1+sheet1!B1. I then subsequently name sheet1!A1 = Jan and sheet1!B1 = Feb. Thinking that if I apply these names the formula in sheet2 would look like =Jan+Feb. However I get the message "Microsoft Office Excel cannot find any references to replace" when I try to apply the names using Excel menu "Insert - Name - Apply".
I need to hide/unhide a couple of rows based on the result of a formula in the Target Range. Basically, Cell D2 contains the results of a sum (a+ B), if this is greater than 10,000, unhide the next row.
look for a certain value in worksheet A and copy that row of data to Worksheet B.
However, it seems to be only copying the row in worksheet A and pasting it. Is there something that a noob VBA scripter has missed out?
PHP Private Sub GetInfo_Click() Dim r As Long, LastRow As Long, Status As Integer Dim Message As String, Title As String, Default As String, MyValue As String Application.ScreenUpdating = False
MyValue = Range("A4").Value Workbooks("invoice.xls").Worksheets("A").Activate LastRow = Range("C65536").End(xlUp).Row For r = LastRow To 1 Step -1 If Cells(r, 1).Value = MyValue Then Rows(r).EntireRow.Copy Workbooks("invoice.xls").Worksheets("B").Activate Rows("8").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Status = 1 Workbooks("invoice.xls").Worksheets("A").Activate Rows(r).EntireRow.Delete
Exit For End If Next r Application.ScreenUpdating = True