maap pak yono.. saya coba2 sendiri keknya sudah berhasil...makasih banyak...
ntar kalo ada yg mau saya tanyakan lagi.. jangan marah ya kalo banyak nanya..
hehe.. thx alot.
Pada Jumat, 9 Oktober 2015 19:00, "Ivan Sebastian layona...@yahoo.co.id
[belajar-excel]" menulis:
terima
Dear Mr. Kid
Terima kasih atas bantuan dan pencerahannya.
Wassalam
Pada Kamis, 8 Oktober 2015 8:58, "'Mr. Kid' mr.nm...@gmail.com
[belajar-excel]" menulis:
Hai Rudhie,
File terlampir.
Wassalamu'alaikum
Kid
2015-10-07 3:00 GMT+07:00 Rudhie rudhied...@yahoo.com [belajar-exc
terima kasih pak yono.. cuman kayaknya masih ada miss sedikit nih.. bagian
report kolom i saya pinginnya bisa langsung keluar statusnya "tidak terbayar"
setiap kotak report muncul.. maap kl banyak minta bantuannya pak..terima
kasih...saya cuman bisanya via record makro.. kalo rumus beginian masi
Sore Pak Ivan
Coba seperti ini.
Sub ISI()
Dim rowData As Integer
Dim rowHasil As Integer
Dim rowPaste As Integer
'Jarak setiap nota 25 row.
'row dihapus samape 35000
Rows("4:35000").Delete Shift:=xlUp
' titik awal pengambilan data
rowData = 22
rowHasil = 2
rowPaste = 1
Range("A1:I3").Copy
With Sh
Terima kasih Mr.kid, sangat mantap sekali jawabnnya :)
5 matches
Mail list logo