PK bertanya:
Saya memiliki lembar kerja tempat saya memasukkan beberapa nilai. Setelah mengklik tombol makro, saya ingin nilai atau hasil terhitungnya ditambahkan ke lembar atau file yang berbeda.
Pertanyaan bagus. Misalkan nilainya ada di sel C10 dan E12 dari Sheet1 dan Anda ingin menambahkannya ke baris berikutnya di Sheet2.
Trik sebenarnya di sini adalah kode untuk menemukan baris berikutnya di Sheet2. Mulai dari baris terakhir di Sheet2 (A65536) dan kemudian menggunakan .End (xlup) akan mencari baris terakhir dengan data di kolom A. Menambahkan 1 ke baris itu akan mengarahkan Anda ke baris berikutnya untuk data di Sheet2. Gunakan kode ini:
Sub CopyThem() NextRow = Worksheets("Sheet2").Range("A65536").End(xlUp).Row + 1 Worksheets("Sheet2").Cells(NextRow, 1).Resize(1, 2).Value = Array( _ Worksheets("Sheet1").Range("C10").value, _ Worksheets("Sheet1").Range("E12").value) End Sub
