如何当单元格为空的时候赋值为.

id	date	pubdate
1	2001/3/22
1	2001/3/23
1	2001/3/24
1	2001/3/25
1	2001/3/26
1	2001/3/27
1	2001/3/28
1	2001/3/29
1	2001/3/30
1	2001/3/31
1	2001/4/1	0
1	2001/4/2
1	2001/4/3
1	2001/4/4
1	2001/4/5
1	2001/4/6
1	2001/4/7
1	2001/4/8

现在想    当pubdate为空的时候，添加  “ . ” 号    ，求个程序

方法很多，定位空格，等于"."号，这个录个宏就可以出来

1. Sub t1()
   
2.     Range("C1:C19").SpecialCells(xlCellTypeBlanks) = "."
   
3. End Sub

复制代码

方法二，判断是否空值，是就等于"."

1. Sub t2()
   
2.     Dim arr, i
   
3.     arr = Range("C1:C19")
   
4.     For i = 1 To UBound(arr)
   
5.         If Len(arr(i, 1)) = 0 Then arr(i, 1) = "."
   
6.     Next
   
7.     Range("C1:C19") = arr
   
8. End Sub

复制代码

启动Excel，打开需要进行处理的表格数据，在D2单元格输入公式： =if(len(C2)>0,"",".") 。