ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Excel macro works with keyboard shortcut, but not command button. Please Help. (https://www.excelbanter.com/excel-programming/360709-excel-macro-works-keyboard-shortcut-but-not-command-button-please-help.html)

[email protected]

Excel macro works with keyboard shortcut, but not command button. Please Help.
 
I have constructed a macro in excel and when I execute it using the
keyboard shortcut from Sheet X it runs fine, but after I created a
command button and assigned the macro to it the macro no longer works
when clicking on the button. When I click the keyboard shortcut it
works, exact same macro programmed for command button doesn't work.
Any ideas? The macro language is below. Thanks in advance, any help
is appreciated! Michael

Sub POST_TO_BLOTTER_Click()
'
' ORDERS Macro
' Macro recorded 4/28/2006 by mneches
'
' Keyboard Shortcut: Ctrl o

Sheets("BLOTTER").Select
Dim Rng As Range
For Each Rng In Range("d3:d100") '
Rng.EntireRow.Cells(1, Columns.Count). _
End(xlToLeft)(1, 2).Value = Rng.Value
Next Rng
Application.CutCopyMode = False
Sheets("Sectors").Select
End Sub


Don Guillett

Excel macro works with keyboard shortcut, but not command button. Please Help.
 
try setting focus to false or assign to a button or shape from the forms or
drawing toolbars

--
Don Guillett
SalesAid Software

wrote in message
oups.com...
I have constructed a macro in excel and when I execute it using the
keyboard shortcut from Sheet X it runs fine, but after I created a
command button and assigned the macro to it the macro no longer works
when clicking on the button. When I click the keyboard shortcut it
works, exact same macro programmed for command button doesn't work.
Any ideas? The macro language is below. Thanks in advance, any help
is appreciated! Michael

Sub POST_TO_BLOTTER_Click()
'
' ORDERS Macro
' Macro recorded 4/28/2006 by mneches
'
' Keyboard Shortcut: Ctrl o

Sheets("BLOTTER").Select
Dim Rng As Range
For Each Rng In Range("d3:d100") '
Rng.EntireRow.Cells(1, Columns.Count). _
End(xlToLeft)(1, 2).Value = Rng.Value
Next Rng
Application.CutCopyMode = False
Sheets("Sectors").Select
End Sub




[email protected]

Excel macro works with keyboard shortcut, but not command button. Please Help.
 
That did it! Thanks! For my information, what's the difference
between the command button and the regular button?


Don Guillett

Excel macro works with keyboard shortcut, but not command button. Please Help.
 
Command button is too much hassle. I haven't used one in years. I usually
use a shape from the drawing toolbar.

--
Don Guillett
SalesAid Software

wrote in message
oups.com...
That did it! Thanks! For my information, what's the difference
between the command button and the regular button?





All times are GMT +1. The time now is 10:21 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com