thanks
works like a charm
"Arvi Laanemets" wrote in message
...
Hi
Copy the function below into VBA module
Public Function TabByIndex(TabIndex As Integer) As String
Application.Volatile
TabByIndex = Sheets(TabIndex).Name
End Function
Into A1 enter the formula
=IF(ISERROR(TABBYINDEX(ROW())),"",TABBYINDEX(ROW() ))
and copy down.
--
Arvi Laanemets
(When sending e-mail, use address arvil<Attarkon.ee)
"D@annyBoy" wrote in message
...
How can I list and print a list of worksheets in a workbook?
|