Saya ingin menyalin satu lembar ke beberapa lembar di buku kerja yang sama dengan makro, saya tahu bagaimana melakukannya tetapi saya masih memiliki pertanyaan lebih lanjut.
Saya menggunakan rumus:
Sub Button3_Click()
Dim x As Integer
Dim y As Integer
x = InputBox("How many copies you want?")
For numtimes = 1 To x
ActiveWorkbook.Sheets("Sheet1").Copy _
After:=ActiveWorkbook.Sheets("Sheet1")
Next
End Sub
Katakanlah saya menyalin satu lembar menjadi 5 lembar baru, Nama lembar tersebut adalah:
Sheet 1 | Sheet 1 (2) | Sheet 1 (3) | Sheet 1 (4) | Sheet 1 (5) | Sheet 1 (6)
Yang saya inginkan adalah:
the formula in the "Sheet 1 (2)" Cell A1 is "='Sheet 1'A1+1" and
the formula in the "Sheet 1 (3) cell A1 is "='Sheet 1 (2)'A1+1: and
the formula in the "Sheet 1 (4) cell A1 is "='Sheet 1 (3)'A1+1: and
the formula in the "Sheet 1 (5) cell A1 is "='Sheet 1 (4)'A1+1: and
Atau apa pun rumusnya, saya hanya ingin sel sheet A1 berikutnya merujuk ke angka dengan +1 dari lembar sebelumnya. (Sama seperti halaman).
Saya ingin tahu bagaimana melakukannya terutama di excel 2003?