Садржај
У програму Мицрософт Екцел можете лако да конвертујете документ у ЦСВ тако што ћете изабрати одговарајући тип датотеке у дијалогу „Сачувај као“. Кроз овај метод ће се конвертовати само активни радни лист. То је зато што ЦСВ датотеке могу да садрже само један радни лист. Да бисте конвертовали више ЦСВ табела, морате их извести један по један, а то укључује активирање сваке од њих, премештање у празан документ, а затим чување као ЦСВ. Да бисте овај задатак учинили лакшим и практичнијим, користите макрое.
Упутства
Претварање табеле у ЦСВ ће узети ваше формуле и стилове (Стоцкбите / Стоцкбите / Гетти Имагес)-
Покрените Мицрософт Екцел и отворите документ.
-
Притисните "Алт + Ф8" да бисте отворили прозор Макронаредбе. Откуцајте "ЕкпортСхеетсТоЦСВ" у опцији имена за макро и затим кликните на "Креирај".
-
Упишите сљедећи код у ВБА едитор. Овај макро ће креирати ЦСВ датотеке у истој фасцикли као и ваш документ, користећи име радних листова за датотеке.
Суб ЕкпортСхеетсТоЦСВ ()
Дим вСхеет Ас Ворксхеет Дим цсвФиле Ас Стринг
За сваки вСхеет у радним листовима на грешци Настави Следећи вСхеет.Цопи цсвФиле = ЦурДир & "& вСхеет.Наме &" .цсв "АцтивеВоркбоок.СавеАс Име датотеке: = цсвФиле, _ ФилеФормат: = клЦСВ, ЦреатеБацкуп: = Фалсе АцтивеВоркбоок.Савед = Труе АцтивеВоркбоок.Цлосе Нект вСхеет
Енд Суб
-
Затворите ВБА едитор и вратите се на документ.
-
Поново притисните "Алт + Ф8" да бисте отворили прозор Макронаредбе. Изаберите "ЕкпортСхеетсТоЦСВ" са листе и кликните на "Рун". Сачекајте да Екцел заврши конвертовање табела.
Како
- Ако желите да сачувате ЦСВ датотеке у другу фасциклу, замените "ЦурДир" на линији 9 са путањом фасцикле по Вашој жељи. Можете и да преместите документ у фасциклу по вашем избору пре покретања макроа.
Обавештење
- Подразумевано, макрои су онемогућени у програму Мицрософт Екцел. Да бисте их активирали, кликните на дугме "Мицрософт Оффице", идите на "Екцел опције" и уверите се да је означена опција "Прикажи картицу за програмере у опцијама". У неким случајевима, мораћете да поново покренете Екцел да би промене ступиле на снагу.