Ето как създавате работни книги, както искате
Искате ли да сте сигурни, че създавате цяла поредица от празни работни листове в таблицата си и ги преименувате според вашите желания?
Отнема много време, ако го направите ръчно. Ръчното преименуване на таблиците отнема много време.
По -лесно е с макрос. Въведете имената на таблиците в област в таблица. Следващата илюстрация показва как може да изглежда това:
След това извикайте следния макрос, за да създадете таблиците:
Sub FuegeBlaetterMithNamenEin ()
Затъмнена област като низа
Dim Cell As Range
Затъмнете таблицата като работен лист
Area = "a1: a24"
С ActiveWorkbook
За всяка клетка в ActiveSheet.Range .Cells
Задайте таблица = .Sheets.Add (След: =. Sheets (Sheets.Count))
Table.Name = Cell.Text
Следващата клетка
Край с
End Sub
Поставете с променливата ■ площ определя от коя област на вашата таблица са взети имената на работните листове.
Следващата фигура показва работна книга, в която са създадени имената на таблиците за месеците 2010 и 2011:
Съвет: Ако искате да знаете как да въвеждате и стартирате макроси в Excel, ще намерите кратко описание тук: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- в-excel-ein.html
