[Iska]

sub or function not defined »

Потому что функции today() в VBA не существует. Есть функция «Now()», и функция «Format()», позволяющая получить заданный вид даты. Например:

Код:

Debug.Print Format(Now(), "YYYY.MM.DD")

И, кстати: не забудьте предусмотреть случай, когда название ни одного листа не совпадёт с текущей датой.