Нужен код 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 Престижность этого сайта за то, что он дал мне основание уйти из,