Это видео недоступно.
Сожалеем об этом.
Send message on UNSAVED NUMBERS from Excel to Whatsapp | VBA
- Добавить в
- Мой плейлист
- Посмотреть позже
- Поделиться
Поделиться
HTML-код
Размер видео:
- Опубликовано: 19 авг 2024
Комментарии • 89
Следующие
Автовоспроизведение
Change Position of ROWS & COLUMNS in MS Excel | MS Excel में रो और कॉलम की दिशा बदलेंTech ALERT
Просмотров 155
Excel to Whatsapp messages | Image / Audio / Video / PDFs / Documents all in one VBA Code 🔥🔥🔥Tech ALERT
Просмотров 70 тыс.
Send Unlimited messages from EXCEL to Whatsapp automatically | एक्सेल से व्हात्सप्प पर मेसेज भेजेंTech ALERT
Просмотров 29 тыс.
Le Havre vs PSG | LIGUE 1 HIGHLIGHTS | 08/16/24 | beIN SPORTS USAbeIN SPORTS USA
Просмотров 173 тыс.
The Lore of Elden Ring is InsaneVaatiVidya
Просмотров 672 тыс.
SEASON 4 MEMESLazarLazar
Просмотров 2 млн
Hendon Hooker leads Lions to comeback win vs. Chiefs | 2024 NFL Preseason Week 2Detroit Lions
Просмотров 122 тыс.
Finally, it's Ready 🫢 How to Create Software without Excel Display | Excel VbavbA Fun
Просмотров 18 тыс.
Send WhatsApp Message From Google Sheets - Google Sheets To WhatsApp Automation Using SuretriggersSureTriggers
Просмотров 1,1 тыс.
Send FREE WhatsApp Messages with Image from ExcelVeer Tutorial
Просмотров 219 тыс.
Excel to Whatsapp Group | How to send messages from excel to whatsapp groups | VBA codeTech ALERT
Просмотров 9 тыс.
🗨 How To Send WhatsApp Message From Excel - NO VBADeepak EduWorld
Просмотров 191 тыс.
How to send WhatsApp Messages from Microsoft ExcelAjay Anand
Просмотров 294 тыс.
How to send Whatsapp Messages from Excel - Malayalam TutorialXL n CAD Malayalam
Просмотров 133 тыс.
Excel to Whataspp BULK messages with Photos |एक्सेल से व्हाट्सएप्प पर फोटो वाले अनलिमिटेड मेसेज भेजेThe Sketcher
Просмотров 254 тыс.
Fake Horse Tries to Blend in with Pack of HorsesThe Pet Collective
Просмотров 4 млн
小天使一家到底看到了什么!#小丑#天使#路飞#家庭#搞笑家庭搞笑日记
Просмотров 3,2 млн
VITALITY vs. NAVI | Grand Final | IEM COLOGNE 2024 | BO5 - КРNВОЙ ЭФИРSL4M & Counter-Strike
Просмотров 476 тыс.
Tanish holatmi?😅❤️Zakirovlar_Oilasi
Просмотров 884 тыс.
Hyenas Distracted By Eating a Hippo Get Ambushed By LionLatest Sightings
Просмотров 880 тыс.
Gli occhiali da sole non mi hanno coperto! 😎Senza Limiti
Просмотров 14 млн
Спорим, ты не сможешь написать пустой комментарий #funnyPolli_Shev
Просмотров 77 тыс.
Well explained thnq soo much
Most welcome 😊
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Code proper working sir you are tooooo good
It's my pleasure
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
thank u sir ... salute to you... for all stuff you have shared...
So nice of you
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
😮 much needed
Thank you so much 😀
loved it
Thank you so much 😀
Thank you for Whatsapp code. A error in code. if sending msg to unsaved number and its not on whatsapp or deleted at whatsapp. the code execute to next i.e type msg in search box and start mulfuntion. can you write code to check the number is on whatsapp, if not on whatsapp escape and go to next number. And remark on the number.
Please try this modified code.
Option Explicit
#If VBA7 Then
Declare PtrSafe Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
#Else
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
#End If
Sub wamsg()
On Error GoTo ErrorHandler
Dim PhoneNumb As String, MsgText As String
Dim LastRow As Long
Dim attach As String, link As String
Dim i As Integer
LastRow = Sheet1.Range("A" & Rows.Count).End(xlUp).Row
For i = 2 To LastRow
With Sheet1
PhoneNumb = .Cells(i, 1).Value
MsgText = .Cells(i, 2).Value
attach = .Cells(i, 3).Value
link = .Cells(i, 4).Value
AppActivate "WhatsApp"
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "^n", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "^a", True ' Ctrl+A to select all
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys PhoneNumb, True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Tab}", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Enter}", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys MsgText, True
Application.Wait (Now + TimeValue("00:00:05"))
SendKeys "+{Tab}", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Enter}", True
If attach = "VIDEO" Or attach = "IMAGE" Or attach = "PDF" Then
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Enter}", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys link, True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Enter}", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Enter}", True
End If
End With
' Check if ESC key is pressed
If CheckESCKeyPressed() Then
Exit Sub ' Exit the sub if ESC key is pressed
End If
Next i
ExitSub:
Exit Sub ' Exit the sub normally
ErrorHandler:
MsgBox "An error occurred: " & Err.Description, vbExclamation
Resume ExitSub
End Sub
Function CheckESCKeyPressed() As Boolean
' Function to check if the ESC key is pressed
CheckESCKeyPressed = False
If GetAsyncKeyState(vbKeyEscape) Then
CheckESCKeyPressed = True
End If
End Function
thankyou
Thank you so much 😀
fabulous
Thank you so much 😀
awesomeee
Yes i am working on that code.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
great
Thank you
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Sir, If the mobile number is not registered on WhatsApp, all processes collapse. Please provide clarity on this issue.
While sending the message, if the mobile number does not have WhatsApp account, then the program crashes.
Please rectify the same.
Also request you to add support for sending videos/images/documents/pdfs etc. to unsaved numbers
Thanks in advance
Please try this modified code
Option Explicit
#If VBA7 Then
Declare PtrSafe Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
#Else
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
#End If
Sub wamsg()
On Error GoTo ErrorHandler
Dim PhoneNumb As String, MsgText As String
Dim LastRow As Long
Dim attach As String, link As String
Dim i As Integer
LastRow = Sheet1.Range("A" & Rows.Count).End(xlUp).Row
For i = 2 To LastRow
With Sheet1
PhoneNumb = .Cells(i, 1).Value
MsgText = .Cells(i, 2).Value
attach = .Cells(i, 3).Value
link = .Cells(i, 4).Value
AppActivate "WhatsApp"
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "^n", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "^a", True ' Ctrl+A to select all
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys PhoneNumb, True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Tab}", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Enter}", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys MsgText, True
Application.Wait (Now + TimeValue("00:00:05"))
SendKeys "+{Tab}", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Enter}", True
If attach = "VIDEO" Or attach = "IMAGE" Or attach = "PDF" Then
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Enter}", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys link, True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Enter}", True
Application.Wait (Now + TimeValue("00:00:03"))
SendKeys "{Enter}", True
End If
End With
' Check if ESC key is pressed
If CheckESCKeyPressed() Then
Exit Sub ' Exit the sub if ESC key is pressed
End If
Next i
ExitSub:
Exit Sub ' Exit the sub normally
ErrorHandler:
MsgBox "An error occurred: " & Err.Description, vbExclamation
Resume ExitSub
End Sub
Function CheckESCKeyPressed() As Boolean
' Function to check if the ESC key is pressed
CheckESCKeyPressed = False
If GetAsyncKeyState(vbKeyEscape) Then
CheckESCKeyPressed = True
End If
End Function
Bro, i want to add 30 second's before sending to next number please thank you for your efforts ❤❤❤
yes in the coding just add it brother
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
how can we skip the step if one number is not having whatsapp on it?
Brother good information but please share how Can we use this process directly though WhatsApp web
Please go through this video once : ruclips.net/video/_VfSrTMiz2M/видео.html
Plz share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
🎉🎉
Thanks for the visit
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Thank you soo much for a quick responce and a video made on it. 😊
One thing more please if the number is blocked by me earlier and if the number does not exist (lets suppose i have a list of numbers as some may not be correct or unavaliable) will it skip that number or not?
No, it won't work like that. it will send messages to all the numbers in the excel file. if the no.is wrong, then code might not work properly.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
@@techalertr ok thank you for the guidance but wating for your new working in which if a number is not found or is invalid it should skip
all the old vba's are now not working
@@techalertr and can you make it possible that if there no image/pdf file to attach it skips that also
Thank you first, and can you make a new video to solve such issues, @@techalertr
Please make a video about sending pdf files to unsaved numbers
Yes I have created a video on that topic and I am editing that video. Will publish in 6 to 7 days. Stat tuned with us.
Hope you liked the video and subscribed our channel to support us.
@@techalertr thank you sir
Same bhau
Brother not working with not registered numbers on whatsapp. if you are completed the code please share
Please go through this video once : ruclips.net/video/COg2MFQjUbA/видео.html
Plz share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Mera code run ho raha but invalid show WhatsApp ..why .give me solution
install whatsapp desktop version.
;login and start the whatsapp
the run the code.
for more details, contact us on instagram.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Hi... nice one but this code is not working with unsaved numbers. tried a lot but not working with unsaved numbers
Yes brother, it was working but due to recent whatsapp update, now its not working for unsaved numbers. I am working on the new code. Hope will publish a new video soon.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Its NOT happening ... can you help
Please go through this video once : ruclips.net/video/dN7_9AmHbdI/видео.html
Plz share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Hi bro, great work. But im facing an issue, my whatsapp is not opening with AppActivate "WhatsApp" command. It gives run-time error '5' , invalid procedure call or argument.
My code is working when i open the whatsapp application before i run the code. And its sending 3-4 messages and after then whatsapp application is closing directly during the execution(run-time).
Please suggest a solution for my issue.
Hey, did you get the solution facing same issue
Same issue here
How to send image unsaved number different like Id card
Hello sir,
i will publish a video on this topic in 6 to 7 days.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
@@techalertr nice
but I'm not able to activate WhatsApp as it's giving the error of "run time error 5, Invalid procedure call or argument"
sathe me photo kese lagaye bro
Please go through this video once : ruclips.net/video/COg2MFQjUbA/видео.html
Plz share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Appactivate isn't working on vba code
have you installed whatsapp desktop version?
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Suppose start mai sirf Hi beja aur reply aane ke baad macro kaise banaye ki baad Mai promotion ka msg chale jaye
brother iska code soch rha hu. bt ab tk success nhi hua. jaise hi code krunga i will upload a video for sure.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Wow kya mind.. chating setup.. good idea
es sy whatsapp ban to nai hoga qke hamari whatsapp pehle 4 sy 5 bar ban ho chuki hai msg send krte krte to kya es method sy whatsapp ban to nai hoga plz guide krden, thnkyou
Hi,
agar proper time gap hai msgs me to ban nahi hoga. jaise video me maine 18sec.ka gap rkha h msgs me to is condition me ban nhi hoga. agar ap 10 sec.ya usse kam ka gap rkhenge to block ho skta hai.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Number seen in formula box
Bhai jaise 100 store ka data nikale or direct bhejna suru kiye to ho sakta kisi ka WhatsApp na ho to usko skip kar de Aisa kuchh ho sakta h ??
I am searching for the same.
@@abdulrahmansyed6736 mile to reply kijiyega
Brother i am working on that code.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Brother i am working on that code.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Mera bhi yahi saval hai
How to send different pdf to unsaved numbers
Use different location
I will upload a video on this topic soon.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
Hlo@@techalertr
When upload that vedio@@techalertr
I tried to send to 100 contacts. It was sending upto 7 messages perfectly but then it could not perform. Can you help it
Try one more time. me too faced the same problem. but it only for the first time. now i can send 100, 500 messages
Sir! If number is not belongs to Whatsapp, then entire process will collapsed
WhatsApp baar baar band ho raha h, after sending messages to 3-4 contacts. What can be done?
Duration badha do
Poora video hi mask kar diya. Viewers ko kuch to dikhna chahiye
Brother contacts n messages nhi show kr skta na. mechanism show Kiya hu. Excel template provide kiya hu.
Aur doubts h to Instagram pe contact kr skte h
Sir Help me
Sub Example()
If (Computer Me Network Na Hone Par)
Mgs box "Network Not Available"
Exit sub
Else
Code Run (Whatsapp Msg)
End if
Ok. i will work on this code/
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
can i contact you for my same app creation?
Yes sir you can contact me on instagram.
Please share the video on your social media & with your friends to help us.
Hope you subscribed our channel to support us.
list me whatsapp aur non whatsapp number hai to shirf whatsapp number ko sms jaye..non whatsapp number ko egnore kare error na aye