I have a code, which works when i select run but i can not connect it to a
command button, I can get the code to work if i paste in to the work book(but
not the command button) but can not get it to work in the worksheet where
command button is.

Sub AutoNumber()
' AutoNumber Macro
Sheets("Formulations").Select
i = Range("A2") + 1
Sheets("Formulation").Select
Range("E17:E18") = i
End Sub

The simpliest way is to go into Desiign Mode and double click the Control
button. It will create the macro where yo can place you code. to enter
Design Mode

1) Worksheet Menu View - Toolbars - Control Toolbox
2) Press Triangle ICON whic is a toggle button to either Enter or Exit
Design Mode
3) Double click on Your control Button which wil bring you into VBA where
the new macro is created. Past your code into the macro
4) Go back to worksheet and Press Desgin Mode ICON (triangle) to Exit Design
Mode
5) Your control buttonMacro should now operate properly.

"Miree" wrote:

I have a code, which works when i select run but i can not connect it to a
command button, I can get the code to work if i paste in to the work book(but
not the command button) but can not get it to work in the worksheet where
command button is.

Sub AutoNumber()
' AutoNumber Macro
Sheets("Formulations").Select
i = Range("A2") + 1
Sheets("Formulation").Select
Range("E17:E18") = i
End Sub

Hi
Get your button from the Forms Toolbar, not the Controls Toolbox. For
a Forms Toolbar button, you can right click it and assign your macro.
Your macro should be in a General code module, not the worksheet
module. To create a general module, go into the visual basic editor
and do Insert, Module. Paste your AutoNumber macro into there.

Your code probably does not work because your button is from the
Controls Toolbox. The macro attached here is a button_click event
macro which will go into a specific worksheet code module. All a bit
more complicated than you want.

regards
Paul

On Sep 17, 2:59*pm, Miree wrote:
I have a code, which works when i select run but i can not connect it to a
command button, I can get the code to work if i paste in to the work book(but
not the command button) but can not get it to work in the worksheet where
command button is.

Sub AutoNumber()
' AutoNumber Macro
* * Sheets("Formulations").Select
* * i = Range("A2") + 1
* * Sheets("Formulation").Select
* * Range("E17:E18") = i
End Sub

Thank you Paul worked perfectly.

"Miree" wrote:

I have a code, which works when i select run but i can not connect it to a
command button, I can get the code to work if i paste in to the work book(but
not the command button) but can not get it to work in the worksheet where
command button is.

Sub AutoNumber()
' AutoNumber Macro
Sheets("Formulations").Select
i = Range("A2") + 1
Sheets("Formulation").Select
Range("E17:E18") = i
End Sub