From the Control Toolbox I click on the command button icon. I positon the mouse where I'd like to place the command button and draw the command button. Then right click to open the drop down menu. A few days ago in the drop down menu I had an option Assign Macro but now I don't have it anymore. How is it possible to assign macros to the command button and even better how can I get the Assign Macro option back in the drop down menu?
View 2 RepliesI written VBA code to create a new sheet and embed a command button on it. I want to assign a macro to this button but when I click on the button the assign macro button is greyed out. I have plenty of macros saved and the VBA code has finished running so why should this be?
View 7 Replies View RelatedI have a little problem with a userform commandbutton that I cannot resolve. I cannot seem to excecute a macro from a commandbutton, but if I go to the VBA project I can get it to work from there.
The cmb just calls a macro, which in itself call 5 other macros. This is the code for the button:
I'm trying to loop through several objects and fire their "Click" events, but I'm not sure how to get it to work.
Below is an example of what I was trying to do. There are 3 objects with the name "CommandButton(1-3)".
Private Sub RunAll_Click()
Dim obj As Object
For i = 1 To 3
Set obj = UserForm1.Controls("CommandButton" & i)
obj_Click
Next i
End Sub
I have an unusual problem with my excel workbook. The workbook consists of 2 sheets, "WorksOrder" and "Data". In the WorksOrder sheet, the user enters some WorksOrder number and then hits a Commandbutton to retrieve the data from SQL and stores it in the "Data" sheet. It then goes and copies the values from the Data sheet. The problem occurs when it's trying to copy a cell value in Data into a WorksOrder cell. The error I get is Run-time error '1004': Application-defined or object-defined error
The weird thing is, when I'm stepping through the code, I don't get the error message and the code works. It only happens when the code is triggered from the Commandbutton. I've tracked the error to a variable which supposed to have a row number greater than zero but instead has a zero (0) value. My question is why isn't the function returning the value to the variable ThisRow? The code for copying the cell data is listed below:
Dim ThisRow As Long
Dim ThisWorksOrder As String
ThisWorksOrder = "123456"
ThisRow = FindRowNumber(ThisWorksOrder)
Worksheets("WorksOrder").Range("D1").Value = WorkSheets("Data").Range("H" & CStr(ThisRow).Value.............
I am trying to make things easier for the next user by having one command button run the macros for the other worksheets (so they don't have to switch between worksheet)
However,
I get "Runtime error '1004' Application-defined or object-defined error"
i have the following code for sending a worksheet to a closed workbook
View 14 Replies View RelatedI would like a to activate a form every time I click in a given cell. how to do this?
View 4 Replies View RelatedWhile practicing writing macros and studying the VBA code, I decided to add a button to run the macro, something I've done many times in the past. But the option to associate the new button with any macro doesn't seem to be available.
A. How can I assign a new button to a macro
and
B. How can I make the association in VBA?
I have several macros where I have assigned keyboard shortcuts, as below. Yet they don't work.
Sub My_FastCleanup()
' My_FastCleanup Macro
' Keyboard Shortcut: Ctrl+Shift+M
-macro stuff-
End Sub
I have designed a functioning userform which transfers the data (limited or complete) into the sheet. Along with the data and at the end of each row it automatically generates 4 checkboxes and links them to 4 offset cells.
This is where I hit a dead end. I am not sure which avenue is suitable or indeed possible. I want to click any checkboxes in the first COLUMN and as a result have it change the complete ROW colorindex of the background. I did achieve this with conditional formatting but it seemed to make the empty sheet bulking when saving and I cannot alter the font size which is another goal on the 3rd column of checkboxes. Am I waffling yet?
The 3rd column checkboxes I want to have the ROW font size drop to 3pt. The 2nd and 4th currently serve no purpose i.e. trigger nothing as a result.
I don’t think I can use the checkbox_click event as the boxes are generated for me so I don’t know which number they will be. The worksheet_change event and calculate event don’t seem to register when the linked cell goes to TRUE or back to FALSE. I tried using FORMS and CONTROLS checkboxes but neither has brought me success.
I was hoping the linkedcell would trigger an event and in turn select and manipulate the entire row in which the linked cell is located….
Due to my limited knowledge the code I have written/adapted to suit my needs may appear a little unorthodox? I hope that in itself is not a problem.
I have not managed to get the Controls Checkboxes to initalise blank. Currently they appear greyed out with a tick but fully usable? Of minor importance.
I can't attach the file because the blank sheet is 4.5MB?? so here is the main body of code from the userform. If you need anything else I will supply as required, however I can't get anyfiles under the attachment maximum of 48.8kb. My jpeg image was 108kb....
I have to modify 2000 files so I've written a master file that loops through a list, importing modules and forms into the 2000 files it opens and closes. On each file when open it draws a button on worksheet. I then want to assign a macro to the button called "ModifyMenu" . The code for 'Modifymenu' is imported into file_01.xls and is a unique name. It does not exist is master.xls, so no confusion.
The code for assigning the code is as follows :
Windows("file_01.xls").Activate
ActiveSheet.Shapes("Button").Select
or
Workbooks("file_01.xls").Sheets("1 B").Shapes("Button").Select
Then
Selection.OnAction = "ModifyMenu"
(This links to master.xls!ModifyMenu not file_01.xls)
Selection.OnAction = "file_01.xls!ModifyMenu"
(This fails, runtime 1004. 'Unable to set the OnAction property of the button class)
Selection.OnAction = ThisWorkbook.Name & "!ModifyMenu"
(This links to master. MAster is the active code even though 'file_01.xls' is the active worksheet)
Variations on the above seem to result in the same 1004 error or linking back to master regardless of the fact I'm trying to link to file_01.xls.
My macro essentially requires a deletion of the entire sheet, so I cannot run it through a button, it'd by definition be deleted. So I was thinking to run this macro through the keyboard, how to assign a keyboard key to existing macro?
View 4 Replies View Relatedi want to know how to assign a macro which will remove and place a number in a certain cell. so if i click and tick the box, then a certain figure will come into a cell(this will be a formulae) and when untick the the number will disappear.
View 4 Replies View RelatedI have several Activex buttons in sheet "Options" and I would like to automatically assign each button to the same macro "Run_Options", in order to execute the macro "Run_Options" when I do click over any button.
How can I do that with a excel macro?
I have a start page in the beginning of my excel workbook.
This is where i want to assign a macro to a search button.
I want the macro to search the entire workbook but only in a certain block on each worksheet.
User inputs cost in a cell then clicks macro button that will run a macro that ask for a task description. The user inputs the task info that relates to the cost (i.e. weld pipe). This data is stored on a seperate sheet in the corresponding cell (cost is on sheet "hours" and task description is on sheet "task description" both in same cell. This allows a copy of the cost sheet to reflect the task description. I have tried recording macros but can't get anywhere.
View 1 Replies View RelatedI created a drop down list (of various Input Groups) and I need to show the selected group's responsibilities on a separate sheet; is there an easy way to do this?
View 2 Replies View RelatedI want to assign a macro of start time and end time on one button. I tried but its not working..
View 2 Replies View RelatedI have two files, a workbook and a document, and both are macro-enabled files. The workbook is my main file for my project and the document is my template. The workbook is basically my database with vba program that populate data to Word document. My word document is a template that has macros saved in a module. Aside from populating the data, workbook also create formfields on to the document and assign macro (ExitMacro).
However, i'm getting Run-time error (4210): Bad parameter message when i try to assign the macro to formfields. I noticed that this happened when the macro was saved in the module of the document. The workbook program works fine if the document macro was saved in Normal.dot, which i don't want to do.
I need a macro that will take a list of 42 names and 27 locations. The names are broken down into group of shifts, 1 shift, 2nd shift and 3rd shift. We need to perform audits on the 27 locations in groups of 2 people at a time. What I'd like is a macro that would take all the names by shift and assign 2 random people to a location. All 27 locations have to be audited each week (safety), and a report filled out and turned into our safety committee. I would like to post the audit sheet with the macro on our shared drive. Can anyone help me with this.
View 9 Replies View RelatedCreated a button in a spreadsheet but cannot activate the shortcut menu that contains "assign macro." Help says select the button, right click on a handle and a shortcut menu appears with "assign macro." Not. I right clicked every handle numerous times and get the regular shortcut menu without the "assign macro" option.
View 9 Replies View RelatedI have a custom toolbar containing several buttons which run several macros. Works fine except on exiting the programme and re-opening the workbook, if I try to use the custom buttons I get an error message which tells me it cannot find the ' name of workbook, name of macro' macro I then have to re-assign the macro which has been there all the time but without the file name in front of it.
View 7 Replies View RelatedI have over 100 checkboxs on an excel sheet. This sheet will be duplicated 25 times in this workbook.
How can I move this code so its not on each sheet.
Private Sub Aerial_Click()
UG = False
Apartment = False
Range("L68") = "Aerial"
End Sub
I wrote a macro so that if a checkbox is "true" it will print and if it is "false" then the checkbox will not print. I want to do that on many other checkboxes but with this approach the number of macros will have to be equal to the number of checkboxes. I was wondering if someone here by writing one macro that will do the trick and i can assign to as many checkboxes as i want. my macro is
Sub proPaintRALPEnd()
Application.ScreenUpdating = False
On Error Resume Next
If Range("l78").Value = "True" Then
ActiveSheet.Shapes("Check Box 697").Select
With Selection
.Placement = xlMove
.PrintObject = True
End With
ActiveSheet.Shapes("Text Box 698").Select
With Selection
.Placement = xlMove
.PrintObject = True
End With
Else...............
how I can write code to create a button on a worksheets and then link to another subprocedure.
I tried recording a macro and this is what excel so eloquently gave me:
ActiveSheet.Buttons.Add(384.75, 60.75, 79.5, 39.75).Select
Selection.OnAction = "CreateImport"
ActiveSheet.Shapes("Button 1").Select
Selection.Characters.Text = "Parse Deposits for Import"
With Selection.Characters(Start:=1, Length:=25).Font
. Name = "Arial"
.FontStyle = "Regular"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
.TintAndShade = 0
.ThemeFont = xlThemeFontNone
End With
This works fine, my only problem is if the button that is created is actually named Button2 or 3, etc. Is there a way to assign the new button to a variable, or would it be an object? this way it wouldn't matter what it was named.
I am trying to get a code which searches each row for a keyword, and then assigns a value to it depending on what group of keywords it is.
For example, if the Name or Comment mentions certain fruit keywords, I want it to assign the value: "Fruit", and if it mentions certain vegetable keywords, I want to assign it "Vegetables", and if it is unrelated to either, I want to keep it blank. If the name/comment mentions both fruit and vegetables then I want it to say "Error".
Since the keywords I am using are mostly two letters, I want the search to only search for the two letters on its own, and not as part of a sentence. e.g. if the key word is ED, I don't want it to return a value for "I rested". Instead, I want it to stay blank.
i.e. I want the code to take information from column A and B, and assign a value based on the keywords in column D and E. As an example:
A B C
Name Comment Value
V1 Eating vegetables are good for you Vegetable
null lock out of ep. Fruit
S-1 It is JUST
Fruit-sp Error
D E
Fruit Vegetable
EP SW
KG SP
ST CM
BV LP
The formula I used so far is this: where C3 is the first value
C3=IF(OR(ISNUMBER(LOOKUP(100,SEARCH(Sheet1!$D$2:$D$6,A3))),ISNUMBER(LOOKUP(100,SEARCH(Sheet1!$D$2:$D$6,B3)))),"Fruit","")&IF(OR(ISNUMBER(LOOKUP(100,SEARCH(Sheet1!$E$2:$E$6,A3))),ISNUMBER(LOOKUP(100,SEARCH($E$2:$E$6,B3)))),"Vegetable","")
In columns D and E I put a leading and trailing space between each word to only search for the keywords themselves, and not as part of a word. (e.g. ST is correct instead of haSTe).
This formula seems to work only for 60% of the information, problems occur when the keyword is at the end of comment sentence: the value is blank. e.g. in row B4 of the table I made above my formula returns a blank.
I'm trying to assign a shortcut to a macro I wrote in VB. However, when I go to Tools->Macros->Macros, none of my macros (whether coded in VB or recorded) have the "Options..." button enabled, so I can't assign the macro. This happens whether I use Excel 2003 or Excel 2007. The file is not readonly and I have tried the various levels of macro security. I have VBA installed.
View 5 Replies View RelatedIs there a VBA code that will enable me to create a button and assign a certain macro to it everytime I insert a new worksheet?
how to insert a new worksheet with VBA, what I want is that when I insert that worksheet, there is already a button there with a specific macro(already made) assigned to it.
I'm verrry new to editing VBA code and I've been trying to figure out how to send a column of data ("Min Data" AB3:AB21 from "Sheet1") to a worksheet ("F4" - Min) and sending another column of data ("Max Data" AC3:AC21 from "Sheet1") to a different worksheet ("F4" - Max) by using only the one button ("Record Data" from "Sheet1"
I've been trying to figure out ways to edit the VBA in "Module 1" to make this work
Can anyone help me out here? If what i'm asking for isn't clear enough, just let me know and i'll try to explain in more detail.