Buongiorno,
Le scrivo perché ho la seguente macro che funziona perfettamente nell'excel del mio PC. Recentemente ho comprato un Mac e purtroppo la macro non funziona nell'Excel del Mac. Le chiederei se cortesemente saprebbe convertirla in modo che funzioni anche nell'Excel del Mac. Ecco la macro:
In modulo:
Public Dest, Oggetto, CorpoM As Stringe
Private Declare Function ShellExecute Lib "Shell32.dll"
Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String,
ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String,
ByVal nShowCmd As Long) As Long
Sub Macro_Flash()
Dim URL As String
URL = "mailto:" & Dest & "?subject=" & Oggetto & "&body=" _
& Replace(CorpoM, Chr(10), "/" & vbCrLf & "\")
URL = Left(URL, 2025)
ShellExecute 0&, vbNullString, URL, vbNullString, vbNullString, vbNormalFocus
End Sub
Il codice nel foglio è:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column <> 1 Or Target.Value = "" Then Exit Sub
Dest = Target.Value
Oggetto = Range("D" & Target.Row).Value
CorpoM = Range("F" & Target.Row).Value
Macro_Flash
End Sub
Quando aziono la macro in excel nel Mac, esce il seguente errore:
Errore di runtime “53”
Impossibile trovare il file: Shell32.dll
Grazie per l'aiuto.
Paolo