I'm having trouble making this work, Does anyone know why it's not calling the variable?


Dim rngCells1 As Range

Set rngCells1 = Range("A3:A13")

Rows("3:13").Select
Selection.Insert Shift:=xlDown
Range("A2").Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Copy
rngCells1.Select <--
ActiveSheet.Paste

Try:

Range("'" & YourWorksheetNameHere & "'!mgCells1").Select