Excel makro, lai noteiktu, vai darbgrāmata pastāv

Šis Excel makro ļauj nodot faila ceļu, lai novērtētu, vai fails tur ir. Piemēram, jums var būt process, kas manipulē ar failu kaut kur jūsu datorā. Piemēram, jums var būt nepieciešams atvērt esošu darbgrāmatu, lai katru dienu tai pievienotu datus. Šādā gadījumā jums, iespējams, būs jāpārbauda, ​​vai fails, ar kuru vēlaties manipulēt, pastāv.

Kā darbojas makro

Pirmā lieta, kas jāpamana saistībā ar šo makro, ir tā, ka tā ir funkcija, nevis apakšprocedūra. Padarot šo makro par funkciju, varat tam nodot jebkuru faila ceļu.

Šajā makro tiek izmantota funkcija Dir, kas atgriež virkni, kas apzīmē faila nosaukumu, kas atbilst tam, ko tam nosūtāt. Šo funkciju var izmantot daudzos veidos, taču šeit jūs to izmantojat, lai pārbaudītu, vai faila ceļš, kuru nododat tai, pastāv:

Funkcija FileExists(FPath As String) Kā Būla
1. darbība: deklarējiet savus mainīgos
    Dim FName kā virkne
2. darbība: izmantojiet funkciju Dir, lai iegūtu faila nosaukumu
    FName = Dir(FPath)
'3. darbība. Ja fails pastāv, atgrieziet True; citādi Nepatiesi
    Ja FName <> " Tad FileExists = True _
    Cits: FileExists = False
Beigu funkcija

1. darbība deklarē virknes mainīgo, kurā ir faila nosaukums, kas tiek atgriezts no funkcijas Dir. FName ir mainīgā String nosaukums.

2. darbībā jūs mēģināt iestatīt mainīgo FName. To var izdarīt, nododot mainīgo FPath funkcijai Dir. Šis FPath mainīgais tiek nodots, izmantojot funkciju deklarācijas (skatiet koda pirmo rindiņu). Šī struktūra neļauj jums stingri kodēt faila ceļu, tā vietā nododot to kā mainīgo.

Ja mainīgo FName nevar iestatīt, jūsu izietais ceļš neeksistē. Tādējādi mainīgais FName ir tukšs. 3. darbība tikai pārvērš šo rezultātu izteiksmē Patiess vai Nepatiess.

Atkal, šo funkciju var izmantot, lai novērtētu jebkura faila ceļu, kuru tam nododat. Tas ir makro rakstīšanas kā funkcijas skaistums.

Šis makro parāda, kā izmantot šo funkciju:

Apakšmakro1()
    Ja FileExists("C:TempMyNewBook.xlsx") = Patiess, tad
        MsgBox "Fails pastāv."
    Citādi
        MsgBox "Fails neeksistē."
    Beigas Ja
Beigt apakš

Kā lietot makro

Lai ieviestu šo makro, varat kopēt un ielīmēt abas koda daļas standarta modulī:

Aktivizējiet Visual Basic redaktoru, nospiežot Alt+F11.

Ar peles labo pogu noklikšķiniet uz projekta/darbgrāmatas nosaukuma projekta logā.

Izvēlieties Ievietot → Modulis.

Ierakstiet vai ielīmējiet kodu jaunizveidotajā modulī.


Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows

Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows

Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows Microsoft Word atver failus tikai lasīšanas režīmā, padarot tos neiespējamu rediģēt? Neuztraucieties, metodes ir norādītas zemāk

Kā novērst nepareizu Microsoft Word dokumentu drukāšanu

Kā novērst nepareizu Microsoft Word dokumentu drukāšanu

Kā labot kļūdas, drukājot nepareizus Microsoft Word dokumentus.Kļūdas Word dokumentu drukāšanā ar mainītiem fontiem, nekārtīgām rindkopām, trūkstoša teksta vai pazaudētu saturu ir diezgan izplatītas. Tomēr nevajag

Izdzēsiet pildspalvas un marķiera zīmējumus savos PowerPoint slaidos

Izdzēsiet pildspalvas un marķiera zīmējumus savos PowerPoint slaidos

