Ellerinize sağlık çok güzel çalışma olmuş ama şöyle bir problemle karşılaşıyorum. whatsappda olmayan birine mesaj göndermeye çalıştığımda "URL YOLUYLA PAYLAŞILAN TELEFON NUMARASI GEÇERSİZDİR." diye bir hata alıyorum tamama bastıktan sonra bir sonraki kişiye de mesaj göndermiyor bunu nasıl...
Çok teşekkür ederim. Eğer bu şekilde müşterilerimden geri dönüş alabilirsem. Daha hızlı olması açısından programınız için sizinle iletişime geçeceğim. Tekrardan teşekkürler.
...mesaj göndermekte.
Private Sub CommandButton1_Click()
For i = 2 To 3
Dim ie As InternetExplorer
Set ie = New InternetExplorer
'https://web.whatsapp.com/send?phone=+++
ie.Navigate "https://web.whatsapp.com/send?phone=" & Cells(i, 1) & "&text=" & Cells(i, 2)
Application.Wait Now +...
Merhabalar
İnternetten bulduğum aşağıdaki kodu kullanmak istiyorum. Kod whatsapp'dan toplu mesaj atmaya yarıyor ama her mesaj için ayrı ayrı sekme açıyor. Kodu paylaşıyorum. Acil yardımcı olursanız çok sevinirim.
Private Sub CommandButton1_Click()
For i = 2 To 3
Dim ie As InternetExplorer
Set ie...
...aşağıdaki komut ile açabiliyorum, program aktif oluyor. Her defasında kapatıp açmam gerekiyor.
AppVal = Shell("C:\Users\kalitesistem\Desktop\ÇALIŞMALAR\WHATSAPP\WhatsAppSetup.EXE", 1)
Ben programı kapatmadan, açık olan programa hangi komut ile geçerim (aktif ederim). Böyle bir makro var mı?
Bilgisayarımda AÇIK olan Masaüstü Whatsapp programına excel makro ile geçiş yapabilir miyim. Ekranda aktif etmek.
Kapalı exe dosyasını açıyorum ama açık dosyaya nasıl geçerim bilmiyorum.
Amacım asağıdaki komutlarlarla yönetmek. Yardımcı olursanız sevinirim.
Call SendKeys("{TAB}", True)...
Kayıtlı veya kayıtsız numaralara mesaj veya dosya atıyor.
Uygulamanın çalışması için Selenium kurulu olması gerekiyor.
Nasıl kurulduğu ile ilgili bir çok video var. Buradaki videomun ilk kısmında nasıl kurulduğu var.
Link
Ustalar çok daha iyisini yapacağına eminim. Benimki amatör oldu. Maksat...
...4 bu konuda hazırlanmış "third party" uygulamalar genelde vardır. test edip işe yarıyorsa lisanslı kullanıcı olmak avantajlı olabilir.
5 edge için hazırlanmış aşağıdaki add-on denenebilir.
https://microsoftedge.microsoft.com/addons/detail/watexter-for-whatsapp™-/flkkkdckojidgcjkaiilpnkahhaoolkf
bunun uyarlaması
Sub xlTR_193181_whatsapp_üzerinden_mesaj_SendKeys()
Dim waMsg As String
Dim lRow As Long
lRow = ActiveCell.Row
waMsg = waMsg & "Sayın " & Range("Y" & lRow) & " " & Range("B" & lRow) & vbCrLf
waMsg = waMsg & "Sipariş Ve Risk Bilgileri Asagıdaki...
ilgili API yüklenmiş olmalı.
bunun uyarlaması:
Sub xlTR_193181_whatsapp_üzerinden_mesaj_api()
Dim IE As Object
Dim waMsg As String
Dim lRow As Long
lRow = ActiveCell.Row
waMsg = waMsg & "Sayın " & Range("Y" & lRow) & " " & Range("B" & lRow) & vbCrLf
waMsg =...
...bilgim olmadığı maalesef uyarlayamıyorum..
bu forumda arkadaşlar bazı örnekler yapmışlar. aşağıdaki linkte payalaşıyorum. vba bilgim olmadığı için örneklerden uyarlayamadım. yardımcı olursanız sevinirim.
https://www.excel.web.tr/threads/excelde-web-whatsapp-ile-metin-ve-resim-goenderme.192825/
şuradaki 2 no.lu cevapta WhatsApp API indirildikten sonra kullanılabilecek bir kod verilmiş.
iş yerinde pek fazla download imkanı olmadığından test edemedim.
belki işe yarar.
https://stackoverflow.com/questions/62482567/excel-vba-to-send-text-message-to-whatsapp
excell içerisinde bir buton oluşturup aktif satırı işaretleyip o satırdaki bilgileri whatsapp yolu ile göndermek istiyorum yardımcı olursanız sevinirim. örnek olarak aşagıdaki gibi göndermek istiyorum. yardımcı olursanız sevinirim.
Sayın 120-40-35-006 CARİ1
Sipariş Ve Risk Bilgileri Asagıdaki...
merhaba ;
bir buton ile aktif satırdaki bilgileri tanımlı hücredeki numaraya whatsapp yolu ile göndermek istiyorum. excell içerisnde detaylar mevcuttur. yardımcı olursanız sevinirim.
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.