How to Send Message From Excel to Whatsapp - एक्सेल से व्हाट्सएप पर मैसेज कैसे भेजें | Send Message From Excel to Whatsapp | Send Excel to Whatsapp Message
Hello Friends, अगर आप Microsoft Excel use करते है तो आपके लिये ये Post (Send Message From Excel to Whatsapp) बहुत उपयोगी है अब आप Free में Whatsapp पर MS-Excel Software Unlimited से Message Send कर सकते है तो बने रहिएगा इस Post में और Post को पूरा पढियेगा तभी आपको पूरा Process समझ में आएगा वरना आप एक भी गलती करेंगे तो आपका Process नहीं होगा आप कही पर भी आपका System रुक जायेंगे, तो चलिए Process को Start करते है |
सबसे पहले आपको सबसे पहले अपने Excel को Open करन होगा उसके बाद First Column में Mobile Number और Second Column में Message type करना होगा आपको,
कुछ इस प्रकार का आपको Data Create करना होगा उसके बाद आपको उसके बाद आपको अपना Developer Tab में जाना होगा और वह पर Visual Basic Option पर click करना होगा उसके बाद आपके सामने Visual Basic Screen Open जो जायेगा कुछ इस प्रकार से |
उसके बाद आपको Insert Tab पर जाना है औअर वह जा कर आपको Module Option पर Click करना है
उसके बाद अब आपको दिया गया Code को Copy and Paste करना है उसके बाद Visual Basic File को किसी भी नाम से Save करना है और जो हम फाइल Save करेंगे वो Excel-Micro Enable Workbook फाइल में Save करना होगा |
अब आपको Developer Tab में दोबारा जाना होगा और उसमे Insert Option पर क्लिक करना होगा और Button केर option पर Click करके उसको Insert करना होगा उस बटन को आप अपने अनुसार उसकी Size का Customize कर सकते है |
अब आपको आप अपने अनुसार किसी भी सेल के पास Button को Draw कर सकते है अब आपका Button Draw करते ही आपके Screen पर Assign Micro का एक Option ओपन हो जायेगा अब आपको उसमे जो Micro Name List शो कर रहा होगा उसपर Click करने के बाद OK Button को Press कीजिए अब आपका डाटा Ready है |
अब आप अपने Number वाले कॉलम को Select कीजिए उसके बाद Send Button पर क्लिक कीजिए आपका Message सफलता पूर्वक आपके Whatsapp Contact Number पर Send हो जायेगा |
COPY CODE
Sub msg_click()
On Error GoTo errorh:
mobileno = Selection.Value
Set myrange = Sheet1.Range("A:A")
rowno = Application.WorksheetFunction.Match(mobileno, myrange, 0)
Message = Sheet1.Cells(rowno, 2).Value
ActiveWorkbook.FollowHyperlink Address:="https://wa.me/" & mobileno & "?text=" & Message & ""
End
errorh:
Err.Clear
MsgBox "Select Proper Mobile Number "
End Sub
इसी Code आपको Copy करके अपने Visual Basic Page पर Paste करना ओगा उसके बाद फाइल को Excel-Micro Enable Workbook Save कर दीजिये |
आसा करता हु की ये Post आपको बहुत पसंद आया होगा अगर पसंद आया होगा तो Comment Box में अपनी राय देना नहीं भूलियेगा |
इसका विडियो देखेने के लिये निचे दिये गए वीडियो को को ओपन करे : -
अगर वीडियो देखने के बाद भी किसी प्रकार का दिक्कत या परेशानी आये तो आप Comment जरुर करे उसका सलूशन आपको बताया जायेगा |
कोई टिप्पणी नहीं:
एक टिप्पणी भेजें
Please do not enter any Types of spam link in comment box.