Tag: emoji

在Outlook中使用VBA与Emojis发送文本

我有一些VBA代码，用于将Outlook中的文本发送给我的项目团队成员。 对于一些背景：对于非AT＆T用户，我们没有任何问题通过将人员号码全部插入到Outlook电子邮件的收件人字段中来从Outlook发送文本消息。 但是，所有AT＆T用户都将收到文本作为群组消息，这是我们想要避免的。 非AT＆T用户在我们发送群组时正确接收个别文本。 我们编写了一些VBA代码来循环使用AT＆T号码的电子表格，以便Outlook根据AT＆T号码发送一封电子邮件。 这对我们来说工作得很好，但是，我们希望在我们发送的文本中添加一些表情符号。 我做了很多谷歌search和searchstackoverflows的问题，我似乎无法find任何代码为此目的而build。 当谈到VBA时，我也是一个完整的noob，而且我把这个解决scheme拼凑在一起，远没有从同事的帮助和通过互联网上的线程阅读。 这个关于emojis的东西给了我足够的麻烦，我想我会分解并提交这个post。 作为参考，这里是我的代码： Sub EmojiTest() Dim objOutlook As Outlook.Application Dim objOutlookMsg As Outlook.MailItem Dim objOutlookRecip As Outlook.Recipient Dim MobileNumber As String ' Create the Outlook session. Set objOutlook = CreateObject("Outlook.Application") Set xlApp = CreateObject("Excel.Application") 'Grab list from Excel Set xlAtt = xlApp.Workbooks.Open("C:\Users\Username\Desktop\Spreadsheet with AT&T numbers.xlsx") xlAtt.Activate LastRow = […]