Excel VBA за чистење на содржината на опсегот (3 соодветни случаи)

  • Споделете Го Ова
Hugh West

Доколку барате решение или некои специјални трикови за исчистување на содржината на опсегот со Excel VBA тогаш сте слетале на вистинското место. Постојат неколку лесни чекори за исчистување на содржината на опсегот со Excel VBA . Оваа статија ќе ви го покаже секој чекор со соодветни илустрации за да можете лесно да ги примените за вашата цел. Ајде да навлеземе во централниот дел на статијата.

Преземете ја работната книга за вежбање

Можете да ја преземете работната книга за вежбање од тука:

Исчистете ја содржината на опсегот .xlsm

Исчистете ја содржината на опсегот со Excel VBA: 3 случаи

Да претпоставиме дека имате база на податоци што можеби ќе сакате повторно да ја користите бришејќи ги постоечките ќелии. Значи, можете да користите VBA код за да ја исчистите содржината на датотеката Excel. Во овој дел, ќе ви ги покажам брзите и лесните методи за исчистување на содржината на опсегот со Excel VBA на оперативниот систем Windows. Во оваа статија ќе најдете детални објаснувања со јасни илустрации за секоја работа. Тука ја користев верзијата на Microsoft 365 . Но, можете да користите кои било други верзии по ваша достапност. Ако нешто од оваа статија не работи во вашата верзија, тогаш оставете ни коментар.

Случај 1: Избришете ги сите содржини од опсегот

Можете да го користите и командата Clear и командата Delete за да се исчисти содржината на одреден опсег во тековниот работен лист или други работни листови дури и од други работни книги. јас ќеви ги прикажуваме сите случаи еден по еден.

i. Исчистете ја содржината на специфичниот опсег на ќелии

Ако сакате да ја исчистите содржината на одреден опсег, тогаш следете ги чекорите подолу:

📌 Чекори:

  • За ова, прво, одете на горната лента и притиснете на Програмер , а потоа притиснете на опцијата Visual Basic од менито.
  • Вие може да користи ALT + F11 за да го отвори прозорецот „Microsoft Visual Basic за апликации“ ако не сте го додале табот Програмер.

  • Сега, ќе се појави прозорец со име „Microsoft Visual Basic за апликации“ . Тука од горната лента со мени, притиснете на „Вметни“ И ќе се појави мени. Од нив, изберете ја опцијата „Модул“ .

  • Сега, нов „Модул“ ќе се појави прозорец. И Залепете го овој VBA код во полето.

Користете ја командата Clear:

1298

  • За да го извршите кодот, одете до горното мени, притиснете ја опцијата Изврши и тука ќе се отворат некои други опции и изберете Изврши под/корисничка форма исто така, можете едноставно да притиснете F5 за да го извршите кодот.

  • Користејќи ја командата Исчисти , ќелиите ќе бидат избришани, исто така ќе се отстрани и форматирањето. Но, празните ќелии ќе бидат таму.

Користење на командата за бришење:

Можете и да го користите Избришете ја командата наместо командата Исчисти . Потоа залепете госледниот код во модулот.

6082

Користејќи ја командата Избриши, кога ќе го извршите кодот, избраниот опсег на ќелии ќе биде отстранет целосно.

Прочитајте повеќе: Excel VBA: исчистете ја содржината ако ќелијата содржи специфични вредности

Разлика помеѓу Clear and Delete Command во Excel VBA:

Клучната разлика помеѓу наредбите Clear и Delete во Excel VBA е тоа што Избриши командата го отстранува одбраниот опсег на ќелии целосно и командата Clear ги отстранува само вредноста на ќелијата и форматирањето, но празната ќелија ќе биде таму.

ii. Исчистете ја содржината на целосниот работен лист

Ако сакате да ги исчистите сите ќелии од работниот лист, тогаш користете го овој код даден подолу. Овде, ја чистам содржината од работниот лист со име „1.2“. Мора да внесете името на работниот лист што сакате да го избришете во превртените запирки.

4504

Исто така, можете да ја користите командата Избриши за да ги отстраните сите користени ќелии во работниот лист. Потоа, треба да го користите кодот даден подолу. Само, сменете го името на работниот лист во превртените запирки.

5531

iii. Исчистете ја содржината на активниот работен лист

Понекогаш можеби ќе треба да ја исчистите содржината само на активниот работен лист. Во овој случај, мора да внесете едноставен код даден подолу:

