Masih belum jalan juga VBA nya

  1. 6 hari yang lalu

    selamat siang para Master Excel
    saya mencoba belajar (fomula) membuat VBA excel yang saya adob dari beberapa sumber (Youtube, be-org, jkp ads, exceljet) dengan harapan bisa mengirim ratusan data secara otomatis melalui email ke masing-masing karyawan. akan tetapi dari beberapa tombol yang dibuat ada 1 tombol yang tidak berfungsi yaitu tombol Export & kirim via email (hanya kirim email saja yang tidak bisa). mohon pencerahan para suhu excel om @Caton @SunnyAlv @Azumi @windhu PS @Herry @Eunike Abigail kekurangan dan kesalahan dalam pembuatan VBA Excel ini agar bisa berfungsi sesuai harapan.

    file contoh kasus terlampir

  2. mungkin bisa dicoba pakai aplikasi Mozilla Thunderbird sebagai tool Send emailnya (Akun pengirimnya di daftarkan dulu di Thunderbird)

    Shell ("C:\Program Files\Mozilla Thunderbird\thunderbird -compose " & Chr$(34) & "to=" & NamaPenerima & ",subject=Slip GAJI Karyawan Payroll,body= "",attachment=" & Data & Chr$(34)) ==> untuk C:\Program Files\Mozilla Thunderbird\thunderbird bisa diganti C:\Program Files (x86)\Mozilla Thunderbird\thunderbird tergantung letak folder filenya

  3. om @Herry terimakasih atas pencerahannya.
    ada cara lain ga selain pakai Mozilla thunderbird.
    karena saya coba pakai Mozila thunderbird tombol untuk kirim emailnya tidak bisa digunakan
    terimakasih suhu

  4. Di sunting 6 hari yang lalu oleh Herry

    apakah pendaftaran akun email pengirim udah berhasil di mozilla thunderbird klu sudah berhasil seharusnya bisa kirim. kebanyakan sih orang2 pakai outlook untuk send tapi saya tidak bisa coba karena daftarkan akun di outlooknya gagal terus.
    intinya untuk bisa pakai tombol send di mozilla thunderbird atau outlook wajib berhasil pendaftaran akun email yang digunakan untuk sebagai pengirim

    https://www.hostinger.co.id/tutorial/cara-setting-email-di-thunderbird

  5. Om @Harry tadi sudah daftar akun email di mozzila thunderbird beberapa kali tp belum berhasil juga alias gagal terus.
    seandainya pakai akun gmail, kira2 ada solusi ga om.

    terimakasih

  6. seandainya pakai akun gmail, kira2 ada solusi ga om ==> gagal The transport failed to connect to the server (gak paham pengaturannya). atau coba matikan firewall dan antivirusnya takutnya diblok koneksinya.

  7. 15 jam yang lalu

    om @Harry saya sudah berhasil membuat account mozila thunderbird tp VBA nya belum bisa juga.
    mohon koreksi nya

    With Ws
    Last = .Cells(.Rows.Count, "B").End(xlUp).Row
    For X = 8 To Last
    NamaPenerima = .Cells(X, "AA")
    Data = ThisWorkbook.Path & "\" & Format(.Cells(X, "A"), "000") & "-" & .Cells(X, "D") & .Cells(X, "B") & ".pdf"
    Shell ("C:\Users\tedy.rohendy\AppData\Local\Mozilla Thunderbird" & Chr$(34) & "to=" & NamaPenerima & _
    ",subject=Slip GAJI Karyawan Payroll,body= "",attachment=" & Data & Chr$(34))
    Application.Wait (Now + TimeValue("0:00:03"))
    SendKeys "^{ENTER}", True
    Application.Wait (Now + TimeValue("0:00:12"))

  8. om @Herry terlampir SS dari vba nya

  9. 14 jam yang lalu

    C:\Users\tedy.rohendy\AppData\Local\Mozilla Thunderbird ==> apakah benar letak install mozilla Thunderbirdnya di sana ?
    standarnya C:\Program Files\Mozilla Thunderbird\thunderbird atau C:\Program Files (x86)\Mozilla Thunderbird\thunderbird tergantung letak folder filenya (versi Windowsnya)

    perintah -compose jangan lupa di masukan
    Shell ("C:\Program Files\Mozilla Thunderbird\thunderbird -compose " & Chr$(34) & "to=" & NamaPenerima & ",subject=Slip GAJI Karyawan Payroll,body= "",attachment=" & Data & Chr$(34))

    untuk mempercepat wait timenya bisa di rubah
    Application.Wait (Now + TimeValue("0:00:03"))
    SendKeys "^{ENTER}", True
    Application.Wait (Now + TimeValue("0:00:12"))

 

atau Mendaftar untuk ikut berdiskusi!