Како дефинисати број Екцел листова помоћу макроа
Многи макрои су направљени за аутоматско креирање радних свезака. Ове мапе би тада обично требале имати и одређени број радних листова.
Користите следећу команду за контролу жељеног броја листова путем макроа:
Дефинишите под -број листова ()
Апплицатион.СхеетсИнНевВоркбоок = 5
Енд Суб
Користите број иза знака једнакости да одредите колико радних листова треба да буде у вашој радној свесци. Ова вредност је идентична броју који корисник може поставити путем менија "Алати - Опције - Опште" у пољу "Таблице радне свеске", као што се може видети на следећој слици:
Наравно, можете и прочитати вредност. Ово је корисно ако само на кратко желите да промените број радних листова како бисте затим креирали фасциклу са тачно овим бројем радних листова. Следећи програм показује како се то ради:
- Он чува тренутно унапред подешени број листова у променљивој.
- Поставља вредност на број 7.
- Он ствара нову радну свеску (која тада садржи седам листова).
- Враћа унапред подешени број табела на претходно сачувану вредност.
Ево листе одговарајућих програма за овај задатак:
Број подтабеле Марк ()
Дим нумбер Ас Интегер
Нумбер = Апплицатион.СхеетсИнНевВоркбоок
Апплицатион.СхеетсИнНевВоркбоок = 7
Воркбоокс.Адд
Апплицатион.СхеетсИнНевВоркбоок = број
Енд Суб