Re: [VBA ] Excel 的 VBA 編輯視窗 問題-已解決
※ 引述《fatty0860 (喜歡妳)》之銘言:
: 今天自己在練習Excel VBA時遇到一個問題
: 我是使用 Office 2007
: 問題如下
: 我新增了一個巨集並且利用編輯巨集的方式來將內容改成一段VBA如下
: Sub COPY()
: '
: ' COPY Macro
: '
: Dim iRow As Integer
: Dim sPast As String
: Application.Goto Reference:="COPY"
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
我把這一行mark起來就解決囉
: Dim sNewData As Integer
: Dim sRepeat As String
: Sheet1.Range("1:1,2:2,3:3,4:4").Select
: Selection.COPY
: Dim iRepeat As Integer
: iRepeat = Sheet2.Range("B2:B2").Value
: Sheet2.Range("C2:C2").Value = Sheet2.Range("C2:C2").Value + iRepeat
: Sheet1.Range("A" & CStr(Sheet2.Range("C2:C2").Value) & ":A" & CStr(Sheet2.Range("C2:C2").Value)).Select
: ActiveSheet.Paste
: End
: 當我在Excel頁面直接執行巨集時每次都會出現VBA編輯視窗然後執行結果都是正確的
: (也就是每當執行此段程式碼時 都會被focus到VBA編輯視窗去)
: 如果我只是單純的使用錄製的方式產生如下程式碼
: Sub Macro1()
: '
: ' Macro1 Macro
: '
: Range("A3:D6").Select
: Selection.COPY
: Range("A9").Select
: ActiveSheet.Paste
: End Sub
: 在執行巨集時就不會彈出VBA編輯視窗
: 想請問一下是我程式碼寫的有問題還是有甚麼設定要設?
: 才可以讓我在執行該VBA的時候不要顯示VBA編輯視窗
--
歡迎參觀我的blog:http://fatty0860.blogspot.com/
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 219.84.125.164
討論串 (同標題文章)