Denne Excel-makroen lar deg sende en filbane for å vurdere om filen er der. For eksempel kan du ha en prosess som manipulerer en fil et sted på PC-en. For eksempel kan det hende du må åpne en eksisterende arbeidsbok for å legge til data til den på daglig basis. I dette tilfellet må du kanskje teste for å se om filen du må manipulere eksisterer.
Det første å legge merke til med denne makroen er at det er en funksjon, ikke en Sub-prosedyre. Ved å gjøre denne makroen til en funksjon kan du sende hvilken som helst filbane til den.
I denne makroen bruker du Dir-funksjonen, som returnerer en streng som representerer navnet på filen som samsvarer med det du sender til den. Denne funksjonen kan brukes på mange måter, men her bruker du den til å sjekke om filbanen du sender til den eksisterer:
Funksjon FileExists(FPath As String) Som boolsk
'Trinn 1: Deklarer variablene dine
Dim F-navn som streng
'Trinn 2: Bruk Dir-funksjonen for å få filnavnet
FName = Dir(FPath)
'Trinn 3: Hvis filen eksisterer, returner True; annet Falsk
Hvis FName <> " Da fileksisterer = True _
Else: FileExists = False
Avslutt funksjon
Trinn 1 erklærer en strengvariabel som inneholder filnavnet som returnerer fra Dir-funksjonen. FName er navnet på strengvariabelen.
I trinn 2 prøver du å angi FName-variabelen. Dette gjør du ved å sende FPath-variabelen til Dir-funksjonen. Denne FPath-variabelen sendes via funksjonsdeklarasjonene (se første linje i koden). Denne strukturen forhindrer at du må hardkode en filbane, og overføre den som en variabel i stedet.
Hvis FName-variabelen ikke kan angis, eksisterer ikke banen du passerte. Dermed er FName-variabelen tom. Trinn 3 oversetter bare resultatet til et sant eller usant uttrykk.
Igjen kan denne funksjonen brukes til å evaluere hvilken som helst filbane du sender til den. Dette er det fine med å skrive makroen som en funksjon.
Følgende makro viser hvordan du bruker denne funksjonen:
Sub Makro1()
If FileExists("C:TempMyNewBook.xlsx") = True Da
MsgBox "Filen finnes."
Ellers
MsgBox "Filen finnes ikke."
Slutt om
End Sub
For å implementere denne makroen kan du kopiere og lime inn begge kodebitene i en standardmodul:
Aktiver Visual Basic Editor ved å trykke Alt+F11.
Høyreklikk navnet på prosjektet/arbeidsboken i prosjektvinduet.
Velg Sett inn → Modul.
Skriv eller lim inn koden i den nyopprettede modulen.
Hvordan blokkere Microsoft Word fra å åpne filer i skrivebeskyttet modus på Windows Microsoft Word åpner filer i skrivebeskyttet modus, noe som gjør det umulig å redigere dem? Ikke bekymre deg, metodene er nedenfor
Slik fikser du feil ved utskrift av feil Microsoft Word-dokumenter Feil ved utskrift av Word-dokumenter med endrede fonter, rotete avsnitt, manglende tekst eller tapt innhold er ganske vanlig. Men ikke gjør det
Hvis du har brukt pennen eller merkepennen til å tegne på PowerPoint-lysbildene dine under en presentasjon, kan du lagre tegningene til neste presentasjon eller slette dem, slik at du neste gang du viser dem starter med rene PowerPoint-lysbilder. Følg disse instruksjonene for å slette penn- og merkepenntegninger: Slette linje én på […]
Stilbiblioteket inneholder CSS-filer, Extensible Stylesheet Language-filer (XSL) og bilder som brukes av forhåndsdefinerte mastersider, sideoppsett og kontroller i SharePoint 2010. For å finne CSS-filer i stilbiblioteket til et publiseringsnettsted: Velg Site Actions→ View Alt innhold på nettstedet. Innholdet på nettstedet vises. Style-biblioteket ligger i […]
Ikke overveld publikum med gigantiske tall. I Microsoft Excel kan du forbedre lesbarheten til dashbordene og rapportene dine ved å formatere tallene dine slik at de vises i tusenvis eller millioner.
Lær hvordan du bruker SharePoints sosiale nettverksverktøy som lar enkeltpersoner og grupper kommunisere, samarbeide, dele og koble til.
Julianske datoer brukes ofte i produksjonsmiljøer som et tidsstempel og hurtigreferanse for et batchnummer. Denne typen datokoding lar forhandlere, forbrukere og serviceagenter identifisere når et produkt ble laget, og dermed alderen på produktet. Julianske datoer brukes også i programmering, militæret og astronomi. Forskjellig […]
Du kan lage en nettapp i Access 2016. Så hva er en nettapp egentlig? Vel, nettet betyr at det er online, og appen er bare en forkortelse for "applikasjon". En Custom Web App er en online databaseapplikasjon som du får tilgang til fra skyen ved hjelp av en nettleser. Du bygger og vedlikeholder nettappen i skrivebordsversjonen […]
De fleste sidene i SharePoint 2010 viser en liste over navigasjonskoblinger på hurtigstartlinjen langs venstre side av siden. Hurtigstartlinjen viser koblinger til innhold på nettstedet som lister, biblioteker, nettsteder og publiseringssider. Hurtigstartlinjen inneholder to svært viktige lenker: Linken for alt nettstedinnhold: […]
For enkle problemer finner Solver i Excel vanligvis raskt de optimale Solver-variabelverdiene for objektivfunksjonen. Men i noen tilfeller har Solver problemer med å finne Solver-variabelverdiene som optimerer objektivfunksjonen. I disse tilfellene viser Solver vanligvis en melding eller en feilmelding som beskriver eller diskuterer problemet som […]
