Како креирати и именовати радне листе засноване на листи путем Екцел макроа
Овај водич ће вам показати како да креирате и именујете радне листове користећи постојећу листу преко макроа .
Креирајте радне листове помоћу листе преко Екцел макроа
Овај код вам може помоћи да аутоматски креирате и преименујете радне листове, на основу листе која постоји у другом листу:Суб ЦреатеСхеетсФромАЛист ()Дим МиЦелл Ас Ранге, МиРанге Ас Ранге
Постави МиРанге = Схеетс ("Сажетак"). Домет ("А10")
Постави МиРанге = Распон (МиРанге, МиРанге.Енд (клДовн))
За сваку МиЦелл у МиРанге
Схеетс.Адд Афтер: = Схеетс (Схеетс.Цоунт) 'креира нови радни лист
Листови (Схеетс.Цоунт) .Наме = МиЦелл.Валуе 'преименују нови радни лист
Нект МиЦелл
Енд Суб
Слика: © Мицрософт.