- 帖子
- 5
- 主題
- 2
- 精華
- 0
- 積分
- 7
- 點名
- 0
- 作業系統
- win7
- 軟體版本
- office2010
- 閱讀權限
- 10
- 註冊時間
- 2015-12-5
- 最後登錄
- 2016-4-27
|
請問這段程式碼主要的用意?感恩
範例一Dim INP As String
INP = ActiveSheet.Name
With Worksheets(INP)
For Each qyt In .QueryTables
qyt.Delete
Next
End With
範例二Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim qyt As QueryTable
For Each qyt In Worksheets("xxx").QueryTables
qyt.Delete
Next
Set qyt = Nothing
End Sub
問題1. 請問上面兩段是為了清除連線嗎?
問題2. 第二段有加 Set qyt = Nothing, 用意為何? 又代表什麼?
問題3. 常聽友人說迴圈抓網頁資料會越變變慢?為何? |
|