Checkbox Macro

  • Thread starter Thread starter Ben in CA
  • Start date Start date
B

Ben in CA

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!
 
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
 
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
 
Back
Top