在excel中用VBA编程时,怎么样才能让没有数据的单元格隐藏。

要在 Excel 中隐藏没有数据的单元格，可以使用 VBA 编程来实现。以下是一个示例代码：
```vba
Sub 隐藏没有数据的单元格()
'
' 隐藏没有数据的单元格
'
Sheets("Sheet1").Cells(1,1).End(xlData).Select
If Selection/comments.Count = 0 Then
Sheets("Sheet1").Cells(1,1).Comment.Add "此单元格为空"
Sheets("Sheet1").Cells(1,1).Value = ""
Sheets("Sheet1").Cells(1,1).Hidden = True
End If
End Sub
```
这个 VBA 函数会在当前工作表中选择第一行第一列的单元格，然后检查该单元格是否包含注释。如果没有注释，则会添加一个新的注释，并将该单元格的值设置为空白。最后，将该单元格的 Hidden 属性设置为 True。
通过这种方式，您可以使用 VBA 在 Excel 中隐藏没有数据的单元格。 |||格式-条件格式
条件选“公式”
公式:=len(x)0--x用要显示边框的单元格地址，如A1
格式:选边框 |||这个要编写个vba
Sub 隐藏()
Dim I
For I = 1 To Range(A6556).End(xlUp).Row
If Cells(I, B) = And Cells(I, C) = Then
Rows(I).EntireRow.Hidden = True
End If
ext
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim tr, tc
tr = Target.Row
tc = Target.Column
If tc = 2 And tc = Then
隐藏
End If
End Sub |||你要隐藏什么呢？假如B列c列有内容则A列自动编号，则A2=if(b2&c2=,,char(roe(a1)+64))，公式下拉自动填充即可。 |||sub
macro1()
selection
=
selection
+
inputbox(请输入要累计的数;,
hi)
end
sub
建议，工具，录制宏，快捷键处用
ctrl
+
i，确定；然后停止录制，然后按alt和f11进入宏界面，把selection那句话替代进去，这样就有了
ctrl
+
i
的快捷方式了。