Зміст
Як визначити назву таблиці за допомогою макросу
Ви б хотіли переконатися, що для назви активної таблиці встановлено текст, який можна знайти у певній комірці таблиці? Використовуйте такий макрос:
Встановити назви підтаблиць ()
Затемнити клітинку як рядок
Комірка = "a1"
ActiveSheet.Name = ActiveSheet.Range (клітинка) .Text
End Sub
Зі значенням змінної клітинка визначте, з якої комірки потрібно взяти текст. Для цього перенесіть відповідну посилання на клітинку (тут: A1) як адресу.
Макрос бере вміст із відповідної комірки активної таблиці. Поточний робочий лист потім буде перейменовано відповідно. Наступний малюнок показує приклад перейменованої таблиці:
