Form Entry

[MrHuge]

Hi i have a question regarding Form Entry.
I have a form with a whole lot of data in it that pastes itself into the appropriate columns on a submit.
At the Moment i use

        Cells(ActiveCell.Row, 4) = LocationCB

Is there a way i can reference this to a column header, or a defined name column?
This causes issues if someone inserts a column into the spreadsheet, the data ends up in the wrong column.

Cheers

 

[BrianB]

There are a couple of ways. Need to find which column the header is in at the time, so something like :-

LocationColumn = Application.WorksheetFunction.Match("Location", "A1:Z1")
Cells(ActiveCell.Row, LocationColumn) = LocationCB