VBA brukes i Excel for å lage makroer som automatiserer oppgaver som normalt gjøres manuelt . Gjennomføre disse oppgavene manuelt kan være tidkrevende og tungvint. Mange ganger brukerne trenger for å kopiere og lime inn data i Excel fra tekstfiler . Bare å kopiere og lime inn data fra en tekstfil til Excel vil ikke resultere i riktig formatert data . Den OpenText metoden brukes til å laste inn en tekstfil og analysere den . Et regneark er laget med de analyserte data . Denne metoden eliminerer behovet for brukeren å manuelt importere tekstfilen og gå gjennom "Text Import Wizard" . Instruksjoner
en
Åpne en ny arbeidsbok . Trykk Alt og F11 på tastaturet for å åpne VBA editor. Klikk på Fil-menyen og velg "New" . Dobbeltklikk på Sheet ( Ark1 ) i henhold til Microsoft Excel- objekter i Prosjekt - VBAProject vindusrute.
2
Type Sub , etterfulgt av makroen navn i første linje, for eksempel Sub Åpen ( ) . Du kan gi makroen et navn du ønsker
3
Legg til OpenText metoden oppgir denne informasjonen : .
En . Katalogen filen ligger in.2 . Rad nummer du ønsker begynne å importere dataene i. Filen opprinnelse er 437 : OEM USA som standard hvis du er i Norge States.3 . Velg om du ønsker å lese filen i en avgrenset versus fast bredde . Med avgrenset, må du spesifisere hva skilletegn er å lese filen , slik som fane , semikolon , komma, mellomrom , eller en tilpasset skilletegn . Still skilletegn du vil bruke til TRUE , og resten av skilletegn til FALSE .
For eksempel, hvis vi ønsker å analysere en tekstfil som ligger på John Smiths skrivebordet , atskilt med faner , ville vi bruke følgende kode :
Workbooks.OpenText Filnavn : = _ " C: \\ Documents and Settings \\ jsmith \\ Desktop \\ info.txt " , Origin : = 437 , StartRow _ : = 1 , DataType : = xlDelimited , TextQualifier : = xlDoubleQuote , _ConsecutiveDelimiter : = False , Tab : = Sant, Semicolon : = False , Comma : = False _ , Space: = False , Andre : = False , FieldInfo : = Array ( 1 , 1 ) , _TrailingMinusNumbers : = sant
4
End makroen ved å skrive "End Sub " . Lagre makroen ved å klikke på Lagre-knappen på verktøylinjen. Lukk Visual Basic -vinduet .
5
Kjør makroen ved å klikke på kategorien Vis i verktøylinjen. Klikk på makroer , og velg makroen. Klikk på " Kjør"-knappen .
