问题 How can we send a pic from excel via whatsapp? I have found the vba code to send messages via https://web.whatsapp.com, Sub Test() Dim text As String Dim contact As String text = Range("C2").Value ActiveWorkbook.FollowHyperlink Address:=" https://web.whatsapp.com/" If MsgBox("Is WhatsApp Loaded?" & vbNewLine & vbNewLine & "Press No To Cancel", vbYesNo + vbQuestion + vbSystemModal, "WhatsApp") = vbYes Then Fazer (100) startrow = 2 startcol = 2 Do Until Sheets(1).Cells(startrow, 1) = "" contact