Pak Hendrik. terima kasih jawabannya. Tapi saya sudah dapatkan jawabannya.
:
Private Sub CommandButton5_Click()
Dim repeatku As Integer
For repeatku = 1 To 12
Range("W80").Select
ActiveCell.Offset(0, repeatku) = "Non Prod Hrs"
ActiveCell.Offset(0, repeatku + 1) = "Prod Hrs"
ActiveCell.Offset(0, repeatku + 2) = "Std Hrs"
repeatku = repeatku + 2
Next repeatku
End Sub
Problem solved.
Wassalam
Tio
hendrikkarnadi <[email protected]>
Sent by: [email protected]
02/19/2013 09:38 PM
Please respond to belajar-excel
To: [email protected]
cc:
Subject: RE: [belajar-excel] Menginput cells di setiap kelipatan
3 sebanyak 4 kali
Coba pakai macro recording.
Salam,
Hendrik
Sent from Samsung Mobile
[email protected] wrote:
Dear Be-Exceller,
Saya mau tanya. Saya mau input cell di tiap 3 kolom dari kolom pertama
sebanyak 4x dengan text = "aku". Bagaimana yah caranya ?
Saya sudah coba dengan for next berkali2, tapi gak berhasil2.
Terima kasih,
Wassalam,
Tio
