problema para enviar whatsapp

Preciso de uma ajuda, se alguém souber! Tenho uma rotina para enviar mensagens de whatsapp, que tirei daqui mesmo. Funcionava muito bem mas, de uns dias pra cá, parou de funcionar. A rotina abre o whastapp mas não envia nem a mensagem e nem o contato. a rotina é :

Function zap(tel, Texto)
'abre o navegador e cria a mensagem
'verificar se a internet está funcionando
On Error GoTo 1
tel = "+55 " & tel


  Application.FollowHyperlink "https://web.whatsapp.com/send?phone=" & tel & "&text=" & Texto

Exit Function
1:
MsgBox "computador sem internet"
Exit Function

Outra coisa, está demorando muito mais tempo para abrir o aplicativo do que demorava antes.

Olá Sérgio,

Estou na mesma situação.
Não sei se foi uma atualização no modo do WhatApp funcionar no navegador.
O que eu fiz para poder continuar usando "temporariamente" foi trocar web por api, porém não é tão eficiente quanto no modo antigo.


Application.FollowHyperlink "https://api.whatsapp.com/send?phone=" & tel & "&text=" & Texto


Abraço!

Amigos, não adianta.

O Whatsapp sempre fará atualizações que atrapalharão/combaterão as "automatizações" de envio de mensagens.

O método ideal é com o business.

Vejam no link abaixo o assunto abordado
faq.whatsapp.com/general/security-and-privacy/unauthorized-use-of-automated-or-bulk-messaging-on-whatsapp/?lang=pt_br

Eu dei uma lida, Damasceno, mas parece que funciona somente em celular, ou estou errado ?
A solução do API, Lindomar, funciona mas tem que "iniciar conversa" e, depois, ele não reconhece, direto, que está usando o whatsapp web. Como vc disse, é bem menos eficiente.

quis dizer API do whatsapp business.

Qual API vcs usam?

Damasceno,

O que eu fiz no meu sistema e sugeri para o Sérgio foi substituir na linha de comando a palavra web por api, porém é só um "solução" temporária.

Damasceno, segui a sugestão do lindomar. ipsis litteris!