VBA计数--它是如何工作的

Question

下面是一部分代码（自学）。

Sub CopyWorkbook()
    Dim aw As Workbook
    Dim y As Workbook
    Dim sh As Worksheet

    Set aw = Application.ActiveWorkbook
    Set y = Application.Workbooks.Open("S:\Proefbalanse\PastelTB\Segmented General Ledger Trial Balance.XLS")
    'To rename worksheet in Pastel File
    y.Sheets(1).Name = "SGLT"

    For i = 3 To aw.Sheets.Count
        Set sh = SGLT

请解释 "For i = 3 To aw.Sheets.Count"

是指20张工作簿中左起的第3张，还是指 "第3张"。如果我想把Sheet 13设置为SGLT，代码必须是什么。"For i = ? To aw.Sheets.Count"

谢谢你的解释。

亲切的问候

约翰

Answer 1

aw是你的活动excel工作簿。它可能有多个工作表。假设它有20个工作表。

aw.Sheets.Count将是20。

For i = 3到20意味着For循环中的所有语句将在第3张表（左起第3张）上运行，然后是第4张表，以此类推，直到第20张表为止。

要使代码只在第3张纸上工作，只需这样做。

For i = 3 to 3
   ...rest of your code
End for