vba模拟按键精灵(vba模拟键盘按键)
vba模拟按键精灵(vba模拟键盘按键),新营销网红网本栏目通过数据整理汇集了vba模拟按键精灵(vba模拟键盘按键)相关信息,下面一起看看。
VBA自带的Worksheet_SelectionChange进程可以监控鼠标点击某个单元格,确定某个单元格是“颜色生成器”,点击“颜色生成器”获取其填充颜色,在选择其他单元格或区域时,用填充颜色填充所选区域,从而可以模拟拾色器的拾色和上色效果(如上视频所示)。
注1。“颜色生成器”中的颜色由RGB原色混合而成,原色值由随机数生成。
2.RGB混色形成的颜色值是长整形数据,可以用长数据接收。
第一步。功能实现简介
选择A1单元格作为“颜色生成器”,使用命令按钮控件使该单元格生成随机填充颜色。
生成A1随机填充颜色后,用鼠标单击该单元格得到填充颜色的颜色值,然后单击或框选非A1单元格进行着色。
第二步。添加和命名命令按钮
如下图所示,从到依次点击开发工具-插入-命令按钮,随机点击一个单元格放置命令按钮,然后用鼠标拖动按钮边框调整大小,上下左右拖动或微调键盘按键将命令按钮放置在合适的位置。
右键单击命令按钮,点击属性,在属性页更改标题值和字体属性(可以根据自己的喜好修改)。
调整后,命令按钮状态如下。
第三步。添加代码
3.1双击命令按钮,在VBE界面右侧代码区添加Private Sub CommandButton1_Click()子进程内外红框对应的代码
单击命令按钮时,程序先用Cells.clear清空整个工作表单元格(主要是去掉一个A1单元格留下的随机颜色和非A1单元格的着色)。
然后使用For循环填充A1单元格的颜色10次。每个周期用Rnd随机数给RGB分配三原色,这样A1的颜色每次都不一样。
睡眠200是指每个周期等待200毫秒,否则A1细胞颜色变化太快,不影响视觉效果。Sleep不是VBA本地函数(Windows API函数),所以需要在代码窗口前端使用declare关键字声明。
3.2在代码窗口的列表框中点击工作表选择更改,在调出过程中添加红框对应的代码。
红框中的代码主要判断被点击的单元格是否为A1,如果是,则将A1单元格中填充的颜色数据赋给变量selectedColor,并打开着色开关F;如果不是,则判断颜色是否已被选中(如果f为真,则表示颜色已被选中),如果是,则绘制颜色(即将当前选中区域的填充颜色改为selectedColor)。
第四步。执行代码
返回前景工作表界面,单击命令按钮,使A1单元格生成随机填充颜色。单击A1进行着色,然后单击其他单元格进行着色。
注意加载开发工具选项卡
打开功能区选项,并在位置处选中“开发工具”。如果没有这个选项,可以调出到的步骤,点击,完成开发工具选项的加载。
相关文章英雄超级放肆(还记得英雄超级放肆吗?)
龚自珍资料(清代诗人龚自珍生平事迹简介)
象牙塔是什么意思?(“象牙塔”有什么不好?)
彩色风信子(水培风信子容易养)
京字怎么读?
于吉是哪里人?(古代著名美女于吉在哪里?)
三本事业单位(我们还有哪些“三本”?)
电子酒柜(酒柜最全指南)
德州景点(德州62个景点)
玉兰油官网(玉兰油发布高端精华系列)
驱鬼(道教辟邪的法术)
奥林匹克五环代表什么?)
更多vba模拟按键精灵(vba模拟键盘按键)相关信息请关注本文章,本文仅仅做为展示!