Nwlapcug.com


Come faccio a contare le righe in un foglio di diffondere Excel utilizzando una Macro VBA?

Come faccio a contare le righe in un foglio di diffondere Excel utilizzando una Macro VBA?


Utilizzando le macro possono accelerare azioni in Excel che devono essere fatte di volta in volta automatizzandoli. Macro è utilizzabile anche per raccogliere dati che possono essere necessari per l'ulteriore programmazione. Ad esempio, il numero di celle o righe di una tabella è necessario per assicurare che la manipolazione automatizzata dei dati funzioni come previsto. Per dimostrare, una semplice macro può contare il numero di righe in un foglio di calcolo e aprire una finestra di messaggio indicante che il numero.

Istruzioni

1

Aperto un nuovo foglio di calcolo ed excel riempimento nel prime poche cellule nella colonna B con parole casuali, lettere o numeri.

2

Fare clic sulla scheda "Sviluppatore" sulla barra multifunzione di Excel dal menu. Se non vedete la scheda "Sviluppo" della barra multifunzione dal menu, fare clic sul Microsoft Office icona in alto a sinistra della finestra, fare clic sul pulsante "Opzioni di Excel" e fare clic nella casella di spunta che legge "Visualizza scheda sviluppo sulla barra multifunzione."

3

Avviare l'Editor di Visual Basic facendo clic sull'icona di Visual Basic o premendo contemporaneamente Alt e F11.

4

Fare clic su "Inserisci" dal menu di Visual Basic Editor e scegliere "Modulo".

5

Digitare quanto segue nella finestra di modulo:

Sub CountNumberofRowsinColumnB()

NonBlankRange ("Sheet1!B:B")

End Sub

Sub NonBlankRange (sRange As String)

Dim countNonBlank As Integer, myRange As Range

Set myRange = Range(sRange)

countNonBlank = Application.WorksheetFunction.CountA(myRange)

MsgBox "Number of Rows: " & countNonBlank, , sRange

End Sub

Questo codice è stato adattato da un progetto di in"Microsoft Visual Basic Step by Step" citati qui di seguito.

6

Fare clic sull'icona di Excel su Visual Basic Editor per visualizzare il foglio di calcolo Excel.

7

Fare clic sull'icona sulla barra multifunzione di Excel Macro e selezionare "CountNumberofRowsinColumnB" dalla casella nome macro.

8

Fare clic su "Esegui" nella finestra macro. Si aprirà una finestra di messaggio che ti dice quante righe sono state riempite.

Consigli & Avvertenze

  • Un altro modo per contare le righe consiste nell'utilizzare la funzione "Conteggio". Microsoft dà il seguente frammento di codice in Excel 2003 VBA Language Reference citati qui di seguito. Per utilizzare la funzione conteggio:
  • Sub DisplayRowCount()
  • Dim iAreaCount As Integer
  • Dim i As Integer
  • Worksheets("Sheet1"). Attivare
  • iAreaCount = Selection.Areas.Count
  • Se iAreaCount < = 1 Then
  • MsgBox "The selection contains" & Selection.Rows.Count & "righe".
  • Altro
  • Per i = 1 To iAreaCount
  • MsgBox "Area" & i & "della selezione contiene" & _
  • Selection.Areas(i). Rows. Count & "righe".
  • Prossima ho
  • End If
  • End Sub
  • Questo deve avere l'area deve essere contato selezionato prima viene eseguita la macro, quindi se una cella è selezionata solo la risposta che dà è "1" e se è selezionato l'intero foglio di calcolo si leggerà "1048576" (in Excel 2007).
  • Utilizzare le macro in condizioni di prova in primo luogo, utilizzando copie i fogli di calcolo per testare le macro, al fine di salvare perdere dati importanti.