Овако стварате радне свеске онако како желите
Да ли желите да осигурате да у својој табели направите читав низ празних радних листова и да их све преименујете према својим жељама?
Ако то радите ручно, потребно је много времена. Ручно преименовање табела захтева много времена.
Лакше је са макроом. Унесите називе табела у област у табели. Следећа илустрација приказује како ово може изгледати:
Затим позовите следећи макро да бисте креирали табеле:
Суб ФуегеБлаеттерМитхНаменЕин ()
Дим ареа Ас Стринг
Дим Целл Ас Ранге
Затамните табелу као радни лист
Ареа = "а1: а24"
Са АцтивеВоркбоок -ом
За сваку ћелију у АцтивеСхеет.Ранге .Целлс
Постави табелу = .Схеетс.Адд (Афтер: =. Схеетс (Схеетс.Цоунт))
Табле.Наме = Целл.Тект
Следећа ћелија
Завршити
Енд Суб
Стави са променљивом области одређује из које области ваше табеле се преузимају називи радних листова.
Следећа слика приказује радну свеску у којој су направљени називи табела за месеце 2010. и 2011. године:
Савет: Ако желите да знате како да уносите и покрећете макрое у Екцелу, овде ћете пронаћи кратак опис: хттп://ввв.екцелдаили.де/екцел-макрос-вба/артикел/д/со-хабен-сие -макрос- ин-екцел-еин.хтмл
