回覆列表
  • 1 # Xccelerator

    獲取表單Sheet可以使用Worksheet.Sheets(index),for each 迴圈Sheet,但是順序都是按照物件的先後順序來獲取到的,如果要一定按照數字的順序來。只能是先獲取到所有的表單,再按照數字順序獲取表單進行處理

  • 2 # 望月兄

    有辦法的,這裡介紹3種引用Sheet的方法。

    檢視結論請拖到最後看黑體字哦!

    使用worksheet方法指定對應sheet,有幾種方法。

    1、Sheet1.Range("A1").Value= "指定的值"

    引用的是這裡的名稱:

    這裡要說明一下,如果採用的是Sheet1這樣的寫法,只能指定本工作簿即Thisworkbook的Sheet1。Sheet1前面不能有任何的父物件。即我們不能在前面加任何Workbook父物件,否則是會報錯的。

    2、Sheets(index)的寫法

    這個寫法語言不知道如何表達,直接上圖。

    這個簡單來說就是EXCEL前面是什麼順序,sheets(index)就是如何展示的。

    3、sheets("sheet名")

    這個就是引用具體的名稱。

    所以回到樓主的題目!

    可以把Sheet和標號n拼接成字串,然後採取第3種寫法。

    具體程式碼如下:

    此處可以複製:

    Option Explicit

    Sub test()

    Dim n As Integer

    Dim numStr As String

    For n = 1 To 10

    numStr = "Sheet" & n

    Sheets(numStr).Cells(1, 1).Value = n

    Next

    End Sub

  • 中秋節和大豐收的關聯?
  • 如何把一句話寫具體?