Напишите називе радних листова у Екцел радној свесци као листу

Anonim

Направите садржај за радну свеску навођењем имена свих радних листова у Екцел радној свесци

Желите ли да добијете списак свих радних листова у радној свесци? Затим користите ВБА макро. Следећи макро ствара нови радни лист у активној радној свесци и наводи имена свих листова један испод другог на овом радном листу:

Суб ЛистБлаеттер ()
Дим лине Ас Интегер
Затамни листу као радни лист
Сет Лист = АцтивеВоркбоок.Ворксхеетс.Адд
За ред = 1 За АцтивеВоркбоок.Ворксхеетс.Цоунт
Лист.Целлс (ров, 1) .Валуе = Радни листови (ред) .Назив
Следећи ред
Енд Суб

Након покретања, макро генерише листу радних листова у активним радним свескама. Ова листа је на новом радном листу. Следећа слика приказује како резултат може изгледати:

Да бисте унели макро, притисните комбинацију тастера АЛТ Ф11 у Екцелу. Ово позива ВБА едитор. Помоћу команде ИНСЕРТ - МОДУЛЕ уметните празан лист модула. Да бисте покренули макро, притисните комбинацију тастера АЛТ Ф8 у програму Екцел.