Съдържание
Как да дефинирате име на таблица с помощта на макрос
Искате ли да се уверите, че името на активната таблица е зададено на текста, който може да бъде намерен в определена клетка в таблицата? Използвайте следния макрос:
Задайте имена на подтаблици ()
Dim Cell As String
Клетка = "a1"
ActiveSheet.Name = ActiveSheet.Range (клетка). Текст
End Sub
Със стойността на променливата клетка определете от коя клетка трябва да бъде взет текстът. За да направите това, прехвърлете подходящата референтна клетка (тук: A1) като адрес.
Макросът взема съдържанието от съответната клетка в активната таблица. След това текущият работен лист се преименува съответно. Следващата фигура показва пример за преименувана таблица:
