Hvordan bruke ActiveCell i Excel ved hjelp av en VBA

Hvis du arbeider med Microsoft Office Excel ofte er det godt å vite hvordan du bruker "ActiveCell" eiendom for å legge til, få, og selv endre formatet på data i et regneark. Visual Basic for Applications (VBA) er et programmeringsspråk som brukes til å automatisere rutineoppgaver. I VBA kan du bruke "ActiveCell" eiendom å gjøre endringer i dine data. Med VBA kan du spare tid ved å automatisere en prosess i stedet for å utføre den samme oppgaven manuelt.

Bruksanvisning

1 Start Microsoft Office Excel, klikk på "Utvikler" fanen, og klikk på "Visual Basic."

2 Klikk på "Insert" -menyen og klikk "Module" å sette inn en ny kode modul. Skriv inn følgende kode for å starte en ny sub prosedyre:

Private Sub usingActiveCell ()

3 Kopier og lim inn følgende for å aktivere "Ark1:"

Regneark ( "Ark1"). Aktiver

4 Kopier og lim inn følgende for å legge til en verdi i "A1", "A2" og "A3:"

Range ( "A1"). Velg

ActiveCell.Value = 3,5

Range ( "A2"). Velg

ActiveCell.Value = 10

Range ( "A3"). Velg

ActiveCell.Value = 20

5 Kopier og lim inn følgende å markere celler med data:

med ActiveCell

Range(Cells(.Row, .CurrentRegion.Column), Cells(.Row, .CurrentRegion.Columns.Count + .CurrentRegion.Column - 1)).Interior.ColorIndex = 8

Range (Cells (.CurrentRegion.Row, .Column), Celler (.CurrentRegion.Rows.Count + .CurrentRegion.Row - 1, .Column)). Interior.ColorIndex = 8

End With

Application.ScreenUpdating = True

6 Kopier og lim inn følgende for å vise verdiene lagt gjennom "Immediate Window:"

Range ( "A1"). Velg

Debug.Print ActiveCell.Value

Range ( "A2"). Velg

Debug.Print ActiveCell.Value

Range ( "A3"). Velg

Debug.Print ActiveCell.Value

7 Kopier og lim inn følgende for å avslutte sub prosedyre:

End Sub

8 Trykk "Ctrl" og "G" for å vise "Immediate Window" og trykk "F5" for å kjøre prosedyren.