12
返回列表 上一主題 發帖

[發問] 如何在儲存格內下Ctrl+Shift+Enter指令(oobird 已解答)

av8d

帖子
703 
主題
276 
精華
0 
積分
1005 
點名
1  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2024-5-29 
5# 跳轉到 »
發表於 2012-2-17 16:38 | 只看該作者
回復 4# GBKEE


    版主您好~因為是寫在Workbook裡面~

Private Sub Workbook_Open()

End Su

TOP

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
4#
發表於 2012-2-17 13:50 | 只看該作者
回復 3# av8d
執行Application.SendKeys    必須用圖片 或按鈕 指定 巨集 來執行, 或 如圖

TOP

av8d

帖子
703 
主題
276 
精華
0 
積分
1005 
點名
1  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2024-5-29 
3#
發表於 2012-2-17 13:16 | 只看該作者
回復 2# GBKEE


    版主您好，您辛苦了，但是它出現一個錯誤訊息，我點了一下說明
必須指定搜索字串

當在物件瀏覽器中搜索時，必須輸入字串。該錯誤有以下原因和解決方案：
在 Object Browser 中開始了一個索，但沒有指定要索的文字。
輸入索字串。
關於其它資訊，請選中有問題的條目並按 F1 鍵 (在 Windows中) 或 HELP (對於 Macintosh)。

TOP

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
2#
發表於 2012-2-17 11:36 | 只看該作者
回復 1# av8d
  1. Sub aa()
  2.     Range("B1").Select
  3.     Range("B1") = "=SUM(A1:A10)"
  4.     Application.SendKeys "{F2}"
  5.     Application.SendKeys "^+~"
  6. End Sub
複製代碼

TOP

        靜思自在 : 成功是優點的發揮，失敗是缺點的累積。
12
返回列表 上一主題