Hai Ahmad,
Ganti :
Range("D" & lRow) = sht.Range("A2")
dengan
Range("D" & lRow)*.value* = Replace$(sht.Range("A2") , "Laporan
",vbnullstring)
(sorry, saya masuk aliran yang tidak suka menggunakan default property,
agar tingkat ketertukaran dengan bahasa pemrograman lain bisa lebih tinggi
karena mudah dikonversi ke dalam bahasa pemrograman lain)
Wassalam,
Kid.
2013/8/2 Ahmad Syaifullah Lubis <[email protected]>
> **
>
>
> Mr De Premor & Excellers,
> Mohon dibantu ya,
> saya ingin belajar langsung praktek dari hasil macro Mr De Premor kirimkan
> tempo hari mengenai rekap nama2 workbook.
> bagaimana ya cara mempergunakan fungsi excel di dalam macro.
> sebagai contoh : Mr De Premor menuliskan dalam macro sbb : Range("D" &
> lRow) = sht.Range("A2") -> ini adalah untuk mengisi jenis laporan. Sehingga
> hasilnya adalah "Laporan Mandiri".
> pertanyaannya : bagaimana caranya agar yang diisi jenis laporan itu
> hanyalah nama banknya saja, jadi kata Laporan dibuang. bagaimana caranya
> agar fungsi TRIM(RIGHT(D6;LEN(D6)-7)) yang akan membuang kata : "Laporan"
> dalam macro tsb. Dengan kata lain saya tidak bisa menggabungkan penulisan
> macro dari Range("D" & lRow) = sht.Range("A2") digabungkan dengan funsi
> dari TRIM(RIGHT(D6;LEN(D6)-7)) yang mana yang saya tahu fungsi dari
> trim(right(len) akan membuang 7 karakter di depannya.
> Terima Kasih.
> ASL.
>
>
>
>
