Follow the steps to send bulk messages on whatsapp:
1: Opne excel blank sheet add two headers one for mobile numbers and second for messages and add some mobile number with messages
2. Activate developer tools: Go to file -> options-> customize ribbon-> main tabs and select developer and click ok, You can see developer tools in your menu
3. Go to developer tool and open visual code select your file and click insert-> modules and paste code:
Sub test()
Dim LastRow As Long
Dim i As Integer
Dim strip As String
Dim strPhoneNumber As String
Dim strmessage As String
Dim strPostData As String
Dim IE As Object
LastRow = Range(“A” & Rows.Count).End(xlUp).Row
For i = 2 To LastRow
strPhoneNumber = Sheets(“Data”).Cells(i, 1).Value
strmessage = Sheets(“Data”).Cells(i, 2).Value
Set objShell = CreateObject(“Wscript.Shell”)
strPostData = “chrome.exe https://web.whatsapp.com/send?phone=” & strPhoneNumber & “&text=” & strmessage
objShell.Run strPostData
Application.Wait (Now + TimeValue(“00:00:20”))
Call SendKeys(“{Enter}”, True)
Application.Wait (Now + TimeValue(“00:00:5”))
Call SendKeys(“^w”)
Application.Wait (Now + TimeValue(“00:00:10”))
Set objShell = Nothing
Next i
End Sub
Make sure your sheet name is Data or you can add your sheet name in code click save and save as excel macro-enabled workbook
Login with whatsapp web in your chrom browser and click run
