I believe it's possible. I've never done it though. I don't use WhatsApp.

Only if you're a business user

https://developers.facebook.com/docs/whatsapp/

Thank Alex. I do have a business account. I will try to figure out what to do.

I found the following code on the net. What do you think.
Dim dbe
        Dim db
        Dim dbr
        Dim wsh
        Dim iRow
        Dim ch
        
        Set dbe = CreateObject("DAO.DBEngin.36")
        Set db = dbe.OpenDatabase("D:\vbsWhatsapp\dbWhatsapp.mdb")
        Set dbr = db.OpenRecordset("Select*from tbl_phone")
        
        dbr.MoveLast
        dbr.MoveFirst
        
        Set ch = CreateObject("Selenuim.ChromeDriver")
        
        ch.start
        ch.Get "https://web.whatsapp.com"
        wscript.Sleep 10000
        
        Do
        
        iRow = iRow + 1
        ch.Get "https://web.whatsapp.com/send?phone=" & dbr.Fields(1).Value & "&text=" & dbr.Fields(2).Value & " &source=&data="
        wscript.Sleep 10000
        ch.SendKeys ch.keys.Enter
        wscript.Sleep 10000
        dbr.MoveNext
        
        Loop Until iRowm = dbr.RecordCount - 1

That's just opening a website and sending it that way using Selenuim.ChromeDriver.
You're better off looking into the API.

Ok Thanks

There's an error in the SQL statement (improper spacing) but I've always said... "if it works... it works." :)