Данашњи водич за аутоматизацију система Оффице фокусиран је на учење како да проверите да ли датотека постоји у једном од директоријума вашег рачунара.
Припрема
Ако сте донекле нови у кодирању, уверите се да је картица за развој Мицрософт Оффице Екцел-а омогућена и да сте упознати са неким основним Екцел ВБА .
Проверавање да ли датотека постоји са Екцел ВБА
Следећи код користи оквире за унос како би ухватио путању до датотеке као и само име датотеке од корисника.
Затим користи методу Дир да би проверио да ли путања датотеке заиста постоји.
На крају, кориснику приказује оквир са поруком са резултатом провере.
Sub Check_file_exists()
Dim NameDir As String
Dim NameFile As String
'Capture the file path and name from the users
NameDir = InputBox("Enter file directory")
NameFile = InputBox("Enter file name")
'Check whether the file exists
If (Dir(NameDir & NameFile)) = "" Then
MsgBox ("File doesn't exist")
Else
MsgBox ("File exists")
End If
End SubПроверите да ли постоји фасцикла
На сличан начин можете проверити да ли одређена фасцикла постоји у вашем оперативном систему. Такође овде користимо метод Дир , али са параметром вбДирецтори .
Sub Check_folder_exists()
Dim NameDir As String
NameDir = InputBox("Enter file directory")
If (Dir(NameDir, vbDirectory)) = "" Then
MsgBox ("Folder doesn't exist")
Else
MsgBox ("Folder exists")
End If
End SubКоришћење кода
Могућа проширења
Шифра котловске плоче изнад може се проширити за следеће случајеве употребе:
Koristite besplatni Excel alat za praćenje iznajmljene nekretnine kako biste organizovali prihode, rashode, nekretnine i mesečni novčani tok. Naučite šta beležiti, kako ga podesiti i koje greške izbegavati.
Koristite ovaj besplatni, spremni za kopiranje predložak prezentacije statusa Agile projekta kako biste prikazali napredak, rizike, odluke i sljedeće korake, a da ažuriranja ne pretvorite u šum.
Snimanje ekrana u PowerPointu ima video, ali nema zvuka? Proverite kontrolu zvuka, pristup mikrofonu u Windowsu, podešavanja ulaza, kompatibilnost reprodukcije, ažuriranja i popravku.
Izradite besplatni Excel raspored smena zaposlenih sa automatskim obračunom sati, obradom noćnih smena, odbijanjem pauza, nedeljnim zbirima, oznakama za planiranje prekovremenog rada i pregledom tima spremnim za štampu.
Izradite besplatni predložak fakture u Excelu koji automatski obračunava oporezive iznose, porez na promet i ukupne iznose. Uporedite postavke sa jednom stopom, tabelom pretrage i porezom po stavci, i saznajte kada Excel više nije dovoljan.
Konvertujte PDF u editabilni Word uz najmanji gubitak formatiranja koristeći Word ili Acrobat. Saznajte kada direktna konverzija funkcioniše, kada je potreban OCR i kako popraviti tabele, fontove i prelome stranica.
Izradite štampivu procenu građevinskih radova u Excelu sa obimom, materijalima, radnom snagom, opštim troškovima, rezervom, maržom, porezom i ukupnim iznosima spremnim za štampu—uz formule i greške koje treba izbegavati.
Izgradite praktičan alat za praćenje potencijalnih klijenata u Excelu sa tabelom, padajućim menijima za faze, datumima za naknadnu komunikaciju, oznakama za kašnjenje, filterima i jednostavnim pregledom prodajnog levka—plus znaci da je vreme za prelazak na CRM.
Naučite kako da koristite šablon za dnevno blokiranje vremena u PDF formatu za štampu pri radu od kuće: planirajte blokove fokusa, sastanke, pauze, rezerve i pravilno ga odštampajte.
Uporedite HubSpot Free CRM i Zoho CRM za samostalne agente nekretnina, uključujući kontakte, e-poštu, tokove prodaje, prilagođavanje, automatizaciju, mobilnu upotrebu i kompromise pri nadogradnji.
