Нужен код VBA. переименовать листы из списка

Нужен код VBA. переименовать листы из списка

У меня есть список имен в листе 2 ячейки с w3 по w22. Мне нужно назвать листы / вкладки от 3 до 22 из списка имен. Имена меняются. и если нет имени от w3 до w22. Я хочу, чтобы вкладки были пронумерованы с 1 по 20 Любые идеи?

1 ответ

Решение
    Dim MyCell As Range, MyRange As Range, Dim i As Integer 

    Set MyRange = Sheets("Summary").Range("w3") 
    Set MyRange = Range(MyRange, MyRange.End(xlDown)) 

    For Each MyCell In MyRange 
    If MyCell.Value IS NULL
    Sheets(Sheets.Count + 3).Name = i
    Sheets(Sheets.Count + 3).Name = MyCell.Value ' renames the new worksheet 
    Next MyCell 

Или что-то вроде этого, может быть, я не проверял это, потому что вы не дали нам ничего, что можно было бы сделать, или приложили все усилия, чтобы решить это самостоятельно. http://en.kioskea.net/faq/27361-excel-a-macro-to-create-and-name-worksheets-based-on-a-list Престижность этого сайта за то, что он дал мне основание уйти из,

Другие вопросы по тегам