Public Variables

[carsto]

I define columns repeatedly in procedure after procedure

I start by making the header cell of the column a Named Range such as Col_D_Hdr (generally it's more useful than that!)

then
Dim iMyCol As Integer
iMyCol = Range("Col_D_Hdr").Column

Is there a way to make this Public, defining them all when the workbook opens? Everyway I’ve tried failed.

[protonLeah]

You could:
Insert a new module, declare the vars you want e.g.:
Public iMyCol as Integer
Public MyWS as WorkSheet
Public MyRange as Range
...
In the ThisWorkbook module initialize the vars
iMyCol = Range("Col_D_Hdr").Column
Set MyRange =Worksheets("Sheet2").Range("A?:??")
Set MyWS = Worksheets("sheetname")
...