ExcelVba编程实例
这是本人近来学习VBA的笔记，有很多方法已经在工作中运用，大大提高了工作效率，希望我的笔记对一些初学者有所帮助。下面有很些实例摘自Excel2003高级vba编程范例文件，本人按照自己的思维做了适当的修改，有不妥之处，还望指正！
第九章工作表排序本章只有一个范例文件，主要功能对活动工作簿中所有工作表进行排序。算法说明：1、统计活动工作簿中工作表的数量WsCou
tActiveworkbookworksheetscou
t2、定义一个一维数组a1towscou
t主要用来存放活动工作簿中所有工作表名称字符串3、利用foreachwsi
activeworkbookworksheets循环将活动工作簿中所有数量赋值给一维数组4、利用冒泡法对数组进行排序（源文件对排序单独写了一个过程）5、利用worksheets的move方法以及sheetsi他代表工作簿中从左到右第i张工作表移动工作表代码：SubSortSheetDimWsCou
tAsI
tegerDimWsArrayAsStri
gDimWsAsWorksheetO
ErrorResumeNextWsCou
tActiveWorkbookWorksheetsCou
tReDimWsArray1ToWsCou
tIfActiveWorkbookProtectStructureThe
MsgBoxActiveWorkbookName