EXCEL VBA笔记(不断更新中)

页面已转至:http://blog.jjuv.com/excel-vba 作为一个非IT专业人士,VBA的代码在不停的Google中忘记,为了方便自己查询,特作此笔记用以详细记录在代码中碰到的问题。 如果以下内容侵犯了您的版权,请来信告知,我会立刻删除。如无特殊说明,本笔记遵循《署名-非商业性使用-相同方式共享 2.5 中国大陆》方式进行共享 更新时间:Jul 02, 2009@10:30 Q1.Excel 中命名过的名称在vba中怎么使用 A1. 若某单元格或区域被命名为”aa”,则VBA中引用这个区域,range(“aa”) Q2.VBA定义名称 A1.Sheets(“工作表名称”).range(“单元格区域”).Name=”定义的名称” Q3.如何在可以运行窗体的同时可以操作EXCEL工作簿(如何在工作表和窗体间切换) A3.userform1.show vbmodeless 增加一个vbmodeless即可。 来源:http://club.excelhome.net/thread-348925-1-1.html 作者:tonyibm Q4.获取人名拼音首字母的excel函数 A4.http://blog.jjuv.com/2009/04/19/first-letter-of-the-chinese-names-excel-function.html Q5.Excel工作簿中工作表分别保存为文件 A5.http://blog.jjuv.com/2009/03/13/excel-worksheet-saved-as-files-separately.html Q6.如何将excel工作薄中的单列数据复制到不同的新工作簿中 A6.http://blog.jjuv.com/2009/03/10/how-to-excel-in-a-separate-job-thin-data-replication-to-a-different-new-workbook.html Q7.VBA中获取文件名的方法 A7.http://blog.jjuv.com/2008/03/02/vba-in-the-way-of-access-to-documents.html Q8.选择性粘贴数值 A8. ar=ActiveWorkbook.Sheets(1).Columns(“L:L”) ThisWorkbook.Sheets(“汇总”).Columns(“E:E”)=ar Q9.如何修改单元格触发宏运行; A9.例子如下: Private Sub Worksheet_Change(ByVal Target As Range) Dim mo As String If Target.Count > 1 Then Exit Sub If Target.Address “$D$3” Then […]