Bruke Visual Basic til å velge data i Microsoft Excel

Forfatter: Christy White
Opprettelsesdato: 7 Kan 2021
Oppdater Dato: 1 Juli 2024
Anonim
Calling All Cars: Missing Messenger / Body, Body, Who’s Got the Body / All That Glitters
Video: Calling All Cars: Missing Messenger / Body, Body, Who’s Got the Body / All That Glitters

Innhold

Denne wikiHow lærer deg hvordan du bruker Visual Basic til å velge data i Microsoft Excel. Så lenge du er kjent med det grunnleggende i VB-skript og bruken av mer avanserte funksjoner i Excel, vil du finne valgskriptene ganske enkle.

Å trå

Metode 1 av 3: Velg individuelle celler

  1. Velg en celle i det aktuelle regnearket. Anta at du vil velge celle E6 med Visual Basic. Du kan gjøre dette med en av følgende kommandoer:

    ActiveSheet.Cells (6, 5) .Velg

    ActiveSheet.Range ("E6"). Velg

  2. Velg en celle i et annet regneark i samme arbeidsbok. La oss si at eksempelcellen vår, E6, er på et ark som heter Sheet2. Du kan bruke en av følgende metoder for å velge den:

    Application.Goto ActiveWorkbook.Sheets ("Sheet2"). Celler (6, 5)

    Application.Goto (ActiveWorkbook.Sheets ("Sheet2"). Range ("E6"))

  3. Velg en celle på et regneark i en annen arbeidsbok. La oss si at du vil velge en celle fra Ark1 i en arbeidsbok som heter BOOK2.XLS. En av disse to måtene skal fungere:

    Application.Goto Workbooks ("BOOK2.XLS"). Ark ("Sheet1"). Celler (2,1)

    Application.Goto arbeidsbøker ("BOOK2.XLS"). Ark ("Sheet1"). Område ("A2")

  4. Velg en celle i forhold til en annen celle. Du kan bruke VB til å velge en celle basert på plasseringen i forhold til den aktive (eller en annen) cellen. Bare vær sikker på at cellen eksisterer for å unngå feil. Dette gjøres som følger:
    • Velg cellen tre rader nedenfor og fire kolonner til venstre for den aktive cellen:

      ActiveCell.Offset (3, -4) .Velg

    • Velg cellen fem rader nedenfor og fire kolonner til høyre for celle C7:

      ActiveSheet.Cells (7, 3). Offset (5, 4). Velg

