Hello,
Does anyone think this is too clunky? The below is copying the value of J2 cell and placing the values on the Save sheet. It works but it's slow?
Thank you,
Nej
Does anyone think this is too clunky? The below is copying the value of J2 cell and placing the values on the Save sheet. It works but it's slow?
Code:
Private Sub CommandButton5_Click() 'Save ActiveX ButtonSheets("Save").Select
Application.Goto reference:="R1C1"
'Rows("1:1").Select
Selection.insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Sheets("Donuts").Select
Application.Goto reference:="R2C10"
Selection.Copy
Sheets("Save").Select
Application.Goto reference:="R1C1"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Thank you,
Nej