几个实用的Excel 宏代码
来源:高中英语教学交流
发布时间:2013-03-22 10:41:00
查看次数:
1、Excel 宏 多行多列 多行一列
有时需要在Excel中将某个多行多列的区域转换到一列中,下面的VBA代码可以实现这个目的。
1.按快捷键Alt+F8,在Macro name中填写宏名RangeToOneCol,之后单击Create。粘贴下列代码,此代码可以将所选择的区域转换到A列中
Sub RangeToOneCol()
Dim TheRng, TempArr
Dim i As Integer, j As Integer, elemCount As Integer
On Error GoTo line1
Range("a:a").ClearContents
If Selection.Cells.Count = 1 Then
Else
End If
line1:
End Sub
2.关闭VBA编辑器,返回Excel工作表界面
3.如果A列包含数据,先在工作表的最左侧插入一列,以便放置转换后的数据
4.选择需要转换的区域,按Alt+F8,打开“宏”对话框,选择上述代码中的宏名“RangeToOneCol”运行代码
- 相关文章
- ·微信公众号音频音乐提取方法10-19·几个实用的Excel 宏代码03-22·EXCEL输入的技巧08-11·Word轻松排版四步曲 08-30·Access中批量替换数据库内容的三种方法09-20·提示输入QQ本地信息密码时怎么办?04-03·连接打印机时需要输入用户名密码怎么办?05-15·解决Win8 IE浏览器某些网站显示不全01-30·合并当前目录下所有工作簿的全部工作01-10·BIos密码权限设置05-25
- 最新文章
- ·Win10系统开机启动文件夹在哪里?04-16·十秒免工具激活windows 1002-25·批量替换word文档中的第一行作为文件的文件名06-21·连接打印机时需要输入用户名密码怎么办?05-15·免魔法使用 New Bing 新方案03-18·Win10电脑账号密码设置、修改、取消12-06·[亲测有效]excel批量修改文件名10-29
- 阅读排行
- ·如何让试题的ABCD选项对齐04-13·word排版技巧整理08-02·word 如何自动生成目录08-02·不同电脑文件字体改变了的解决方法12-15·Excel 进行学生成绩统计分析03-13·我的电脑图标不见了,怎么找回来!09-14·Win10电脑的一些安装提示12-03·Word高级替换技巧03-05·Excel如何批量插入分页符02-12·制作Word2003选择性粘贴快捷键07-09
点击这里识别二维码关注公众号