我查看了建議的問題，以找到問題的答案。最接近的問題稱為：計算不同Excel工作表中的行數計算不同Excel工作表中 的行數該問題的解決方案對我不起作用。我正在嘗試計算與活動工作表不同的工作表中某個范圍內的行數。這是我的代碼：Sub verbflashcards()Dim wordcount As LongWith Worksheets("Verbs")wordcount = .Range(Cells(4, 1), Cells(4, 1).End(xlDown)).Rows.CountEnd WithMsgBox (wordcount)End Sub我有一個稱為動詞的工作表，這是工作簿中的第二個工作表。我試過了：With VerbsWith Sheet2With Sheets("Verbs")With Sheets("Sheet2") 他們似乎都不起作用。
2 回答
一只萌萌小番薯
TA貢獻1795條經驗 獲得超7個贊
選中此復選框，希望對您有所幫助：
Sub verbflashcards()
Dim wordcount As Long
wordcount = ActiveWorkbook.Worksheets("Verbs").Range("A4", Worksheets("Verbs").Range("A4").End(xlDown)).Rows.Count
MsgBox (wordcount)
End Sub
其中，D1是您可以從中獲取行數的列。
方法2：
Sub verbflashcards()
Dim wordcount As Long
With Sheets("Verbs")
wordcount = .Range("A" & .Rows.Count).End(xlUp).Row
End With
MsgBox (wordcount)
End Sub
注意：您的問題有很多答案。檢查此SO鏈接：如何在包含宏的Excel工作表中找到包含數據的最后一行？
白板的微信
TA貢獻1883條經驗 獲得超3個贊
您的原件無效，因為未指定Cells(4, 1)和的父對象Cells(4, 1).End(xlDown)。在塊內時，任何單元格地址都以句點（也稱為?；蚓涮枺榍熬YWith ... End With。例：
With Worksheets("Verbs")
wordcount = .Range(.Cells(4, 1), .Cells(4, 1).End(xlDown)).Rows.Count
End With
請注意.Cells(4, 1)和Cells(4, 1)。該句點指定您要引用的單元格在工作表（“動詞”）內。
- 2 回答
- 0 關注
- 518 瀏覽
添加回答
舉報
0/150
提交
取消