作者fatty0860 (喜欢你)
看板Visual_Basic
标题Re: [VBA ] Excel 的 VBA 编辑视窗 问题-已解决
时间Fri May 30 13:28:38 2008
※ 引述《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