Re: [問題] excel如何自動跳格?

看板Office作者JieJuen (David)時間17年前 (2008/07/31 06:11)推噓0(0推 0噓 0→)

留言0則, 0人參與討論串3/3 (看更多)

google (excel 跳格) 之結果 http://topic.csdn.net/t/20050609/16/4071188.html 經測試有效替代方案也許在某格先輸入好用MID取出其中某位數附上網址中內容 -- 打開你的Excel文檔，點擊“工具”->巨集->巨集,輸入auto_open點擊創建進入代碼編輯視窗,輸入代碼,然後保存退出,重新打開文檔就生效: Sub auto_open() Application.OnKey "0", "a" Application.OnKey "1", "b" End Sub Sub a() ActiveCell.Value = 0 SendKeys "{Enter}" End Sub Sub b() ActiveCell.Value = 1 SendKeys "{Enter}" End Sub 說明: (1)Application.OnKey "0", "a"表示按下主鍵盤上的0(小鍵盤沒效,如果你需要自已補充),就執行a過程. (2)在Sub a()和Sub b()裏是根據不同的按鍵輸入不同的數值,再用SendKeys "{Enter}"輸入回車,你可以在"工具"->選項->編輯裏面設置Enter鍵的方向. (3)其餘數字鍵的設置你參考上面自已補充.這裏僅抛磚引玉. -- 若要小鍵盤也有效更改如下 Sub auto_open() Application.OnKey "{96}", "a" Application.OnKey "{97}", "b" End Sub Sub a() ActiveCell.Value = 0 SendKeys "~" End Sub Sub b() ActiveCell.Value = 1 SendKeys "{Enter}" End Sub 其中"~"亦表Enter 見說明檔 "OnKey 方法" Keycode相關可見 http://www.phpweblog.net/kiyone/archive/2007/04/19/1138.html http://cat14051.mysinablog.com/index.php?op=ViewArticle&articleId=61764 ※ 引述《haur (小C)》之銘言： : ※ 引述《haur (小C)》之銘言： : : 標題: [問題] excel如何自動跳格? : : 時間: Fri Jul 25 14:14:41 2008 : : 您所使用的軟體為:office excel : : 版本:2003 : : 問題: : : 我想要在儲存格內, 輸入0或1. : : 輸入完後, 直接可以跳下列同一行. : : 而不用按enter. : : 我不會寫程式. : : 好像不是容易作到. : : -- : : ◆ From: 59.124.15.198 : : → jaajal:沒有按ENTER電腦應該就不知你是否完成輸入吧怎可能跳行 07/26 15:52 : : → JieJuen:說說目的為何或有替代方案 07/27 23:18 : 是要輸入問卷資料用, 245題的問卷, 一直按enter很累. : 想要像 access 裡的遮罩和自動定位點一樣. : 固定儲存格寬度, 只要按 0 或 1, 就可以跳下一格. -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.164.48.162