Yshopnoosa.com

Hur du använder VBA att gå till den sista raden i ett Excel-blad

Hur du använder VBA att gå till den sista raden i ett Excel-blad

Lära sig att använda Visual Basic för Applications (VBA) i Excel kan du spara tid när du söker efter data i ett kalkylblad. Microsoft Excel, ett kalkylbladsprogram som ingår i Microsoft Office, ger dig verktyg att enkelt analysera data med hjälp av formler för komplexa beräkningar. Använda VBA för att automatisera rutinuppgifter i Excel eller andra Microsoft Office-program.

Instruktioner

1 Öppna Microsoft Excel 2007, klicka på fliken "Utvecklare" och välj "Visual Basic."

Skriv "Sub goToLastRow()" och tryck "Enter" för att skapa en ny sub.

2 Skriv följande text för att skapa variabler:

"Dim lastRow As Integer

Dim X som heltal"

3 Typ "för X = 1 till 25

Range("A" & X).Select

ActiveCell.Value = "Adding data to row number: " & X

Nästa X

Range("A26"). Välj

ActiveCell.Value = ""

Range("A27"). Välj

ActiveCell.Value = "" "att skapa en loop som kommer att lägga till data i de 25 första raderna. Lägga till en "space" i de båda sista raderna.

4 Typ "lastRow = ActiveSheet.UsedRange.Rows.Count" att få den sista raden.

Typ "MsgBox." Den sista raden i det här arbetsbladet är: "& lastRow" att visa den sista raden genom en meddelanderuta.

5 Skriv "End Sub" om. Kör din nya sub och visas en meddelanderuta med "den sista raden i det här arbetsbladet är: 27".

Tips & varningar

  • Din nya sub bör se ut så här:
  • "Sub goToLastRow()
  • Dim lastRow As Integer
  • Dim X som heltal
  • För X = 1 till 25
  • Range ("A" & X). Välj
  • ActiveCell.Value = "data läggs till radnumret:" & X
  • Nästa X
  • Range("A26"). Välj
  • ActiveCell.Value = ""
  • Range("A27"). Välj
  • ActiveCell.Value = ""
  • lastRow = ActiveSheet.UsedRange.Rows.Count
  • MsgBox "den sista raden i det här arbetsbladet är:" & lastRow
  • End Sub"