2023-01-26 02:33来源:m.sf1369.com作者:宇宇
首先将控件工具箱里面点击按钮 在EXCEL表格里面画出按钮形状.然后点击工具/宏/VISUAL BASIC 编辑器会弹出一个编程窗体,选择按钮的名字,事件选click()即可对按钮的单击事件编程这时只用写你要的对话框窗口的函数如消息框MSGBOX()输入对话框INPUTBOX()其它要完成的功能自己作吧!
不用hook也可以实现啊。步骤如下: 1. 用函数FindWindow找到记事本窗口, HWND notepad=FindWindow(NULL,记事本窗口的标题); 2. 然后FindWindowEx找到该按钮, HWND button=FindWindowEx(notepad,NULL,NULL,按钮上的文字); 3. 用GetWindowRect得到按钮的大小尺寸 RECT rect; GetWindowRect(button,&rect); 4. 计算按钮的中心点坐标,再用SetCursorPos把鼠标移到该中心点位置 POINT center; center.x = 0.5*(rect.left+rect.right); center.y = 0.5*(rect.top+rect.bottom); SetCursorPos(center.x, center.y); 5. 用mouse_event模拟鼠标点击事件: mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0); //按下鼠标左键 mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0); //松开鼠标左键
有些控件是有的,比如TextBox。
绝大部分情况下可以在Excel中调用API获得键盘动作,唯一例外就是当Excel处于单元格编辑状态时。
如果是一个工程里的2个窗体,调用时需要先将第二个窗体中按钮的事件作用域private改为public
。然后在第一个窗体中的控件单击事件里调用窗体名+事件名。例如:
Form1中:
Private Sub Command1_Click()
Form2.Command1_Click
End Sub
Form2中:
Public Sub Command1_Click()
'这里是第二个窗体中按钮的单击事件’
End Sub
点击excel左上角选项,弹出下拉菜单
单击下拉菜单中的“Excel选项”按钮,打开“Excel选项”对话框。
在对话框的左侧列表中,单击“公式”选项卡。
在右侧列表的“错误检查规则”选项中,单击“文本格式的数字或者前面有撇号的数字”前面的复选框,使其不被选中。
单击“确定”按钮,关闭对话框。
上述设置完成后,excel表格中所有的绿色文本标记被一次性去除。
直接执行另一个按钮的程序名称:
Private Sub CommandButton1_Click() MsgBox 我是按钮1End SubPrivate Sub CommandButton2_Click() CommandButton1_ClickEnd Sub
选中单元格,就会激活SELECTIONCHANGE事件
在没有选别的单元格时,再点当前单元格,就不能激活同样的事件
可以在这个事件末尾添加一个选择别的单元格的语句
如
APPLICATION.ENABLEEVENTS=0
[A1].SELECT
APPLICATION.ENABLEEVENTS=1
if target.column=2 then
sheet2.[d1].select
sheet2.[d1]=target.value
end if
在你的类里初始化一个RoutedEventArgs:private RoutedEventArgs evnt;然后再调用这个:element_Clicj(element, event);