請問讀取各SHEET的儲存格的值 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 請問讀取各SHEET的儲存格的值

返回列表下一主題上一主題發帖

[發問] 請問讀取各SHEET的儲存格的值

高中生 Rank: 3 Rank: 3

帖子: 835
主題: 6
精華: 0
積分: 915
點名: 0
作業系統: Win 10,7
軟體版本: 2019,2013,2003
閱讀權限: 50
性別: 男
註冊時間: 2010-5-3
最後登錄: 2025-7-5

1^# 跳轉到 »

發表於 2013-7-23 22:50 | 顯示全部帖子

本帖最後由 luhpro 於 2013-7-23 22:52 編輯

回復 1# wu731230

Sub nn()
Dim iI%
With Sheets(100)
For iI = 1 To 99
.Cells(iI, 1) = Sheets(CStr(iI)).[A1]
Next iI
End With
End Sub

複製代碼

靜思自在 : 人的心地是一畦田，土地沒有播下好種子，也長不出好的果實。 -

返回列表下一主題上一主題