send whatsapp message from excel with image file

Join us and get VBA Codes.. contact us @ms_designs53 on instagram

get new updated codes here in link below
   • How to send PDF from excel to whatsap...  

send whatsapp message through excel
send whatsapp message from excel sheet through vba
whatsapp automatic msg send
whatsapp automated messages
whatsapp automation

for vba codes join my channel
click on join button

Sub Excel_to_WhatsApp()

Dim WhatsAppNumber As String

Dim lastRecepientNumber As Long

Dim x As Integer

Dim Message As String

Dim DispatchMsg As String

Dim WhatsAppWeb As Object

lastRecepientNumber = Range("B" & Rows.Count).End(xlUp).row

For x = 2 To lastRecepientNumber

WhatsAppNumber = Sheets("Sheet1").Range("b" & x).Value

Message = Sheets("Sheet1").Range("c" & x).Value

ActiveSheet.Shapes(1).Copy

DispatchMsg = "whatsapp://send?phone=" & WhatsAppNumber & "&text=" & Message

Set WhatsAppWeb = CreateObject("InternetExplorer.Application")
WhatsAppWeb.navigate DispatchMsg
Application.Wait (Now + TimeValue("00:00:05"))

Call SendKeys("^v")

Application.Wait (Now + TimeValue("00:00:05"))

Call SendKeys("{ENTER}", True)


Next x


End Sub

ms_designs53

#MSDesigns
#msdesigns53
#funwithfood
#TheBChannel