1677

Можете да ја користите и командата delete за целосно отстранување на ќелиите одактивен работен лист. за ова, залепете го следниов код во модулот.

Sub Delete_Contents_Range()

ActiveSheet.Cells.Delete

End Sub

Прочитај повеќе: Разлика помеѓу бришење и бришење содржини во Excel

Случај 2: Исчистете ја содржината на опсегот задржувајќи го форматирањето

Во претходните методи, забележавте дека отстранувате вредностите на ќелиите долж форматирањата на ќелиите исто така. Значи, ако сакате да ги отстраните вредностите на ќелиите само додека го одржувате форматирањето исто.

т.е. Содржини од специфичен опсег

Можете да ја користите командата ClearContents во Excel VBA за да ја исчистите содржината на одреден опсег. За ова, залепете го следниов код во модулот.

3574

Како резултат на тоа, кога ќе го извршите кодот, ќе видите дека избраните ќелии се избришани, но форматите сè уште остануваат .

Прочитајте повеќе: Како да ги исчистите ќелиите со одредена вредност во Excel (2 начини)

ii. Содржина на специфичен работен лист

Кога сакате да ја исчистите содржината на конкретниот работен лист додека ги одржувате форматите исти, мора да го користите следниов код подолу:

5810

сакате да повикате работен лист со кое било друго име, потоа вметнете го името на работниот лист во превртените запирки.

  • И, Range(“B2:D4”) го одредува опсегот на клеткишто ќе се исчисти. Можете да го уредите опсегот на ќелиите според вашата потреба.
  • iii. Содржини од друга работна книга

    Можете и да ја исчистите содржината на друга работна книга со користење на VBA кодот. Но, за ова, мора да да ја задржите таа работна книга отворена . Користете го следниот код подолу за ова:

    2970

    🔎 Објаснување на VBA код:

    • Работни книги („датотека 1“) ја повикува работната книга со име „Датотека 1“. Додека ги користите вашите работни книги, треба да го вметнете името на работната книга во превртените запирки.
    • Работни листови („Лист 1“) го повикува работниот лист со име „Лист 1“. За да повикате кој било друг работен лист, само вметнете го името на работниот лист наместо „Лист 1“ во овој код.
    • И, Опсег („B3:D13“) го одредува опсегот на ќелиите што ќе се исчистат. Можете да го уредувате опсегот на ќелиите по ваша потреба.

    Прочитајте повеќе: Како да ја исчистите содржината без бришење формули користејќи VBA во Excel

    Случај 3: Исчистете ја содржината на специфичен опсег на сите работни листови одеднаш

    Ако треба да ја исчистите содржината од одреден опсег од повеќе работни листови можете да го направите тоа одеднаш користејќи код VBA . За да ја извршите оваа задача, треба да користите јамка For. Залепете го овој код во модулот за да ја исчистите содржината на опсегот B2:D4 од сите работни листови. Ако сакате да го промените опсегот на ќелиите, тогаш изменете ја 4-талинија и вметнете го вашиот опсег на податоци.

    6869

    Работи што треба да се запаметат

    • Користењето на командата Исчисти само ќе исчистете ги вредностите и форматите на ќелиите.
    • Избриши командата целосно ќе ги отстрани ќелиите.
    • ClearContents командата ќе ги избрише вредностите само на ќелиите и чувајте ги форматите на ќелиите недопрени.

    Заклучок

    Во оваа статија, откривте како да исчистите содржината на опсегот со Excel VBA . Се надевам дека оваа статија ви беше корисна. Можете да ја посетите нашата веб-локација ExcelWIKI за да дознаете повеќе содржини поврзани со Excel. Ве молиме, искажете ги коментарите, предлозите или прашањата доколку имате во делот за коментари подолу.

    Хју Вест е високо искусен тренер и аналитичар на Excel со повеќе од 10 години искуство во индустријата. Има диплома за сметководство и финансии и магистер по бизнис администрација. Хју има страст за предавање и има развиено уникатен пристап на наставата кој е лесен за следење и разбирање. Неговото стручно познавање на Excel им помогна на илјадници студенти и професионалци ширум светот да ги подобрат своите вештини и да се истакнат во нивните кариери. Преку својот блог, Хју го споделува своето знаење со светот, нудејќи бесплатни упатства за Excel и онлајн обука за да им помогне на поединците и бизнисите да го достигнат својот целосен потенцијал.