First create a list in a helper column (e.g. N) with this macro, then use the
N1:N? range as source of validation list!
Sub shlist()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
Range("N" & ws.Index).Value = ws.Name 'change N as you like
Next ws
End Sub
Regards,
Stefi
„DJB†ezt Ãrta: