value 啥时候可以省略？

chenyucai

书中P192-194的内容综合了一下，发现一点小问题，就是.value 该不该省略？？？？下面是我的代码，只知道If Worksheets(sht.Cells(i, 3).Value) Is Nothing Then这句里面的value不能省略，其他的value可以省略。不知道为什么?请老师指点。。谢谢！

1. Sub fenlei()
   
2. Dim i As Integer, j As Integer, sht As Worksheet, rng As Range
   
3. For j = 2 To Worksheets.Count
   
4. Worksheets(j).Cells.Clear
   
5. Next
   
6. i = 2
   
7. Set sht = Worksheets("成绩表")
   
8. Do While sht.Cells(i, 3).Value <> ""
   
9. On Error Resume Next
   
10. If Worksheets(sht.Cells(i, 3).Value) Is Nothing Then
    
11. Worksheets.Add after:=Worksheets(Worksheets.Count)
    
12. ActiveSheet.Name = sht.Cells(i, 3).Value
    
13. End If
    
14. sht.Activate
    
15. Set rng = Worksheets(sht.Cells(i, 3).Value).Range("A65536").End(xlUp).Offset(1, 0)
    
16. sht.Cells(i, 1).Resize(1, 7).Copy rng
    
17. sht.Cells(1, 1).Resize(1, 7).Copy Worksheets(sht.Cells(i, 3).Value).Cells(1, 1)
    
18. i = i + 1
    
19. Loop
    
20. End Sub
    

复制代码

chenyucai

没人知道吗？

ggsmart

默认属性有些时候可以省略，但最好不要省略。
一是会降低运行速度，二是有些时候会经你带来不必要的麻烦，如程序执行错误等

chenyucai

ggsmart 发表于 2012-12-4 17:13
默认属性有些时候可以省略，但最好不要省略。
一是会降低运行速度，二是有些时候会经你带来不必要的麻烦， ...

谢谢。以后还是不能偷懒了。。。

那点都不会

只要功夫深，铁棒磨成针啊