Vba新手入门的实例课程十五讲

zxs0602

感谢论坛上这么多的好心人，让我的学习之路有了支撑

锦鲤来33

感谢你的工作

guojianlin1985

en ，讲的好，资料也好。虽然小小的会一点vba了。但看了之后还是受益匪浅呀。thanks

svei

也想学习一下，不知道能不能学懂，不过还是谢谢了啊

佛山小老鼠

呵呵，夜深了，小老鼠又出来了，正是我活动的时间，大家千万不要喊打！！！
总共15讲，我先讲第一讲，高手就不要听了 ，你们听我都不敢讲了，害臊，出臭了，不过，还是欢迎你们指正我的缺点，帮助入门级的朋友，同时再提高自己VBA水平。
言规正传，我希望听我讲课之前的同学，先找个位置坐，不要坐在地下 先听听我的视频教材，然后一讲讲的来
  第一讲：VBA与宏
   VBA 是VB的一个分枝，VBA是一种编程语言，最简单说是由一个个英文词和合成词，按一定规则组成的代码。的我们要去英国，首先我们就要考虑自己能否说和听懂英文，而我们现在要和EXCEL说话，因为EXCEL能听懂VBA，我们要和EXCEL交行沟通，那么我们就要会EXCEL里的VBA，也就是VBA是编程人员和EXCEL沟通的语言，呵呵，我不知我这个比喻解释VBA是否恰当
   英文单词，你可能会说，别说我了，别说了，我连26个英文字母都不会，还学，呵呵，我也没有假话，我也真的不会发音这26个字母。我也怕，我刚才说过，是由一些简单的英文单词和一些组合词和合成词组成，如Open（打开），Close（关闭） IF（如果）.....Then,这个对英文差的学生来说是有一定的困难,困难总是存在的,就像哲学里说的,时时有矛盾,事事有矛盾,但这时就看我们的恒心,和毅力了,学贵有恒.人贵有志.
    什么是宏，大家一说到宏，就直接想到录制宏，我接触VBA之前也是录制宏,大家动一下后,录制一段宏:在A1单元格输入"小老鼠",点一个别的单元格,再次选中A1单元格,工具菜单,宏,录制新宏,点击确定,到格式工具栏上点击字体颜色为红色,字号的大小为18磅,点停止录制,这时我们按一下快捷键Alt+F11,打开VBE编辑窗口,双击模块1,看到如下代码:

1.     Sub Macro1()
   
2. '
   
3. ' Macro1 Macro
   
4. ' 宏由 999宝藏网 录制，时间: 2011-3-12
   
5. '
   
6. 
   
7. '
   
8.     Selection.Font.ColorIndex = 3       选中的单元格的字体颜色值为3，对应颜色为红色，
   
9.     With Selection.Font
   
10.         .Name = "宋体"       '字体为宋体
    
11.         .Size = 18               '字体的大小为18磅
    
12.         .Strikethrough = False          'Strikethrough 是删除线的意思
    
13.         .Superscript = False       'Superscript 上标的意思
    
14.         .Subscript = False      'Subscript下标的意思
    
15.         .OutlineFont = False  '字体为空心
    
16.         .Shadow = False   '阴影
    
17.         .Underline = xlUnderlineStyleNone  '无下划线
    
18.         .ColorIndex = 3  '颜色索引为3,3是红色
    
19.     End With
    
20. End Sub

复制代码

以上代码我们可以把False改为TRUE看看,一一运行,我们就会发现他们之间的不同作用,现在我们来精减上面的代码,所有False都删除，包括：Underline = xlUnderlineStyleNone  和Selection.Font.ColorIndex = 3      
最后得到这样的的代码

1. Sub Macro1()
   
2.      With Selection.Font
   
3.           .Name = "宋体"
   
4.           .Size = 72
   
5.           .ColorIndex = 3
   
6.      End With
   
7. End Sub

复制代码

呵呵，到了00：36分了，小老鼠要回家了，休息了，下次见,第一讲还没有完，待续
第一讲的待续在50楼  http://club.excelhome.net/thread-691838-5-1.html

[ 本帖最后由 佛山小老鼠 于 2011-3-13 14:40 编辑 ]

迅岐同心

谢谢提供！

mzlbb

呵，谢谢鼠师了，期待老师快点把15讲的讲稿都贴出来啊。

brdsz

先顶一个，收藏了，谢谢

goodwave

EXCEL好强大。。希望能多学点

zjq12333

我非常感谢。。多谢