為什麼這篇excel自動跳下一格鄉民發文收入到精華區:因為在excel自動跳下一格這個討論話題中,有許多相關的文章在討論,這篇最有參考價值!作者JieJuen (David)看板Office標題Re: [問題] excel如何自動跳格?時間...
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