vba如何遍歷所有單元格？

VBA遍歷所有細胞。

Subtest()DimstrDimi，ji1j1ForR1ToWorksheets(2ForC1ToWorksheets(2)strWorksheets(2)。單元格(r，c)。價值工作表(3)。單元格(j，1)。價值I工作表(3)。單元格(j，2)。價值c工作表(3)。單元格(j，3)。值字符串J1NEXTII1NEXTEndSub刪除shapesubtest()dimsheetasworksheetdimsasshapedimIasintegerforeachsinforini1n

excel中指定幾列為0時隱藏該行？

這是我和VBA一起編程的一個例子:

假設您的表格放在當前頁面上，從第一行開始連續有n行。需要判斷第m列的單元格是零還是空，如果單元格是零，則自動隱藏該行。

使用快捷鍵時，VBA會根據M列是否為零，自動隱藏或保持整個表格每行的原始狀態。)

在EXCEL中選擇菜單工具-宏-記錄新宏，建立快捷鍵調用的VBA模塊，然后進入VBA編輯窗口，將以下語句添加到VBA模塊中。

SubZZZ()ZZZMacro宏記錄2008年5月30日由CNYIZHO鍵盤Shortcut:CtrlShiftNM1；指定活動工作表中的列號。[A1]取本表中有效非空行數(指有數據的連續行)。

如果單元格(I，M)為空，那么如果行I的列M中的單元格值為0或空白，則它將是隱藏的行(I)。如果是下一個sub，隱藏第一行。