菜鸟谈VBA最最基础入门《原创》

moon2778

DisplayAlerts 属性
参阅应用于示例特性如果宏运行时 Microsoft Excel 显示特定的警告和消息，则该值为 True。Boolean 类型，可读写。

说明
默认值为 True。如果不想在宏运行时被无穷无尽的提示和警告消息所困扰，请将本属性设置为 False；
————以上来自帮助

ggsmart

原帖由 zznjcs 于 2009-9-8 13:31 发表


小样我搞不懂你还笑.

Sub 单击()
    Application.ScreenUpdating = False       这两个语句什么意思?
     Application.DisplayAlerts = False
    Call sc                                             ...

1、Application.ScreenUpdating = False 是什么意思？  ------关闭屏幕更新，如果运行程序需要一个舞台的话，使用这个语句就像是给这个舞台拉上一块幕布，我们将看不到舞台上演员在做的任何动作，即程序运行过程中的各个过程。设置了的属性为False后，记得在程序结束后把它的属性改为True，因为excel不会自动为我们改回来。


2、为什么要调用程序把工作表全部删除？ ---------为了再次点击按钮的时候程序出错，比如重命名工作表，如果已经有了“站街”工作表，再将另一个表改为“站街”时就会出错，删除了就不存在了。

3、 Set qy = Sheets(1).Range("A1").Resize(i - 1, 9)      这句什么意思? 什么时候用set呀? ---------对数值、文本等变量赋值时可以直接＝，而对对象（如工作薄对象，工作表对象，单元格区域等）赋值时要用set语句，语句里的qy是一个range对象，表示第一张工作表A1单元格往下i-1行，往右9列的单元格区域。

4、Sheets(Sheets.Count).Columns(5).ColumnWidth = 13   这句什么意思? --------sheets.count统计有多少个sheet对象，sheets(sheets.count)表示最后一个工作表，columns(5)表示第五例，columnwidth属性是修改列宽，此句的意思是将最后一张工作表的第五列的列宽设为13.

5、什么时候用set呀?--------为对象赋值时set语句！

ggsmart

原帖由 moon2778 于 2009-9-8 14:00 发表
Sheets(Sheets.Count).Columns(5).ColumnWidth = 13   这句什么意思?
最后一张表的第五列的列宽设为13，不然日期不能正常显示嘛

提供另外一种方法：Columns(5).EntireColumn.AutoFit
自动调整列宽以显示内容，相当于在列的分隔线上双击鼠标左键

zlm2002

收之，！！！！！！！！！！！！！
谢谢

ying930

谢谢分享!楼主幸苦了

zznjcs

原帖由 ggsmart 于 2009-9-8 14:13 发表


1、Application.ScreenUpdating = False 是什么意思？  ------关闭屏幕更新，如果运行程序需要一个舞台的话，使用这个语句就像是给这个舞台拉上一块幕布，我们将看不到舞台上演员在做的任何动作，即 ...

多谢楼主指导,我明白了.  

你比MOON讲的还要仔细, 她还落了一个问题,没给我讲sheets(1).range("A1").resize(i-1,9)是啥意思.  不过两个人讲的都比较好理解,一起谢谢了.

我是不是可以理解成range("A1")resize()的意思和offset()函数差不多?

zznjcs

大家请放慢一点节奏,有点快.

我的"学生名单汇总"作业还没有完成. 太快了我就跟不上了.

hengnet

谢谢分享,楼主真的很有心,谢谢!

zyh196712

请让我先谢谢楼主的分享！让我对VBA有了初步的认识，平时做点VBA都是对着书做的，根本不理解，而且VBA真的好枯燥，不同的是，它被你润的让人愿意看下去了。
    我试着输入8楼的代码，弹出如下提示框，也试了一些其它的数据类型，也不成功。
[localimg=218,131]1[/localimg
只有输入Variant才成功显示提示框，不知对于这样的数据我该选择什么样的数据类型。

ggsmart

原帖由 zznjcs 于 2009-9-8 16:21 发表
多谢楼主指导,我明白了.  
你比MOON讲的还要仔细, 她还落了一个问题,没给我讲sheets(1).range("A1").resize(i-1,9)是啥意思.  不过两个人讲的都比较好理解,一起谢谢了.
我是不是可以理解成range("A1")resize()的意思和offset()函数差不多?

其实moon是对我影响很深的一个人，她的很多地方值得我去学习，希望你也去认识她，保证你会有很大的收获。

你对resize的理解方式我同意。我总觉得resize可以看成工作表中只使用后两个参数的offset函数，类似！

[ 本帖最后由 ggsmart 于 2009-9-9 09:47 编辑 ]