首先创建一个VSTO程序,如图在VS中创建一个Excel外接程序:
然后接下来,添加项,添加一个Ribbon菜单:
在创建菜单之前,需要明确我们的插件具有哪些模块。这里为了演示如何创建菜单以及后面的功能点,我们的插件打算做四个功能点。 首先是财经模块,包括从一些开放的财经API如新浪财经API,雅虎API中获取实时或者历史行情数据;地图模块,包括地图显示,地址检索,专题制图等;天气模块,获取天气,天气保表;系统模块,包括登录,帮助,关于模块等。确定好功能点之后,就可以开始创建菜单了。
添加了Ribbon菜单之后,就可以打开ToolBox开始设计了,如下图。下面介绍各个菜单项的功能及设计要点。
我跟你说一下,你看看能不能看懂,如果看不懂你再追问。首先选中你做的第一个复选框(checkbox1),右键菜单——查看代码,在打开的vbe编辑窗口中把里面的东西都清空,然后把下面的代码粘贴进去:
Private Sub CheckBox1_Click()
If CheckBox1 = True Then
CheckBox2 = True: CheckBox3 = True: CheckBox4 = True: CheckBox5 = True
CheckBox6 = True: CheckBox7 = True: CheckBox8 = True: CheckBox9 = True
CheckBox10 = True: CheckBox11 = True: CheckBox12 = True: CheckBox13 = True
CheckBox14 = True: CheckBox15 = True: CheckBox16 = True: CheckBox17 = True
CheckBox18 = True: CheckBox19 = True: CheckBox20 = True: CheckBox21 = True
CheckBox22 = True: CheckBox23 = True: CheckBox24 = True: CheckBox25 = True
CheckBox26 = True
Else
CheckBox2 = False
CheckBox3 = False: CheckBox4 = False: CheckBox5 = False: CheckBox6 = False
CheckBox7 = False: CheckBox8 = False: CheckBox9 = False: CheckBox10 = False
CheckBox11 = False: CheckBox12 = False: CheckBox13 = False: CheckBox14 = False
CheckBox15 = False: CheckBox16 = False: CheckBox17 = False: CheckBox18 = False
CheckBox19 = False: CheckBox20 = False: CheckBox21 = False: CheckBox22 = False
CheckBox23 = False: CheckBox24 = False: CheckBox25 = False: CheckBox26 = False
End If
End Sub
现在看一下这段vb代码,不难看出else上下的两段字符,等号左边的都一样,只是等号右边一个为true,一个为false。在这段代码里一共有26个复选框,你一看就明白了吧?如果你的复选框没有这么多,那么你可以直接用这段代码就可以了,反之,你的复选框比代码里面的多,那你继续在代码里面加上你剩余的复选框名字(按照代码的规律添加即可)。最后将工作簿保存为启用宏的工作簿就好了。如果你的excel没有用过宏的话,在你的excel中宏是禁用的,你得到excel选项下——新人中心——信任中心设置——宏设置——勾选启用所有宏选项。这样你需要的效果就能实现了:(如图),不在知道是不是你想要的,也不知道对你有没有用,希望能对你有所帮助
VSTO 是微软用于开发 Office 插件的一种技术,跟 VBA 比较起来,VSTO 开发更加简单,功能更加强大。本系列博客介绍利用 VSTO 开发 Excel 插件的方法。VSTO 开发的 Excel 插件 (Add-in)是 COM 加载项的一种。新的开发技术可以考虑 Excel Web Add-In。VSTO 与 Web Add-In 的区别可以参考: Office Add-in开发技术及其发展 - 知乎 。
开发环境:Visual Studio 2019
新建一个 Excel VSTO Add-In 项目,因为 Visual Studio 2019 支持的项目类型较多,可以在界面中限定开发语言、平台和项目类型进行筛选,以方便定位:
点击 「Next」,指定 Solution 和 Project 的名称:
点击「Create」按钮,创建一个新的项目。这个空的项目已经可以运行,但没有界面看不出效果,所以我们添加一个 Ribbon,这样启动的时候,Excel 就多出一个页签。选中解决方案,右键,Add New Item,选择 Ribbon:
Ribbon 是一个界面的容器,初始的 Ribbon 包括一个 tab,tab 包含一个 group。将 tab1 的 Label 属性更改为 VSTO Test,将 group1 的 Label 属性改为 : 自定义组。
在自定义组中,增加一个 Button 控件,Label 属性改为 Hello,并且实现 Click 事件。在该事件中,对当前单元格写入 Hello World 字符串:
编译运行,启动 Excel 后,Ribbon 菜单多出了 VSTO Test 页签。点击 Hello 按钮,在当前单元格写入了 Hello World 字符串。
当我们编译运行后,之后启动 Excel,该插件也被自动加载运行。对插件的 启用 和 停用 可以由两个入口来设置:
方法一:
Gitee :VSTO Hello World
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)