Excel精英培训网

 找回密码
 注册

QQ登录

只需一步,快速开始

你正在寻找更好的Excel学习教程吗?Excel技巧80集+数据透视表+函数初中高全套+VBA80集,想学的这儿全都有
查看: 4397|回复: 14

[分享] 【原创】VBA代码自动缩进工具——适用64位及32位系统(6月21日更新1.1版)

[复制链接]
发表于 2015-6-18 20:34 | 显示全部楼层 |阅读模式
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
本帖最后由 雪舞子 于 2015-6-21 20:48 编辑

        VBA代码自动缩进工具——通吃64位及32位系统

        前言:此为“代码缩进”加载宏小工具,功能单一,短小精悍,只为代码缩进而作。

----------------------------------------------------------------------------------------------------------------------------
       6月21日更新V1.1版:
       更新内容:
              1、改进 智能识别注释,代码有无注释均能缩进正确;
              2、修正 Select Case 语句缩进不正确问题;
              3、提升右键菜单,方便点击;
              4、其他BUG修复。

----------------------------------------------------------------------------------------------------------------------------
         工具截图如下:


                           代码缩进.jpg

        
         一、功能:

        1、全部模块缩进。即此工作簿下所有模块中的代码一键缩进,包括类模块、普通模块及 ThisWorkbook、Sheets 模块中的代码等;
        2、本模块缩进。只缩进当前模块中的代码;
        3、本模块删除空行。删除当前模块代码中的空行。


         二、安装方法:

         本文以 Windows7 X64 系统为例,说明一下安装方法。
         
        1、Excel 安装。

         很多同学无法安装这个工具,都是因为 Excel 安装的不妥。
         安装了X64位系统后(包括 WIN 7、WIN 8、WIN 10等),习惯性的安装了 X64 Office ,认为 64 系统只能跑 X64 Office。
         切记,在X64位系统上使用本工具,一定要安装 X86 Office(32位)!因为X64 Office 有一些兼容性问题,很多控件及插件都无法使用,如果你有特殊用途除外。

       2、工具安装:

         这里以 X86 Excel 2013 为例,说明一下加载宏工具的安装方法。

        ①下载附件并解压,会解压出一个 “代码缩进” 加载宏文件;
        ②打开 Excel 2013,点击 “开始-选项-信任中心-信任中心设置-宏设置”,勾选 “信任对 VBA 工程象模型的访问(V)”,
         如下图:


                                    信任.jpg    

     
        ③点击 “开始-选项-加载宏-转到” (页面最下面),在新的页面中,点击 “浏览-打开”,找到刚解压的“代码缩进”加载宏文件,“确定”。
        文件加载完毕。

       此时来到VBE界面的代码窗口,点击右键就会出现“代码缩进”菜单,可以给代码进行缩进和去掉空行了。

      三、使用注意事项:

      1、使用“代码缩进”工具时,尽量在填加注释之前使用;
      2、如果已经有注释了,一般不会有影响。如果发现缩进有问题,可将注释移至另一行重新缩进一次即可。
         
        
       “代码缩进”工具下载:

      代码缩进.rar (18.54 KB, 下载次数: 79)

评分

参与人数 9经验 +110 金币 +60 收起 理由
windyjw007 + 12 很给力
hahaangel + 12 赞一个!
若烟 + 20 + 20 神马都是浮云
Hsiao + 20 + 20 赞一个!
心正意诚身修 + 12 聽說ID中有雪的都是大神

查看全部评分

最佳答案
0 
发表于 2015-6-18 20:45 | 显示全部楼层
回复 支持 反对

使用道具 举报

发表于 2015-6-20 05:24 来自手机 | 显示全部楼层
回复 支持 反对

使用道具 举报

发表于 2015-6-20 05:26 来自手机 | 显示全部楼层
还有cad ,word,ppt,Access的vba支持吗?
回复 支持 反对

使用道具 举报

发表于 2015-6-22 16:05 | 显示全部楼层
革命尚未成功,拿走续继努力,支持雪舞子老师。
回复 支持 反对

使用道具 举报

发表于 2015-7-21 23:51 | 显示全部楼层
密码是多少呀。
回复 支持 反对

使用道具 举报

发表于 2015-11-8 16:17 | 显示全部楼层
Thanks  a lot.Good codes.Mark it.
回复 支持 反对

使用道具 举报

发表于 2015-11-9 09:44 | 显示全部楼层
谢谢分享。
回复 支持 反对

使用道具 举报

发表于 2016-4-7 10:04 | 显示全部楼层
谢谢,试用一下。
回复 支持 反对

使用道具 举报

发表于 2016-6-6 11:14 | 显示全部楼层
Thanks  a lot.Good codes.Mark it.
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2017-8-19 13:29 , Processed in 0.156000 second(s), 29 queries , Gzip On, Memcache On.

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表