看板 Office 關於我們 聯絡資訊
軟體:Excel 版本:2016 我現在有一個需求,就是在Excel中,目前在用的儲存格變到在畫面的最上端。 一般來說可用滑鼠的滾動來完成,可是我想設成巨集後,設快捷鍵用鍵盤就能完成。 之前我在Word有類似的需求,我寫的如下 ActiveDocument.ActiveWindow.SmallScroll Down:=70 Selection.MoveUp Unit:=wdLine, Count:=1 Selection.MoveDown Unit:=wdLine, Count:=1 可是在Excel中,我就寫不出來了,我原本寫的如下: ActiveWindow.SmallScroll Down:=27 ActiveCell.Offset(1, 0).Range("A1").Select ActiveCell.Offset(-1, 0).Range("A1").Select 可是儲存格竟然不是移到最上面去,而是在畫面的中間……。 請問要怎麼寫呢? 話說回來,我去google才知道原來巨集的語言就是VBA……我一直以為VBA是個軟體之類的 東西……。 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.36.234.60 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1601401745.A.FF4.html
soyoso: 以application.goto,scroll為真 09/30 07:11
呃,上網google了「application.goto」,可是還是不會寫……能請您幫我寫 一下嗎?我最近才學會錄製巨集的……寫的語法也是看錄製後的語法是怎樣才會的。 ※ 編輯: ddqueen (114.36.234.60 臺灣), 09/30/2020 19:24:13
soyoso: 假設,application.goto range("b10"),true 09/30 19:26
soyoso: 就是儲存格b10在最左上角 09/30 19:26
soyoso: 要用range.offset的話,就調整一下,但不要加入.select的 09/30 19:28
soyoso: 部分 09/30 19:28
還是不會寫也。@@ ※ 編輯: ddqueen (114.36.231.122 臺灣), 10/26/2020 20:00:02 後來問到了,用ActiveWindow.ScrollRow = Selection.Row就可以了。 ※ 編輯: ddqueen (114.36.231.122 臺灣), 10/28/2020 02:54:29