Metode 2 av 3: Velg områder

  1. Velg et celleområde på det aktive regnearket. For å velge celler C1: D6 på det aktuelle regnearket, bruk en av følgende tre metoder:

    ActiveSheet.Range (celler (1, 3), celler (6, 4)). Velg

    ActiveSheet.Range ("C1: D6"). Velg

    ActiveSheet.Range ("C1", "D6"). Velg

  2. Velg en serie fra et annet regneark i samme arbeidsbok. Du kan bruke et av disse eksemplene til å velge celler C3: E11 på et ark som heter Sheet3:

    Application.Goto ActiveWorkbook.Sheets ("Sheet3"). Range ("C3: E11")

    Application.Goto ActiveWorkbook.Sheets ("Sheet3"). Range ("C3", "E11")

  3. Velg et celleområde fra et regneark i en annen arbeidsbok. Begge eksemplene skal velge celler E12: F12 på ark 1 i en arbeidsbok kalt BOOK2.XLS:

    Application.Goto arbeidsbøker ("BOOK2.XLS"). Ark ("Sheet1"). Område ("E12: F12")

    Application.Goto arbeidsbøker ("BOOK2.XLS"). Ark ("Sheet1"). Område ("E12", "F12")

  4. Velg et navngitt område. Hvis du har tilordnet et navn til et celleområde, bruk samme syntaks som i trinn 4-6, men erstatt adressen til området (f.eks. 'E12', 'F12') med rekkevidden (f.eks. 'Salg') ). Her er noen eksempler:
    • På det aktive regnearket:

      ActiveSheet.Range ("Salg"). Velg

    • Annet regneark i samme arbeidsbok:

      Application.Goto ActiveWorkbook.Sheets ("Sheet3"). Område ("Salg")

    • Annen arbeidsbok:

      Application.Goto arbeidsbøker ("BOOK2.XLS"). Ark ("Sheet1"). Område ("Salg")

  5. Velg et område i forhold til et navngitt område. Syntaksen varierer avhengig av plasseringen til det nevnte området og om du vil justere størrelsen på det nye området.
    • Hvis rekkevidden du vil velge, er av samme størrelse som en dyse Test5 kalles, men flyttet fire rader ned og tre kolonner til høyre, bruk deretter følgende kode:

      ActiveSheet.Range ("Test5"). Offset (4, 3) .Velg

    • Hvis rekkevidden er på Ark3 i samme arbeidsbok, må du først aktivere regnearket og deretter velge området som følger:

      Ark ("Sheet3"). Aktiver ActiveSheet.Range ("Test"). Offset (4, 3) .Velg

  6. Velg et område og endre størrelsen på valget. Du kan øke størrelsen på et valgt område om nødvendig. Hvis du vil velge et område som Database og deretter ønsker å øke størrelsen med fem rader, vil du bruke denne syntaksen:

    Område ("Database"). Velg Selection.Resize (Selection.Rows.Count + 5, _Selection.Columns.Count) .Velg

  7. Velg sammenslutningen av to navngitte serier. Hvis du har to overlappende navngitte områder, kan du bruke VB til å velge cellene i den overlappende regionen ("unionen"). Begrensningen er at du bare kan gjøre dette på det aktive regnearket. La oss si at du har foreningen til en rekkevidde kalt God og en som heter Dårlig ønsker å velge:
    • Application.Union (Range ("Good"), Range ("Bad")). Velg

    • Hvis du vil velge delsett av to nevnte områder i stedet for det overlappende området, er det bare å erstatte det Søknad. Union gjennom Søknad. Kryss.

Metode 3 av 3: Velg dataene i "påfølgende" og "ikke sammenhengende" kolonner

  1. Bruk disse eksempeldataene til eksemplene i denne metoden. Dette diagrammet fullt av eksempeldata, med tillatelse fra Microsoft, vil hjelpe deg å visualisere hvordan eksemplene oppfører seg:
    A1: NavnB1: SalgC1: Mengde
    A2: a B2: € 10 C2: 5
    A3: b B3: C3: 10
    A4: c B4: € 10 C4: 5
    A5: B5: C5:
    A6: Totalt B6: € 20 C6: 20
  2. Velg den siste cellen nederst i en sammenhengende kolonne. I det følgende eksemplet er celle A4 valgt:

    ActiveSheet.Range ("A1"). Slutt (xlDown) .Velg

  3. Velg den første tomme cellen under en kolonne med sammenhengende celler. Følgende eksempel velger A5 basert på diagrammet ovenfor:

    ActiveSheet.Range ("A1"). End (xlDown). Offset (1.0). Velg

  4. Velg et område med påfølgende celler i en kolonne. I begge følgende eksempler er området A1: A4 valgt:

    ActiveSheet.Range ("A1", ActiveSheet.Range ("a1"). Slutt (xlDown)). Velg

    ActiveSheet.Range ("A1:" & ActiveSheet.Range ("A1"). Slutt (xlDown). Adresse). Velg

  5. Velg en hel rekke ikke-påfølgende celler i en kolonne. Ved hjelp av datatabellen øverst på denne metoden vil begge følgende eksempler velge A1: A6:

    ActiveSheet.Range ("A1", ActiveSheet.Range ("A65536"). Slutt (xlUp)). Velg

    ActiveSheet.Range ("A1", ActiveSheet.Range ("A65536"). Slutt (xlUp)). Velg

Tips

  • Egenskapene "ActiveSheet" og "ActiveWorkbook" kan vanligvis utelates hvis det aktive arket og / eller arbeidsboken (e) er underforstått.