Re: [問題] excel如何自動跳格?(巨集相關問題)
我對這個巨集做了修改
改成用小鍵盤按1~5可以自動按enter
但只要按3就會出現找不到 'Sheet1!A:A'
1245都可以自動ENTER
請問何解？
以下是巨集：
Sub auto_open()
Application.OnKey "{97}", "a"
Application.OnKey "{98}", "b"
Application.OnKey "{99}", "c"
Application.OnKey "{100}", "d"
Application.OnKey "{101}", "e"
End Sub
Sub a()
ActiveCell.Value = 1
SendKeys "{Enter}"
End Sub
Sub b()
ActiveCell.Value = 2
SendKeys "{Enter}"
End Sub
Sub c()
ActiveCell.Value = 3
SendKeys "{Enter}"
End Sub
Sub d()
ActiveCell.Value = 4
SendKeys "{Enter}"
End Sub
Sub e()
ActiveCell.Value = 5
SendKeys "{Enter}"
End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.127.113.131
※ 編輯: anandydy529 來自: 140.127.113.131 (04/02 14:51)
Office 近期熱門文章
PTT數位生活區 即時熱門文章
