Contare il numero di righe in un altro foglio

Ho esaminato le domande suggerite per trovare la risposta al mio problema. La domanda più vicina è: contare il numero di righe in un diverso foglio di Excel. Contare il numero di righe in un foglio Excel diverso

La soluzione a questo problema non funziona per me.

Sto cercando di contare il numero di righe in un intervallo in un foglio di lavoro diverso rispetto al foglio di lavoro attivo. Ecco il mio codice:

Sub verbflashcards() Dim wordcount As Long With Worksheets("Verbs") wordcount = .Range(Cells(4, 1), Cells(4, 1).End(xlDown)).Rows.Count End With MsgBox (wordcount) End Sub 

Ho un foglio di lavoro chiamato Verbi ed è il secondo foglio di lavoro nella cartella di lavoro. Ho provato:

 With Verbs With Sheet2 With Sheets("Verbs") With Sheets("Sheet2") 

Nessuno di loro sembra funzionare.

Controlla questo e spero che questo ti possa aiutare:

 Sub verbflashcards() Dim wordcount As Long wordcount = ActiveWorkbook.Worksheets("Verbs").Range("A4", Worksheets("Verbs").Range("A4").End(xlDown)).Rows.Count MsgBox (wordcount) End Sub 

Dove, D1 è la colonna da cui è ansible ottenere il conteggio delle righe.

Metodo 2:

 Sub verbflashcards() Dim wordcount As Long With Sheets("Verbs") wordcount = .Range("A" & .Rows.Count).End(xlUp).Row End With MsgBox (wordcount) End Sub 

Nota: ci sono molte risposte alle tue domande. Controlla questo link SO: Come posso trovare l’ultima riga che contiene i dati nel foglio Excel con una macro?

Il tuo originale non funzionava perché il genitore di Cells(4, 1) e Cells(4, 1).End(xlDown) non era specificato. Prefix qualsiasi indirizzo di cella con un punto (aka o punto completo ) quando ci si trova all’interno di un blocco With ... End With . Esempio:

 With Worksheets("Verbs") wordcount = .Range(.Cells(4, 1), .Cells(4, 1).End(xlDown)).Rows.Count End With 

Nota .Cells(4, 1) e non Cells(4, 1) . Il periodo specifica che le celle a cui si fa riferimento si trovano all’interno dei fogli di lavoro (“Verbi”).