I have recorded the below macro and have assigned to a button on my worksheet. My Macro copies information from the sales sheet and pastes into a creation sheet which is then printed. #
What I want to do is, when the user clicks the button to run the macro I would like to specify which row number is used with an input msgbox or something. In the example below you can see row 72 is being used. Information is then copied from various columns all within row 72.
Is this possible?
Many Thanks
Code: Select all
Sub Macro4()
'
' Macro4 Macro
'
'
Range("C72").Select
Selection.Copy
Sheets("Creation").Select
Range("B3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Sales").Select
Range("D72").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Creation").Select
Range("B10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Sales").Select
Range("E72").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Creation").Select
Range("F10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Sales").Select
Range("F72:H72").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Creation").Select
Range("B5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub