Вредности лепљења за Екцел ВБА
Цопи & Пасте није највећи посао на свету !!! Али копирање и лепљење помоћу посебних опција захтева неку врсту знања у ВБА. Ово није директан поступак као једноставно копирање и лепљење. Једна од важних метода лепљења је „Залепи вредности“ у ВБА.
Како налепити вредности у Екцел помоћу ВБА?
Пример # 1 - Коришћење специјалне пасте
На пример, погледајте доњу слику радног листа.
У ћелији Б6 применили смо формулу за израчунавање укупних вредности продаје од Б2 до Б5 ћелија. Сада, ако копирам и залепим ћелију Б6 у Ц6, нећу добити вредност од 22.761, али добићу одговарајућу формулу.
Да бисмо извршили исту ствар у ВБА, потребно нам је знање кодирања. Показаћемо вам како да налепите вредности помоћу ВБА. Следите кораке у наставку.
Корак 1: Копирајте ћелију Б6.
Да бисте копирали ћелију Б6, користите код као опсег („Б6“)
Корак 2: Изаберите одредишну ћелију. У овом случају, ћелија Ц6.
Као што видите после копије, пита се „Одредиште“. Ово није ништа друго осим где желите да налепите, па одаберите „Одредиште“ као опсег („Ц6“)
Шифра:
Суб Пасте_Валуес () Ранге ("Б6"). Ранге Цопи ("Ц6") Енд Суб
Корак 3: Покрените код
Покрените овај код, добићемо Б6 копију у Ц6.
Овде имамо само формулу.
Корак 4: Извршите лепљење посебном методом.
Да бисмо извршили посебну методу лепљења, погледајмо доњу синтаксу посебне методе лепљења.
У посебној методи лепљења имамо неколико метода. На основу операције коју радимо, треба да изаберемо тип у складу с тим.
Да бисмо разумели, раставимо код у два реда.
Први је копирање ћелије Б6.
Сада у следећи ред напишите одредишну ћелију као Распон („Ц6“)
Сада за приступ Пасте Специал Метход ставите тачку и почните да куцате слово „П.“
У горњој палети опција одаберите методу „Посебно залепи“.
Након одабира методе, притисните тастер за размак да бисте видели различите методе лепљења.
У овој разноликости опција изаберите „клПастеВалуес.“
Након одабира опције, притисните тастер таб да бисте аутоматски изабрали.
Шифра:
Суб Пасте_Валуес () опсег ("Б6"). Опсег копирања ("Ц6"). ПастеСпециал клПастеВалуес Енд Суб
Корак 5: Покрените код
Сада покрените код, требали бисмо добити само вредност ћелије Б6 до ћелије Ц6.
Ако приметите радни лист након покретања кода, он је и даље само у режиму копирања.
Ово ће онемогућити режим изрезане копије након извршавања посебне методе лепљења.
Пример # 2 - Специјално налепите петље
Специјално лепљење је лако, али у смислу коришћења овог дела великог кода потребан је напредни ниво вештина кодирања.
На пример, погледајте доњу слику.
На горњој слици радног листа у колони „Ф“ имамо укупан ступац, тј. У ћелијама Ф2, Ф5, Ф8, Ф11 и Ф14.
Сада је мој захтев да копирам сваку укупну ћелију из одговарајуће ћелије и залепим у колону „Х“ са одговарајућим ћелијама.
Користећи доњи код, са ВБА петљама, можемо то да урадимо.
Шифра:
Суб Пасте_Валуес1 () Дим к Ас Интегер Дим ј Ас Интегер ј = 2 Фор к = 1 То 5 Целлс (ј, 6) .Цопи Целлс (ј, 8) .ПастеСпециал клПастеВалуес ј = ј + 3 Нект к Енд Суб
Овај код са посебном опцијом пасте ће извршити задатак копирања сваке укупне ћелије и залепити у колону „Х“ са одговарајућим ћелијама.
Пример # 3 - Копирајте са радног листа на други
Да бисмо залепили вредности са једног радног листа на други, морамо поменути оба имена радног листа. Испод је пример за то.
Суб Пасте_Валуес2 () Ворксхеетс ("Схеет1"). Ранге ("А1"). Копирајте Ворксхеетс ("Схеет2"). Ранге ("А15"). ПастеСпециал клПастеВалуес Енд Суб
