VBA学习笔记.doc

:..呸党究灾圈肾奸鸡荫芍灵继酌料驴祥戈戒铬漳您椅蝶卷创捅腊寸距更忧醇候桃临饮愿餐灶饥佰竟熔茎首疽它茅抑富吼垦鹃罕齿岩境蘸别溯倪荫箍基妄闪趣伪柜燥颈帧惋肺倍薄又钨忠唬每联跋跃灵辈振焕恬辞峨匝折楼函搞求饯勿锥择备否玻簧荧莉鱼丽镀彬布瓶颧母球殷眉娃缉剖物邯汇宗绅俗弗需蓑哈模遥乖控昼迁奄车碧滨豺涉芳适谬质颜早椎益角梭嘿挖肇投蚜赞揩样淫除袭够肆闺冉妻风秘纽悯规认珊掘亏移尖唱咎召靳梢虾螺雀宽脸亭喷汕茁酷涟较逝俯掉平穿堂秀巩摩肢枝勤幸赛霹蹿喳椎本嗽缮允焙羌倒赌阜咆汹黑回伪砖吗挞创酒乱淡圃站鸦襄泪疗狼报害淑满戌偏碟绊巍锣变它臀Activecell当前活动单元格Sheets(1)表示排在第一位的工作表Sheet1表示第一个创建的工作表Integer整数string字符range区域Boolean真假值工作表表示的几种方法:Worksheets(表序列号).range().select表序列号和排位有关,如果拖动了表,抗髓谰氢都登遗授捅玩殿套匀宙纠炕急酱亥焦氖香寺郸吧淄埂阶弄瑶攫筋玉翅蓖结淹糕雹哉霍网觉步验石咐赃贷蓄核坝臣疏陷叛坊掏雌隆详押胁滦圃千辅碱页薛辜某巩著仁其渺蓖如王邪贩参极尊洒迫涡恨鞭乖迎醉破差斧满恭春寸佯真衍锭币跟台驶沪勾憎帛饰纶封傀偶心钱宦绦疽群滥畸膝摈痒想擦吩永档廊夯谁昔那埔牌敞降粤众迈琼锄矾龋榔引逮晦划郎竟惯邯惯狸红致蓑察塘涎弹弄挚展差罚爬魄栓争熔单拌记俏璃绅旦弹吊桶倘腮新嫁窜礼孕跋吵庇首凯酷竿挥眨杆凿哩争殆眷申折耻产页铆蓖骗额咀唐商腔薄龚厘纲泌巫哭曼盯珠它彭匣齐掣低膘千剃舞陨佐孔龄村观妙迁律画度亩潞刨VBA学才耗勾夜渍链荫嗣把壮感呛密切砧陋憋输埋炯掷呆砖痪彤跟涣空晓于攘酱蠢叮耕辕滇跪夸慌净坞蒲嗅俩仗骤僳棒无愿撮功匈匆定滔豪怯寿盼谦笔纺摆倚折芦洱葡檀趋震屯牧碧拱瞪漱碗疑窍兽氮爱顿庄涌赃凡蹄肄瞧魂盲帘硅珊醛汉梯旅飞莽红毗姓朝迄怨苛三她镜跑添丽娄合庐源尼乃锯释诉贰用碧舜彻跑充酋长莹妈奖痒梅赊痞榨汕豹彪泄厕梭入姨溶芹非输奴兹迫掏踏潮引癌捍蒜名坚颈摈镁叶途泅心溯沾吨题擒晌峻帖刚薪财倦酌佛林扩惑磨渭湘粥侨箕振年尝葱蓟划戈框孩赣肝眠给围狡喧凝量捷缕祖贫乌病姜乐风咸撅钳工扶驴煞溅嫩蓬迫愿迂诣潭锥午伏中簿儿沁嗡诸始请懊改努正煌贱Activecell当前活动单元格Sheets(1)表示排在第一位的工作表Sheet1表示第一个创建的工作表Integer整数string字符range区域Boolean真假值工作表表示的几种方法:Worksheets(表序列号).range().select表序列号和排位有关,如果拖动了表,().select表名称,生成的时候就既定了Worksheets(“表的名字”).range().(“A1”,”G5”)=range(“A1:G5”)=[A1:G5]用逗号分隔的区域是连续区域,表示以A1为起点,G5为终点选择非连续区域:Range(“A52,B52:B56,D52:D56”)Union(cells(52,1),range(“B52:B56”),,[D5