Sorry if that makes no sense, but here is my code that works:
Const DSD_WS_NAME As String = "DSD" Dim lRow As Long Dim sName As String Dim bEODSD As