If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Checkbox Macro
Hello,
Here's a question that shows my ignorance when it comes to Excel macros. How can I copy the data contained in one cell to the next cell on the same row (without referencing the cell names in the macro) by pressing a checkbox? How about leaving an empty column in between - copying from cell S2 to U2, for instance? Thanks in advance for anyone who has some ideas! |
#2
|
|||
|
|||
Checkbox Macro
You will need event code behind the sheet.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Const WS_RANGE As String = "S1:S10" 'adjust to suit Application.EnableEvents = False On Error Resume Next If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then Target.Offset(0, 2).Value = Target.Value End If On Error GoTo 0 Application.EnableEvents = True End Sub Right-click on the sheet tab and "View Code". Copy/paste the above code into that module. Edit the range to suit. Alt + q to return to the Excel window. Click on any cell in the S1:S10 range and the value will then be copied to column U Gord Dibben MS Excel MVP On Mon, 8 Dec 2008 15:33:01 -0800, Ben in CA wrote: Hello, Here's a question that shows my ignorance when it comes to Excel macros. How can I copy the data contained in one cell to the next cell on the same row (without referencing the cell names in the macro) by pressing a checkbox? How about leaving an empty column in between - copying from cell S2 to U2, for instance? Thanks in advance for anyone who has some ideas! |
#3
|
|||
|
|||
Checkbox Macro
Thank you very much for your reply.
I might be able to use that the way it is, but is there a way I can have it setup so that it only copies when I press a button or a checkbox? Ben "Gord Dibben" wrote: You will need event code behind the sheet. Private Sub Worksheet_SelectionChange(ByVal Target As Range) Const WS_RANGE As String = "S1:S10" 'adjust to suit Application.EnableEvents = False On Error Resume Next If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then Target.Offset(0, 2).Value = Target.Value End If On Error GoTo 0 Application.EnableEvents = True End Sub Right-click on the sheet tab and "View Code". Copy/paste the above code into that module. Edit the range to suit. Alt + q to return to the Excel window. Click on any cell in the S1:S10 range and the value will then be copied to column U Gord Dibben MS Excel MVP On Mon, 8 Dec 2008 15:33:01 -0800, Ben in CA wrote: Hello, Here's a question that shows my ignorance when it comes to Excel macros. How can I copy the data contained in one cell to the next cell on the same row (without referencing the cell names in the macro) by pressing a checkbox? How about leaving an empty column in between - copying from cell S2 to U2, for instance? Thanks in advance for anyone who has some ideas! |
Thread Tools | |
Display Modes | |
|
|