Office for Mac 2011 with Service Pack 1 (Mac) - (Spanish) 1017MB: 13 May 2011: Office for Mac 2011 with Service Pack 1 (Mac) - (Chinese-Traditional) 1.01GB: 5 May 2011: Office for Mac 2011 Service Pack 1 (Mac) - (French) 371MB: 5 May 2011: Office for Mac 2011 with Service Pack 1 (Mac) - (French) 989MB: 5 May 2011: Office for Mac 2011 Service. Download this app from Microsoft Store for Windows 10, Windows 8.1, Windows 10 Mobile, Windows 10 Team (Surface Hub). See screenshots, read the latest customer reviews,.
The time now is: Today 18:50 All times are GMT + 4 Hours
|
В настоящее время я использую следующий код VBA в Excel для MAC 2016:
Он отлично работает для отправки по электронной почте текущего листа через Outlook.
Проблема, с которой я сталкиваюсь, заключается в том, что я хочу, чтобы фокус возвращался к листу Excel. Сейчас происходит то, что появляется экран Outlook вместе с новым письмом. После нажатия отправки новый экран электронной почты уходит, но основное окно Outlook остается.
Как настроить фокус на Excel?
Я обнаружил, что решение заключается в использовании Applescript для достижения желаемого эффекта. Вот весь скрипт: ption Явный
Adobe acrobat free for mac. Sub MailWorkSheet ()
End Sub
Cities skylines download for mac. Функция MailWithMac (subject As String, mailbody As String, _ toaddress As String, ccaddress As String, _ bccaddress As String, displaymail As Boolean, _ accounttype As String, имя учетной записи As String, _ attachment As String, FileFormat As Long)
Конечная функция
Функция CheckScript (ScriptFileName As String) как логическая
Конечная функция Q control for mac.
Функция KillFile (Filestr As String)
Конечная функция
Applescript:
на CreateMailInOutlook (paramString) установите {fieldValue1, fieldValue2, fieldValue3, fieldValue4, fieldValue5, fieldValue6, fieldValue7, fieldValue8, fieldValue9} в SplitString (paramString, ';'), сообщите приложению 'Microsoft Outlook', если fieldValue7 = 'pop', затем установите значениеAccount для первая учетная запись pop, чье имя – fieldValue8, устанавливает NewMail (сделать новое исходящее сообщение со свойствами {subject: fieldValue1, content: fieldValue2, account: theAccount}) else, если fieldValue7 = 'imap' затем установить Account в первую учетную запись imap, имя которой fieldValue8 установить NewMail (создать новое исходящее сообщение со свойствами {subject: fieldValue1, content: fieldValue2, account: theAccount}) else установить NewMail (сделать новое исходящее сообщение со свойствами {subject: fieldValue1, content: fieldValue2}) end if tell NewMail повторите с toRecipient в моем SplitString (fieldValue3, ','), чтобы новый получатель получал в конце получателям со свойствами {адрес электронной почты: {адрес: содержимое toRecipient}} end repeat repeat with toRecipient в моем SplitString (fieldValue4, ',') сделать новый для получателя в конце cc получателей со свойствами {адрес электронной почты: {адрес: содержимое toRecipient}} end repeat repeat with toRecipient в моем SplitString (fieldValue5, ',') сделать новый получателю в конце bcc-получателей со свойствами {адрес электронной почты: {адрес: содержимое toRecipient}} end repeat сделать новое вложение со свойствами {file: POSIX file fieldValue9 как псевдоним}
В настоящее время я использую следующий код VBA в Excel для MAC 2016:
Он отлично работает для отправки по электронной почте текущего листа через Outlook.
Проблема, с которой я сталкиваюсь, заключается в том, что я хочу, чтобы фокус возвращался к листу Excel. Сейчас происходит то, что появляется экран Outlook вместе с новым письмом. После нажатия отправки новый экран электронной почты уходит, но основное окно Outlook остается.
Как настроить фокус на Excel?
Я обнаружил, что решение заключается в использовании Applescript для достижения желаемого эффекта. Вот весь скрипт: ption Явный
Adobe acrobat free for mac. Sub MailWorkSheet ()
End Sub
Cities skylines download for mac. Функция MailWithMac (subject As String, mailbody As String, _ toaddress As String, ccaddress As String, _ bccaddress As String, displaymail As Boolean, _ accounttype As String, имя учетной записи As String, _ attachment As String, FileFormat As Long)
Конечная функция
Функция CheckScript (ScriptFileName As String) как логическая
Конечная функция Q control for mac.
Функция KillFile (Filestr As String)
Конечная функция
Applescript:
на CreateMailInOutlook (paramString) установите {fieldValue1, fieldValue2, fieldValue3, fieldValue4, fieldValue5, fieldValue6, fieldValue7, fieldValue8, fieldValue9} в SplitString (paramString, ';'), сообщите приложению 'Microsoft Outlook', если fieldValue7 = 'pop', затем установите значениеAccount для первая учетная запись pop, чье имя – fieldValue8, устанавливает NewMail (сделать новое исходящее сообщение со свойствами {subject: fieldValue1, content: fieldValue2, account: theAccount}) else, если fieldValue7 = 'imap' затем установить Account в первую учетную запись imap, имя которой fieldValue8 установить NewMail (создать новое исходящее сообщение со свойствами {subject: fieldValue1, content: fieldValue2, account: theAccount}) else установить NewMail (сделать новое исходящее сообщение со свойствами {subject: fieldValue1, content: fieldValue2}) end if tell NewMail повторите с toRecipient в моем SplitString (fieldValue3, ','), чтобы новый получатель получал в конце получателям со свойствами {адрес электронной почты: {адрес: содержимое toRecipient}} end repeat repeat with toRecipient в моем SplitString (fieldValue4, ',') сделать новый для получателя в конце cc получателей со свойствами {адрес электронной почты: {адрес: содержимое toRecipient}} end repeat repeat with toRecipient в моем SplitString (fieldValue5, ',') сделать новый получателю в конце bcc-получателей со свойствами {адрес электронной почты: {адрес: содержимое toRecipient}} end repeat сделать новое вложение со свойствами {file: POSIX file fieldValue9 как псевдоним}
end CreateMailInOutlook
Free Office For Mac Download
на SplitString (TheBigString, fieldSeparator) сообщите AppleScript set oldTID, чтобы разделители текстовых элементов устанавливали разделители текстовых элементов в fieldSeparator, чтобы установить тег на текстовые элементы в тегах с разделителями текстовых элементов TheBigString до конца oldTID, верните конецItems SplitString
Free Office For Mac
на Mini () скажите приложению «Microsoft Outlook» сказать (окна, чей идентификатор нет (получить идентификатор переднего окна) и видимый – true) установить миниатюрный в true end tell end tell end Mini