I have an index page with hundreds of worksheets (poor spreadsheet design i know) I am looking for a button to go next to the sheet name on the index sheet, read the cell in the button's macro code and when pushed go to that sheet's location. I can easily make a button to go to one sheet but with hundreds of sheets this becomes a monotonous task. Example
Index Sheet
Sheet 2 (Button) <-- Button reads the text, takes you to the "Sheet 2" location
Sheet 3 (Button)
Sheet 4 (Button
Sheet 5 (Button)
I have a number of buttons on a daashboard that run different macros.
Is it possible to have the most of the buttons deactivated until a cell on a different sheet has a value in the there (Text or number) turning them active?
I want to activate the sheet based on my cell value but the prog is not working.
Sub emptest() Dim tempname As String Worksheets("team").Select Range("c24").Select Do While ActiveCell.Value "" If ActiveCell.Value = tempname Then Worksheets(tempname).Select Else MsgBox "no sheet" End If ActiveCell.Offset(1, 0).Select Loop End Sub
I have workbook with two sheets "Path A" and "Path B". Whenever I activate worksheet "Path B", I want to activate the cell in "Path B " which was the active cell in sheet "path A". For example, if cell R1 was active in path A when Path B was activated, R1 should be made the activecell of Path B. Tried the follwing code... not working.
Private Sub Worksheet_Activate() Dim r As Integer, c As Integer r = Worksheets("Path A").ActiveCell.Row c = Worksheets("Path A").ActiveCell.Column Worksheets("PathB").Cells(r, c).Activate End Sub
I have a UDF in Cell Sheet1!A1 that inputs some ranges from Sheet1 and calculates a number. Then I have a sub that calculates the value of this function with Evaluate(Sheet1!A1.formula). However, this only works when I am in Sheet1. Otherwise, I get the wrong calculation. How can I avoid this? I will post the code in the open source forum as it otherwise is quite good and automatically resizes array functions to their proper size.
If a cell is not blank, then increase that amount by a percentage identified in another cell and display the value only without any formalas in a new cell. To this end I wrote this IF statement:
=IF(I2>0,CP9=(CA9*I2/100)+CA9,CP9="")
Observation: I see a FALSE in CS9 where this IF statement exists, however, CP9 does not display the required value.
I want to click a specific button on a webpage but there is different buttons with same name (in view source) but tabindex is different.I want to click a button where tabindex = 7.
I am trying to determine how to great a formula for cells E5, E6 of the attached (in pink) that says if the value of the cell above (E4) is equal to or Greater than the value of cell E10, the cell will perform the formula that I already have in E5, E6.
But what I'm trying to do is create a 5 year investment plan whereby the worksheet automatically inputs those values for me if the balance is above our minimum reserve. That way I can play with the default assumptions and see how it changes throughout the worksheet.
I am trying to write a macro that activates the following funtion in cell D1.
=HYPERLINK("#"&C2,"")
I have recorded the following macro but it only jumps to the cell the function is in rather than actually activating the function and jumping to reference which has been selected in C2.
I know that I can assign a keyboard shortcut to run a macro, but I have multiple items that are activated by command buttons and would like to be able to trigger them all with one keystroke.
I have a multiple column spreadsheet (Call it- "Money") whereby I need the data identified based on a list of account numbers and return this data to a new sheet.
In "Money" I have:
IE; columns B, C respectively have cust #A100 & 20.00 columns E, F respectively have cust #B100 & 40.00 columns G,H respectively have cust #C100 & 60.00 Etc.
(above for illustration-there are 100 lines of data in these columns with varied account numbers and respective dollars)
So what I have now is a new sheet I have named "Control". I have listed all my account numbers like A100,B100 etc. in column A. These are the account numbers for ident purposes.
I need the data entered in "Money" identified by those columns B,E,G with respective amounts from C,F,H and based on the list I have in "Control" whereby in "Control" if A100 is listed in column A then the figure to be returned in column B is all the data bits found in all columns C,F,H from the entire sheet "Money". Tough to explain but ie below....
I have developed a Userform button in Excel 2010 using the developer icons, which when clicked on with my mouse it runs my super dooper macro. It works great!
But one thing I want to have happen is to have the choice of using the Enter key to start the macro or use the left mouse button
For example, I place data in (say) cell A1 and the userform button is in cell A2. When I place the data in A1 and press the Enter key, the cursor moves down to A2, but doesn't highlight the user button. When I press the Enter key again, the cursor moves to cell A3.
What I want is when I fill in the data in A1 and press the Enter key, the cursor moves to cell A2 and selects the button, so that when I press the Enter key again, it activates the macro.
Every day for each date of month I have to copy data from mails to my workbook and a last sheet named report in which I need last row value from 7 or 8 sheets for this I have developed following codes which seems to me very long procduer.
I am trying to create an event macro that would deactivate column and row headers when the workbook is launched and activate a sheet. i am not managing to do this,
I have created a Group Box in Excel with 4 Option Buttons in the group. I have also created a Command Button which currently, when clicked, changes to a worksheet I specified. I am trying to have the Comand Button, when clicked, look at the selected Option Buttons in the Group Box and change to the worksheet specified by the selected Option Button. I have tried an IF..THEN statement with no success. code below that I have tried.
Private Sub CommandButton1_Click() If AM40 = 1 Then Sheets("Billboards(1)").Select 'ElseIf AM40 = 2 Then ' Sheets("Live Events Feedback(1)").Select End If End Sub
Form - to submit the data of items incl 2 buttons to add the data in 2 sheets and 1 email button wich is active and working.
I would like when the data is been added in the form cells that when by example when i push the button for new assets these data in correct order be placed in the new asset sheet horizontal and in the right column. Not with a pivot table i need to keep the layout of the top line in new asset sheet as it is by procedure.
How do I automatically insert rows given the identified quantity to insert and copy the contents of the previous item on the insert rows. Does that make any sense
a1 - abc a2 - def a3 - ghi
I need to insert 10rows below a1, and copy a1 across the inserted rows. Now I have a ton of this case currently do it manuaaly, it might take me a lifetime to complete.
I am looking for a way to ease a 24,000 line duplicate list into showing just the files from a specific folder/subfolder and its dupes. I have marked the files that reside in that folder by adding a column and entering a "1" in it. What I am looking for is a way to add that "1" to the others of that unique numerical ID duplicates, so I can sort and trim the list to just those files. End result is to show files in one folder and the locations of duplicates of those files elsewhere for eventual cleanup.
Very loosely, if C2=C1 and B1=1, then make B2=1 (and so on) (A is blank and only there in case a formula needs input there)
A B C 110121 10121 118134 18134 18134 124232 24232
I am developing some code to extract selected worksheets to a new workbook, and provide the data in a "standalone" form where certain formulas have been converted to values etc. As part of this project, hidden columns are made visible, then data is pasted as values on a row by row basis, then the previously hidden columns are deleted. Here is the code that unhides the columns and identifies those columns as ones that it needs to delete later on:
'Expose hidden columns and keep a list For i = 1 To 200 Range("a1").Offset(0, i - 1).Select If ActiveCell.EntireColumn.Hidden = True Then colnum = ActiveCell.Column ActiveCell.EntireColumn.Hidden = False If HideCOL <> "" Then HideCOL = HideCOL & "," & colnum Else HideCOL = colnum End If
End If
Next
The macro then goes about its business doing this and that, and at the end comes back to delete those offending columns whose numbers have been stored in the variable "HideCOL".
'Delete columns that were hidden If HideCOL <> "" Then Dim colArray As Variant .............
i want to create a save button in sheet 1, on clicking the same the data entered in the particluar cells of sheet 1 should get saved in sheet 2 in given format
Basically, I'd like my macro to be activated whenever the value in cell A4 changes. Cell A4 has a numerical value between 1 and 10. The macro clears a contents table. Here it is:
Sub Clear() Sheets('Form').Select Range("H4:L10").Select Selection.ClearContents End Sub
How to get the (module) macro to be activated whenever cell A4 changes value?
I have code that calls a dataform when I click on a command button. Regardless of where I am in the row, the command button is in column A. I want the selected cell to move to column B in the same row so that when the userform displays it will show the correct data. (I have used Private Sub UserForm_Initialize()
Container.Value = ActiveCell.Value PONumbers.Value = ActiveCell.Offset(0, -1).Value SizeType.Value = ActiveCell.Offset(0, 1).Value Vessel.Value = ActiveCell.Offset(0, 2).Value 'etc End Sub to populate my userform.
Can I add something in my call code to also select the cell I want? Or alter the initialization code to start at the beginning of that row?
I have an excel file that I want a macro to run when the cell changes to "Yes" (location B21). The cell options right now in a drop down list is "Yes" or "No". The Macro is called helper. How do I get this to work when they pick yes or no from the drop down list. I wanted to attach the file in this post, but it will not let me. I can email it to anyone who would like to work on it.
