標題: [發問] 於外部程式Export到Excel .XLT後再自動執行另一個自制SUB [打印本頁]

---

作者: joslau    時間: 2013-12-6 15:00     標題: 於外部程式Export到Excel .XLT後再自動執行另一個自制SUB

大家好

我公司有個程式
可以從程式中用一個Model XLT
找出儲存格名稱再倒入資料

我想在倒入後的資料
執行類似以下的自制SUB

1. Sub fsc()
   
2. 
   
3. Dim m As Long
   
4. 
   
5. For m = 15 To [a65536].End(4).Row
   
6. r1 = LCase(Left(Cells(m, 4), 3))
   
7. 
   
8. If r1 = "FSC" Then
   
9. 
   
10. [b6].FormulaR1C1 = "FSC"
    
11. 
    
12. End If
    
13. 
    
14. Next m
    
15. 
    
16. End Sub

複製代碼

但我用

1. Private Sub Workbook_Open()
   
2. 
   
3.      Call fsc
   
4. 
   
5. End Sub

複製代碼

時
因XLT還未有倒入資料做找尋導致執行無效

請問有沒有可能檢測到
倒入資料後
再執行相關SUB?

(檢測內容長度每次也不一樣)

謝謝!

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)