Maaf, gagal paham kasusnya :( Kid
2016-03-04 19:39 GMT+07:00 'Dede Sulaeman' [email protected] [belajar-excel] < [email protected]>: > > > Dear Mr Kid, > > > > Menyambung Soal Makro Kirim Email. > > Sekarang kumat lagi, kenapa yah....? > > Mohon masukannya. > > > > Salam, > > DD > > > > Note: Saya kirim sebanyak 152. (152 baris di sheet “Kirim”) > > > > > ------------------------------------------------------------------------------------ > > > > Dear MR Kid, > > > > > > Saking sibuknya baru gabung lg nih,... > > > > Terimakasih Mr atas masukannya. SUKSES... > > > > > > > > Salam, > > > > DD > > > ------------------------------------------------------------------------------------- > > > > Hai DD, > > > > Coba ubah bagian : > > > > If Trim(FileCell) <> "" Then > > > > If Dir(FileCell.Value) <> "" Then > > > > .Attachments.Add FileCell.Value > > > > End If > > > > End If > > > > menjadi : > > > > > > > > If Len(Dir(Trim(FileCell.Value))) <> 0 Then > > > > .Attachments.Add trim(FileCell.Value) > > > > End If > > > > > > > > > > > > Wassalam, > > > > Kid > > > > >