Ja prezentācijas laikā esat izmantojis pildspalvu vai marķieri, lai zīmētu uz PowerPoint slaidiem, varat saglabāt zīmējumus nākamajai prezentācijai vai izdzēst tos, lai nākamajā reizē, kad to parādīsit, jūs sāktu ar tīriem PowerPoint slaidiem. Izpildiet šos norādījumus, lai dzēstu pildspalvas un marķiera zīmējumus: Līniju dzēšana pa vienai […]

Veidojiet bibliotēkas saturu programmā SharePoint 2010

Veidojiet bibliotēkas saturu programmā SharePoint 2010

Stilu bibliotēkā ir CSS faili, paplašināmās stila lapu valodas (XSL) faili un attēli, ko izmanto iepriekš definētas šablona lapas, lapu izkārtojumi un vadīklas programmā SharePoint 2010. Lai atrastu CSS failus publicēšanas vietnes stilu bibliotēkā: izvēlieties Vietnes darbības → Skatīt Viss vietnes saturs. Tiek parādīts vietnes saturs. Stila bibliotēka atrodas […]

Formatējiet skaitļus tūkstošos un miljonos Excel pārskatos

Formatējiet skaitļus tūkstošos un miljonos Excel pārskatos

Nepārsedziet savu auditoriju ar milzīgiem skaitļiem. Programmā Microsoft Excel varat uzlabot informācijas paneļu un pārskatu lasāmību, formatējot skaitļus tā, lai tie tiktu rādīti tūkstošos vai miljonos.

Kā koplietot un sekot līdzi SharePoint vietnēm

Kā koplietot un sekot līdzi SharePoint vietnēm

Uzziniet, kā izmantot SharePoints sociālo tīklu rīkus, kas ļauj indivīdiem un grupām sazināties, sadarboties, koplietot un sazināties.

Kā programmā Excel konvertēt datumus Juliana formātos

Kā programmā Excel konvertēt datumus Juliana formātos

Jūlija datumi ražošanas vidēs bieži tiek izmantoti kā laikspiedols un ātra atsauce partijas numuram. Šāda veida datuma kodēšana ļauj mazumtirgotājiem, patērētājiem un pakalpojumu aģentiem noteikt produkta izgatavošanas laiku un līdz ar to arī produkta vecumu. Jūlija datumi tiek izmantoti arī programmēšanā, militārajā jomā un astronomijā. Savādāk […]

Kā izveidot Access Web App

Kā izveidot Access Web App

Programmā Access 2016 varat izveidot tīmekļa lietotni. Kas tad vispār ir tīmekļa lietotne? Tīmeklis nozīmē, ka tas ir tiešsaistē, un lietotne ir tikai “lietojumprogrammas” saīsinājums. Pielāgota tīmekļa lietotne ir tiešsaistes datu bāzes lietojumprogramma, kurai var piekļūt no mākoņa, izmantojot pārlūkprogrammu. Jūs veidojat un uzturat tīmekļa lietotni darbvirsmas versijā […]

Ātrās palaišanas josla programmā SharePoint 2010

Ātrās palaišanas josla programmā SharePoint 2010

Lielākā daļa SharePoint 2010 lapu ātrās palaišanas joslā lapas kreisajā pusē parāda navigācijas saišu sarakstu. Ātrās palaišanas joslā tiek rādītas saites uz piedāvāto vietņu saturu, piemēram, sarakstiem, bibliotēkām, vietnēm un publicēšanas lapām. Ātrās palaišanas joslā ir divas ļoti svarīgas saites: Visa vietnes satura saite: […]

Ko nozīmē risinātāja kļūdu ziņojumi programmā Excel?

Ko nozīmē risinātāja kļūdu ziņojumi programmā Excel?

Vienkāršām problēmām risinātājs programmā Excel parasti ātri atrod optimālās Risinātāja mainīgā vērtības mērķa funkcijai. Taču dažos gadījumos Solver ir grūti atrast Solver mainīgā vērtības, kas optimizē mērķa funkciju. Šādos gadījumos Solver parasti parāda ziņojumu vai kļūdas ziņojumu, kurā aprakstīta vai apspriesta problēma, ko […]