[算表] 巨集跨工作表後 無法成功執行
軟體: MS Office Excel
版本: 2003
感謝office版，讓每天生產報表的時間下降了不少，
不過目前碰到個問題是， 目前我將我要的巨集都放在A檔裡，
唯下一個巨集(網路上找來修改的)，它跨檔案(ex:B.xls)使用便失去正常效果，
Sub 自動增加90表()
Dim i As Integer
For i =90 To 1 Step -1
ActiveWorkbook.Sheets.Add before:=ThisWorkbook.Sheets(1)
ThisWorkbook.Sheets(1).Name = i & "A日期"
Next i
End Sub
只要一在B.xls執行，它會變在巨集的檔案A.xls，其Sheet1會被改為1A日期，
而選擇的B.xls，則是只會增加90個sheet，
請問這是哪一段有問題呢，是否需要修改哪一項呢??
要再麻煩大家解惑 了，謝謝~
--
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.74.194.125
※ 編輯: taians 來自: 203.74.194.125 (04/06 12:54)
→
04/06 15:07, , 1F
04/06 15:07, 1F
安安，謝謝
B.xls是以每天日期為檔名，所產出的報表(每天一個檔)，所以這樣改法，
可能會我原來的做法一樣(之前是新開一檔，把巨集用上去再把資料貼上)，
是否有可以在「正開啟的工作表」即可執行的方法嗎~ 謝謝^^"
※ 編輯: taians 來自: 111.251.231.209 (04/06 19:20)
→
04/06 23:59, , 2F
04/06 23:59, 2F
→
04/10 01:23, , 3F
04/10 01:23, 3F
Office 近期熱門文章
PTT數位生活區 即時熱門文章
