Continuing to guess:

Assume in sheet Event Data Form, the location in is in A1:A10 and the
corresponding name is in B1:B10. Assume 11 sheets in the workbook (one
named Event Data Form which will not be renamed).

Sub NameSheets()
Dim i as Long, cell as Range
i = 0
for each cell in worksheets("Event Data Form").Range("A1:A10")
if lcase(worksheets(i + 1).Name) = "event data form" then
i = i + 2
else
i = i + 1
end if
worksheets(i).Name = cell.Value & "_" & cell.offset(0,1).Value
Next
End Sub

--
Regards,
Tom Ogilvy

"amyc" wrote in message
...
thanks.

still getting the error. Event Data Form is the raw data set - includes
name of event and location (region and county). The naming convention I
am
trying to pull in refers to the location and name of these events. I will
reboot and retry. thanks for your help.