Hvis du arbejder med Microsoft Office Excel ofte er det godt at vide, hvordan man bruger " ActiveCell " ejendom for at tilføje , få , og selv ændre formatet på data i et regneark . Visual Basic for Applications ( VBA ) er en computer programmeringssprog, der anvendes til at automatisere rutineopgaver. I VBA kan du bruge " ActiveCell " ejendom for at foretage ændringer til dine data. Med VBA kan du spare tid ved at automatisere en proces i stedet for at udføre den samme opgave manuelt. Instruktioner
1
Launch Microsoft Office Excel , skal du klikke på "Udvikler " fanen, og klik på " Visual Basic ".
2
Klik på " Indsæt" menuen og klikke på " Modul "for at indsætte en ny kode modul. Indtast følgende kode for at starte et nyt sub procedure : Hej
Private Sub usingActiveCell ()
3
Kopier og indsæt følgende for at aktivere " Ark1 : "
< . p> regneark ( " Ark1 " ) Aktiver
4
Kopier og indsæt følgende for at føje en værdi til "A1 ", " A2 " og " A3: "
Range ( "A1 "). Vælg
ActiveCell.Value = 3,5
Range (" A2 "). Vælg
ActiveCell.Value = 10
Range . ( " A3 " ) Vælg
ActiveCell.Value = 20
5
Kopier og indsæt følgende for at fremhæve cellerne med data : Hej
ActiveCell < br >
Range ( Cells (række, CurrentRegion.Column ) , celler ( Row, CurrentRegion.Columns.Count + CurrentRegion.Column - . . . . . 1. ) ) . Interior.ColorIndex = 8
Range ( Celler ( CurrentRegion.Row , kolonne ) , celler ( CurrentRegion.Rows.Count + CurrentRegion.Row - . . . . . 1, kolonne ) ) . Interior.ColorIndex = 8
End With
< p> Application.ScreenUpdating = Sand
6
Kopier og indsæt følgende for at vise værdierne tilføjes gennem " Immediate Window: " .
Range (" A1" ) Vælg < br >
Debug.Print ActiveCell.Value
Range (" A2 "). Vælg
Debug.Print ActiveCell.Value
Range (" A3 "). Vælg
Debug.Print ActiveCell.Value
7
Kopier og indsæt følgende for at afslutte sub procedure : Hej
End sub
8 < p > Tryk på " Ctrl" og "G " for at vise " Immediate Window" og tryk på " F5 " for at køre proceduren.