Tampilkan postingan dengan label Excel VBA. Tampilkan semua postingan
Tampilkan postingan dengan label Excel VBA. Tampilkan semua postingan

Selasa, 27 Juli 2021

Kirim Whatsapp dari excel

Kirim pesan whatsapp dari excel dengan menggunakan scripts VBA sangat berguna ketika kita ingin mengirimkan laporan atau apapun yang diminta oleh rekan kerja atau atasan kita. nah karena kita saat ini harus dan mau tidak mau menggunakan dan memanfatkan teknologi apalagi saat ini karyawan ataupun perusahaan dipaksa berubah dari yang manual menuju dan harus otomasi memanfaatkna teknologi 4.0. ok cukup orasinya. saatnya kita mulai tutorialnya. tutoral ini sangat sederhana dengan beberapa baris kode saja untuk itu jika kalian perlu mengembangkannya menjadi lebih edvance silakan. :) first of all kita buat sebuah tabel yang terdapat kolom header dan isi buat saja seperti gambar dan satu buah tombol button command yang di ambil dari menu developer lalu command button. untuk lebih jelasnya lihat gambar

sekarang klik pilih menu design mode lihat gambar

Kemudian klik dua kali button command dan tuliskan code berikut. Private Sub CmdKirim_Click() Dim NoWA As String Dim Pesan As String NoWA = Range("D4").Value Pesan = vbNewLine & "*WARUNG ARLEEO*" & Range("E4").Value ActiveWorkbook.FollowHyperlink Address:="https://api.whatsapp.com/send?phone=" + NoWA + "&text=" & Pesan End Sub untuk lebih jelas lihat gambar


sekarang disable mode design dengan cara klik design mode jika sudah sekarang coba untuk kirim pesan dengan mengklik tombol kirim selesai dan jika kurang jelas silakan kunjungi youtube saya di link youtube atau www.youtube.com/c/leomjb semoga bermanfaat