Function NameExist(s As String) As Boolean
Dim n As Name
NameExist = False
If ActiveWorkbook.Names.Count = 0 Then Exit Function
For Each n In ActiveWorkbook.Names
If s = n.Name Then
NameExist = True
Exit Function
End If
Next
End Function


--
Gary''s Student - gsnu200826


"Rob" wrote:

Hi. I was wondering if there was a way for a macro to detect if there was a
field name already in use for a workbook?

I already tried...
If Exist Workbooks("Export.xls").Names("DATA1") Then

As well as...
If Workbooks("Export.xls").Names("DATA1") = True Then


Thanks very much,
Rob