EXCEL中，新的工作表需要參照甲工作表內的儲存格。 例: N1工作表(新增第一張工作表)要用甲!C2， N2工作表(新增第二張工作表)要用甲!C3， N3工作表(新增第三張工作表)要用甲!C4... 依此類推， 請問我要新增上百筆的工作表， 用什麼公式才能讓儲存格跟著遞增?
回答 (1)
2016-05-10 12:42 pm
N1工作表(新增第一張工作表)要用甲!C2
???欠缺一個條件
N1的A1=甲!C2
N2的A2=甲!C3
...
Sub test()
Dim x As Long
x = InputBox("請輸入工作表數量", "請輸入工作表數量")
For i = 1 To x
With Sheets.Add(after:=Sheets(Sheets.Count))
.Name = "N" & i
Cells(i, 1) = Sheets("甲").Cells(i + 1, 3)
End With
Next
End Sub
???欠缺一個條件
N1的A1=甲!C2
N2的A2=甲!C3
...
Sub test()
Dim x As Long
x = InputBox("請輸入工作表數量", "請輸入工作表數量")
For i = 1 To x
With Sheets.Add(after:=Sheets(Sheets.Count))
.Name = "N" & i
Cells(i, 1) = Sheets("甲").Cells(i + 1, 3)
End With
Next
End Sub
收錄日期: 2021-05-03 13:46:11
原文連結 [永久失效]:
https://hk.answers.yahoo.com/question/index?qid=20160509191836AADBlN0