Mr De Premor
terima kasih dah dapat yang saya maksudkan. iya selalu ada kata laporan. jadi
saya pakai Range("D" & lRow) = Mid(sht.Range("A2"), 8) seperti yang Mr De
Premor sarankan.
berhubung hasilnya masih meninggalkan 1 spasi didepannya maka saya ganti angka
8 menjadi angka 9, seperti berikut ini : Range("D" & lRow) =
Mid(sht.Range("A2"), 9)
Nanti menyusul lagi ya permintaan saya. :) maklum buta macro banget.
terima kasih.
ASL
To: [email protected]
From: [email protected]
Date: Fri, 2 Aug 2013 10:40:16 +0700
Subject: Re: [belajar-excel] Fungsi Excel dalam Macro
Kalau yang ingin dibuang adalah kata Laporan-nya, dan bisa
dipastikan didepannya pasti ada kata Laporan nya
maka bisa menggunakan fungsi MID buat memotong 7 karakter milik kata
Laporan + 1 milik Spasi
Range("D" & lRow) = MID(sht.Range("A2"),8)
Jika di range A2 tidak pasti ada kata laporannya, bisa menggunakan
fungsi replace, seperti yang sudah disampaikan dengan sangat jelas
oleh Mr. Kid
Pada 02/08/2013 9:15, Ahmad Syaifullah
Lubis menulis:
Range("D" & lRow) = sht.Range("A2")
