ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 5766|回复: 3

[求助] 加载宏除了加载时能生成菜单栏和工具栏外,能不能生成命令按钮或用户窗体

[复制链接]

TA的精华主题

TA的得分主题

发表于 2013-10-1 21:27 | 显示全部楼层 |阅读模式
本帖已被收录到知识树中,索引项:XLA加载宏开发
本帖最后由 samguoxufeng 于 2013-10-1 21:42 编辑

小的不才,在论坛上边看一些方法,边实践,但是都没有成功在加载宏的时候自动在工作表里面生成一个按钮,我是想生成按钮,不是菜单或者工具栏图标。先把大概的操作过程给各位大神看一下,我把下面的代码放在workbook的addininstall或者open里面的话,每次都得点加载项(就是加载宏的方法)
如图: 加载宏.jpg 然后,工作表才会生成一个命令按钮(普通的,不是在窗体上的)
Private Sub Workbook_AddinInstall()
Dim sha
Dim vbaaa
Set sha = Sheet1.Buttons.Add(69, 39, 75, 33)
For i = 1 To Workbooks.Count
    If Workbooks(i).Name <> abcdefg Then
        Workbooks(i).Activate

Set vbaaa = ActiveWorkbook.Sheets("sheet1").Buttons.Add(69, 39, 75, 33)

End If
Next
End Sub


命令按钮.jpg 或者说,加载宏第一手动加载后,以后怎么打开一个新工作薄的时候,自动就添加一个按钮呀?有办法实现吗?因为如果每次打开一个新的工作薄都手动加载需要的加载宏的话(必须得把原先已经加载的加载宏或者说加载项手动取消,然后又手动加载它,按钮才会出现)
还有我的文件,保存为加载宏后。在别的工作薄里,按钮的话手动点加载(或者加载,取消,加载。。。。。)就可以生成按钮。
生成窗体的那个在第一次加载的时候没问题,但是第二次打开的时候就会出现只能打开加载宏,工作薄灰屏的现象,而且所有工作薄都是。这个时候只能按新建一个工作薄,然后把加载项取消,工作薄才会回复正常。
加载宏动态生成按钮或窗体.zip (29.78 KB, 下载次数: 111)
请教大神:加载宏的加载过程是怎么样的?只是在第一次加载的时候才会有open等事件的发生吗?要不然为什么不能每次打开新工作薄的时候都生成一个动态按钮,或者说给新打开的工作薄新建一个表(我试过,但打开新文件后却是给加载宏文件新建表了)。
大神,帮帮忙吧~~~~感激不尽。。。。。。。因为我需要的操作是:每次新建一个excel文件,就自动生成一个命令按钮(要不然,自动给a1单元格赋值也行,主要是没有思路,因为不清楚加载宏的运行过程)哦,补充一句:窗体那个,我按F8手动运行里面的某些代码,就会出现中断模式的错误。


TA的精华主题

TA的得分主题

发表于 2013-10-2 16:44 | 显示全部楼层
将带有按钮、窗体的文件另存为“启用宏的模板”。
另存为.jpg

1、手工新建工作簿。在Excel2010中,点击“文件-新建-我的模板”,在新窗口中选择合适的模板。
手工新建.jpeg

2、利用加载宏创建新工作簿。附件中,包含一个加载宏文件和两个模板,模板保存位置为“C:\Documents and Settings\Administrator\Application Data\Microsoft\Templates\”,如果模板保存到其它位置,需要修改加载宏中对应的路径信息。启用加载宏后,点击“开始”选项卡,可见两个新建按钮,可选择新建对应的工作簿。
新建(加载宏).jpg

3、如果所有新建的工作簿都使用同一模板,可将该模板设置为默认工作簿模板。


新建工作簿.rar

57.91 KB, 下载次数: 203

TA的精华主题

TA的得分主题

 楼主| 发表于 2013-11-3 23:14 | 显示全部楼层
山菊花 发表于 2013-10-2 16:44
将带有按钮、窗体的文件另存为“启用宏的模板”。

谢谢,好久没有上了,方法似乎不错。。。。。。。。

TA的精华主题

TA的得分主题

发表于 2016-5-18 14:09 | 显示全部楼层
学习一下如何使用“加载宏”
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-3-29 16:58 , Processed in 0.041799 second(s), 10 queries , Gzip On, Redis On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

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