如何用按键精灵写一个带界面的脚本呢?
1、打开按键精灵,新建一个带界面的脚本脚本。
2、选择界面,然后选择输入框,可以便于数据的显示和用户自己输入数据。
3、在界面上画出一个可以随时调节大小和位置的文本输入框,右边是它的一些数据信息,可以把“输入框1”这几个字去掉。
4、界面画好后,点击设置界面按钮,相当于保存确定操作。
5、双击刚才我们建立的文本框,可以自动跳转到脚本界面,并且还会自动写两行代码,代码里面就可以对输入框进行操作了。
6、直接用Excel表格进行测试,读取一个测试Excel表格的数据。将制定文档的数据读取到椭圆所框选的地方,就是文本输入框里面。接下来调试看看。
7、按蓝色小圈的步骤一步步的点击,就会出现这样的效果,Excel是小编自己主动打开的,便于对比,实际脚本运行过程中,指定文档是不会在桌面被打开的。
绛旓細t = mow Rem b If datediff(n, t, now) >= 2 Then Call A()t = now Else Goto b End If Sub A()//杩欓噷鏀惧叆浣犲綍鍒鐨勮剼鏈 End Sub 甯屾湜鑳藉鎮ㄦ湁甯姪銆
绛旓細鎴戞湁涓鏂规硶锛屼唬鐮佹柟闈紝鍦ㄨ繘鍏ュ惊鐜箣鍓嶆壘涓閬嶆父鎴忕獥鍙o紝涔嬪悗杩涘叆寰幆锛岃鎵撴墦鎬紝璇ュ姞琛鍔犺锛岃缃噷閫夋嫨鍙墽琛屼竴娆°備唬鐮佸啓濂藉悗鐢熸垚灏忕簿鐏锛屾妸绗涓涓娓告垙绐楀彛缃簬鍓嶉潰锛屾寜寮濮嬶紝涔嬪悗鎶婂彟涓涓父鎴忕獥鍙f縺娲(榧犳爣鐐逛笅鍙︿竴涓獥鍙)鍦ㄨ繍琛屽皬绮剧伒...杩欐牱锛2涓皬绮剧伒璐熻矗涓や釜绐楀彛锛...
绛旓細瑕佸悗鍙扮偣鍑荤殑缃戦〉闇鍗曠嫭涓涓娴忚鍣紝鐒跺悗鎶婇紶鏍囨寚鍚戠綉椤典笂瑕佺偣鍑荤殑浣嶇疆锛屾寜蹇嵎閿惎鍔 Hwnd = Plugin.Window.MousePoint()GetCursorPos x, y sRect = Plugin.Window.GetWindowRect(Hwnd)MyArray = Split(sRect, "|")x1 = Clng(MyArray(0)) : y1 = Clng(MyArray(1))x = x - x1 : y = y...
绛旓細',000); 鐢ㄦ祻瑙堝櫒鎵撳紑椤甸潰銆備笉瑕佸叧锛屼粬灏卞紑濮嬪埛鏂颁簡锛5绉掍竴涓嬶級姹傚府鍐欎竴涓寜閿簿鐏鍚庡彴鑴氭湰 Hwnd = Plugin.Window.MousePoint() Do Call Plugin.Bkgnd.KeyPress(Hwnd, 112) Loop 鍒氬紑濮嬭繍琛岀殑鏃跺欐妸榧犳爣鎸囧悜浣犺鍚庡彴鐨勭獥鍙o紝鐒跺悗灏卞彲浠ヤ簡銆備互鍚庡氨涓嶇敤浜嗐 涓嶈繃鏈夌殑娓告垙鍚庡彴涓嶅ソ浣...
绛旓細闂锛鐢ㄦ寜閿簿鐏垫庢牱鍒朵綔涓涓鑷姩淇濆瓨缃戦〉鐨勮剼鏈紝鏈濂藉凡缁忓埗浣滃ソ鐨勩傚洖绛旓細浣犱笂娆$殑闂濂藉儚鏄嚜鍔ㄤ緷娆′繚瀛樻祻瑙堝櫒鎵撳紑鐨勬墍鏈夋爣绛鹃〉闈紝杩欐鏈変粈涔堜笉鍚屻傛垜鏄湪60*6瀹夊叏娴忚鍣ㄤ笅娴嬭瘯鐨勩備綘浜嬪厛鍦ㄨ娴忚鍣ㄤ笅鍙﹀瓨涓虹綉椤典竴娆★紝杩欐牱灏辫缃ソ浜嗕綘鐨勯粯璁や繚瀛樿矾寰勩侳or 10 MoveTo 100, 300 RightClick 1 De...
绛旓細1銆佷笅杞藉畨瑁呭ソ鎸夐敭绮剧伒9涔嬪悗锛屽弻鍑绘闈㈠揩鎹锋柟寮忔墦寮涓荤▼搴忋2銆佺湅鍒版寜閿簿鐏电殑涓鐣岄潰锛岀偣鍑荤▼搴忕晫闈笂鏂圭殑褰曞埗鎸夐挳锛岃繖閲岀殑褰曞埗椤惧悕鎬濅箟褰曞埗鐨勬槸鐢ㄦ埛瑕佸弽澶嶇粡甯歌繘琛屼竴浜涙棩甯告搷浣滐紝姣斿鎵撳紑QQ锛岀櫥褰曞井鍗氱瓑锛閫氳繃鎸夐敭绮剧伒鎶婃搷浣滃綍鍒朵笅鏉ヤ互鍚庡氨鍙互涓閿交鏉炬墽琛岃繖浜涙楠ょ箒鐞愮殑鎿嶄綔浜嗐3銆佷箣鍚庡氨浼氬脊鍑涓涓鍚嶄负鈥...
绛旓細棣栧厛銆傛墦寮鎸夐敭绮剧伒閲岄潰鐨勬柊寤恒傜劧鍚庢彃鍏ヤ綘瑕佽繛鎸夌殑閿傜偣鍙宠竟鐨勮剼鏈睘鎬ч噷闈㈢殑鑴氭湰寰幆,鏀规垚寰幆鍒版寜涓閿備繚瀛橀鍑恒傛寜F10灏变細寮濮嬭繛鎸変簡銆傝鍏冲氨鎸塅12 闂鍏:鎸夐敭绮剧伒閲岄潰鎬庝箞寰楀埌涓涓寜閿殑鎸夐敭鐮 10鍒 鍩烘湰鍛戒护閲 鎸夐敭鍛戒护銆傛渶涓嬮潰閭d釜鍔熻兘灏辨槸鎸夐敭鐮佹煡璇! 闂涔:鎸夐敭绮剧伒鏍囪鐨勪娇鐢ㄦ柟娉 Rem 浣 鏍囪...
绛旓細ALT+F11,鎻掑叆妯″潡锛屽皢涓嬮潰澶嶅埗杩涘幓锛屾妸瑕佹壘鐨勫拰瑕佹浛鎹㈢殑杈撳叆杩""涓紝鏈夊灏戣姹傝緭鍏ュ灏戞潯锛岄鍑哄悗鎸堿LT+F8锛岃繍琛屽畯"鏇挎崲"锛屽畬鎴愭墍鏈夌殑鏇挎崲銆係ub 鏇挎崲()'Cells.Replace What:="A", Replacement:="1"Cells.Replace What:="B", Replacement:="2"...End Sub ...
绛旓細闂浜:鎸夐敭绮剧伒8宸茬粡缂栧ソ鑴氭湰浜,浣嗘槸濡備綍杩愯鍛? 杩欎釜鐣岄潰鏄剼鏈紪杈戠晫闈,浣犲彲浠ュ湪鍙宠竟鑴氭湰鎻忚堪閭i噷缁欏畠閲嶆柊鍐欎釜鍚嶅瓧,鐒跺悗鐐逛笂闈㈢殑鎸夐挳鈥滀繚瀛橀鍑衡,灏辫兘淇濆瓨鑴氭湰骞堕鍥炲埌鎸夐敭绮剧伒涓荤晫闈,鍦ㄩ偅閲屾湁鑴氭湰鍒楄〃,鎵惧埌浣犲垰淇濆瓨鐨勮剼鏈,鐪嬬湅浣犺繖涓剼鏈墠闈⑩滄湁鏁堚濋偅涓鏍忔槸鍚︽湁鍕,娌″嬀鐨勮瘽鍕句笂,鐒跺悗鎶婇渶瑕鐢ㄦ寜閿簿鐏电殑缃戦〉...
绛旓細鏈灏忓寲鐨勭獥鍙o紝閭e氨鏄凡鎵撳紑鐨勫晩 浣犵殑鎰忔濇槸涓嶆槸璇达紝瑕佸垏鎹㈠埌宸茬粡鏈灏忓寲鐨勯偅涓寚瀹氱獥鍙o紵閭i鍏堥渶瑕佺洿鍒颁綘杩欎釜宸茬粡鏈灏忓寲鐨勭獥鍙g殑鍙ユ焺 鐒跺悗锛岀敤鍒涓涓鍐呯疆鎻掍欢锛屽啓娉曞涓 Plugin Window.Show(绐楀彛鍙ユ焺)灏卞彲浠ユ樉绀轰簡