ВБА Делете Филе | Како избрисати датотеке из мапе помоћу ВБА кода?
У ВБА можемо избрисати било коју датотеку присутну на рачунару помоћу ВБА кодова, а код који се користи за брисање било које датотеке познат је под називом Килл цомманд, метод брисања било које датотеке је тај да прво пружамо пут до датотеке што значи где датотека се налази у рачунару и тада користимо команду Килл да бисмо је избрисали.
Како избрисати датотеке помоћу ВБА кода?
ВБА је на почетку тешка ствар, али како проводите више времена са ВБА, почећете да је волите баш као и ја. Можемо отворити датотеке из другог директоријума рачунара, можемо радити са њима, а сада можемо и брисати датотеке помоћу ВБА кодирања. У овом чланку ћемо вам показати како можете да избришете датотеке помоћу ВБА кода у одређеној фасцикли.
Када радимо са великим пројектима, обично креирамо пуно посредничких датотека које подржавају наш процес. Након обављеног посла морамо да избришемо те датотеке како бисмо избегли било какву забуну у будућности.
А један од сценарија је када обично примимо е-пошту, сачувамо прилоге за редован посао или само желимо да видимо извештај за тај тренутак, а касније ћемо можда морати да избришемо те датотеке.
Ручно брисање тих датотека одузеће време или ћемо можда заборавити да сачувамо и заузеће простор на нашем рачунару. Показаћемо вам како да избришете те датотеке једноставним ВБА кодовима.
Метода убиства за брисање датотека у фасцикли помоћу ВБА кода
Једноставна функција КИЛЛ избрисаће фасциклу, одређену датотеку, све екцел датотеке итд. Погледајте синтаксу методе КИЛЛ у ВБА. Метода убиства не може избрисати датотеке само за читање.
Назив путање: патхнаме није ништа друго до пут до фолдера на рачунару за брисање датотека.
Белешка: Име пута може садржати и џокер знакове. Звездицу (*) и знакове питања (?) Можемо користити као џокер знакове у Екцелу.
Звездица (*) је корисна за подударање са било којим низом било које дужине, чак и када се сматра нула.
Знак питања (?) Користан је за подударање само једног знака.
Избришите одређено име датотеке
На пример, имам фасциклу као испод.
У овој фасцикли желим да избришем датотеку названу „Филе 5“. Покрените код помоћу функције КИЛЛ.
Шифра:
Суб Делете_Филес () Килл (ПатхНаме) Крај Суб
Копирајте и налепите путању до фасцикле.
И налепите у двоструким наводницима.
Убијте „Е: \ Екцел датотеке“
Сада ставите још једну косу црту уназад (\) и унесите име датотеке са наставком.
Убијте „Е: \ Екцел Филес \ Филе5.клск“
Када покренете овај код, он ће избрисати датотеку названу „Филе 5.клск“ у поменутој путањи до фасцикле.
Избришите све Екцел датотеке
Да бисмо избрисали све екцел датотеке у директоријуму помоћу ВБА, морамо да користимо џокер знакове са функцијом КИЛЛ. Након помињања путање до директоријума, датотеку морамо споменути као “* .кл *”
Шифра:
Убијте „Е: \ Екцел датотеке \ *. Ксл *“
Када покренете овај код, тиме ће се избрисати све екцел датотеке у фасцикли.
Видели смо како можемо избрисати једну екцел датотеку и све екцел датотеке. Али ако желимо да избришемо све датотеке у фасцикли, како да их избришемо. Будући да користимо Екцел ВБА, може ли избрисати друге датотеке?
Одговор је ДА !!! Користите доњи код да бисте избрисали све датотеке у фасцикли.
Шифра:
Убијте „Е: \ Екцел датотеке \ *. *“
Избриши само целу фасциклу
Да ли је могуће избрисати целу фасциклу?
Да, могуће је.
Да бисмо то урадили, прво што треба да урадимо је да избришемо све датотеке у фасцикли помоћу функције КИЛЛ, а затим да бисмо избрисали мапу треба да користимо још једну функцију тзв. РмДир.
Шифра:
РмДир "Е: \ Екцел датотеке \"
Ево РмДир ће обрисати само празну фасциклу, ако постоји било која подмапа, не може их избрисати.
Избришите све текстуалне датотеке у фасцикли
Да бисте избрисали све текстуалне датотеке у фасцикли, користите доњи код.
Шифра:
Убијте „Е: \ Екцел датотеке \ *. Ткт“
Избришите датотеке само за читање
Као што сам рекао, функција КИЛЛ не може избрисати датотеке само за читање у фасцикли. У таквом случају морамо користити друге две функције „Дир $“ и „СетАттр“ функције. Испод је пример кода за брисање и датотека само за читање.
Шифра:
Под Делете_Филес1 () Дим ДелетеФиле Ас Стринг ДелетеФиле = "Е: \ Екцел Филес \" Иф Лен (Дир $ (ДелетеФиле))> 0 Затим СетАттр ДелетеФиле, вбНормал Килл ДелетеФиле Енд Иф Енд Суб
Ову ВБА Избриши датотеку Екцел предлошка можете преузети одавде - ВБА Избриши датотеку Екцел предлошка
