Pannello di Controllo Moderatore ]

Macro non funziona con MAC OS

Creare una macro - Scrivere uno script - Usare le API

Macro non funziona con MAC OS

Messaggioda motopisolo » giovedì 13 febbraio 2020, 14:09

Buon giorno a tutti,
non ho trovato sul forum lo stesso problema pertanto sono qui a chiedervi aiuto. Premetto che la macro funziona alla perfezione con windows 10 e open office, mentre funziona parzialmente con mac os catalina e open office.
Ricapitolando: insieme a un amico abbiamo creato una macro che permette di salvare delle celle in pdf e allegarle poi a una mail in formato pdf.
Fino qui tutto bene, poi la macro apre automaticamente il client di posta, e dovrebbe compilare in automatico il mittente, l'oggetto e il corpo del testo, ma questo non succede.
Ho provato sia con thunderbird che con Mail (client predefinito di mac).
Vi allego il codice macro sperando che qualcuno possa darmi una mano
Codice: Seleziona tutto   Espandi visualeStringi visuale
Sub Main
   Dim Doc as Object      
   Dim Sheet as Object
   Dim message as String
   
   
   Doc = ThisComponent.CurrentController.Frame
   Sheet = ThisComponent.Sheets.getByName("FATTURA")
      
   ExportPdf(Sheet)
   
End Sub

Sub ExportPdf (Sheet as Object)

   Dim Cell as Object
   Dim strFile As String
   Dim msg as String
   On Error GoTo errHandler

   Cell = Sheet.getCellByPosition(1,20)
   oRng = Sheet.getCellRangeByName("A1:K48")
   Dim mFilterData(0) As New com.sun.star.beans.PropertyValue
   mFilterData(0).Name = "Selection"
   mFilterData(0).Value = oRng
   Dim mStoreOpts(2) As New com.sun.star.beans.PropertyValue
   mStoreOpts(0).Name = "Overwrite"
   mStoreOpts(0).Value = True
   mStoreOpts(1).Name = "FilterName"
   mStoreOpts(1).Value = "calc_pdf_Export"
   mStoreOpts(2).Name = "FilterData"
   mStoreOpts(2).Value = mFilterData()
   'imposto il nome del file col nome "Fattura_" cella b21
   'inserisco il percorso per il salvataggio + nome file
   strFile = "Fattura_" & Cell.String & ".pdf"
   strFile = "file:///Volumes/HD%20EMILIO/FATTURE%202020/" & strFile
'   strFile = "file:///C:/Users/Luca/Desktop/test/" & strFile
   ThisComponent.storeToURL(strFile, mStoreOpts())
   
   MsgBox "Il file PDF è stato salvato."
   
   If MsgBox ("Vuoi allegare la fattura ad una mail?",  292) = 6 Then
     sendMail(Cell.String, strFile)
   End IF
   
   exitHandler:
      Exit Sub
   errHandler:
       MsgBox "Non ho potuto salvare il file PDF"
      
   Resume exitHandler
End Sub

' REM recupero i dati dal foglio
Sub SendMail (nomeFile as String, percorsoAllegato as string)
   Dim doc as Object

   doc = ThisComponent.Sheets.getByName("DATI")
   indirizzoMail = doc.getCellByPosition(6,1)
   oggetto = "Invio Fattura Fisioterapica " & nomeFile
   corpoMail = ""
   corpoMail = "Gentile Cliente,"  & Chr(10) & _
            "ecco in allegato la fattura." & Chr(10) & Chr(10) & _
            "Cordiali Saluti"
   allegato = percorsoAllegato

   Mailer (indirizzoMail.String, oggetto, corpoMail, allegato)

End Sub

Sub Mailer (eMailAddress as String, eSubject as String, eBody as String, Attachement as String)
   Dim nFlag as integer
   On Error GoTo errHandler
   
   nFlag = 0

   MailAgent = CreateUnoService("com.sun.star.system.SystemMailProvider")
   MailClient = MailAgent.queryMailClient()   
   MailMessage = MailClient.createMailMessage()
   MailMessage.Recipient = eMailAddress
   MailMessage.Subject = eSubject
   MailMessage.Body = eBody
   MailMessage.Attachement = Array(Attachement)
   MailClient.sendMailMessage(MailMessage, 0)

      exitHandler:
      Exit Sub
   errHandler:
       MsgBox "Non ho potuto aprire la tua mail"
      
   Resume exitHandler
End Sub


 Editato: Post riscritto usando maiuscole e punteggiatura.
Possiamo sperare di vedere così anche i prossimi? (Admin) 
Open Office 4.1.7 os Catalina 10.15.2
motopisolo
 
*** Richiami: 1 ***
Messaggi: 8
Iscritto il: domenica 12 gennaio 2020, 14:24

Re: Macro non funziona con MAC OS

Messaggioda charlie » domenica 16 febbraio 2020, 8:33

Ciao, ho provato la macro su Sierra e sembra funzionare.
Ho eseguito il test con un foglio vuoto di Calc, che viene salvato in .pdf sul percorso che ho modificato
Codice: Seleziona tutto   Espandi visualeStringi visuale
strFile = "file:///Users/mioNome/Desktop/" & strFile
Poi si apre Mail con l'allegato inserito ma senza il destinatario.
charlie
macOS 10.12 Sierra: Open Office 4.1.7 - LibreOffice 6.2.8.2
http://www.charlieopenoffice.altervista.org
Avatar utente
charlie
Site Admin
Site Admin
 
Messaggi: 6415
Iscritto il: mercoledì 19 dicembre 2012, 11:50

Re: Macro non funziona con MAC OS

Messaggioda unlucky83 » domenica 16 febbraio 2020, 9:55

"file:///Volumes/HD%20EMILIO/" Sembra l'indirizzo a un'unità disco esterna o una partizione. Se l'unità non è montata il percorso risulta non valido.
LibO5.1.6.2-Ubuntu 16.04.2 32-bit
-
Se risolvi:
1. Condividi la soluzione qui con noi
2. Metti [Risolto] al titolo del primo messaggio
Avatar utente
unlucky83
Volontario
Volontario
 
Messaggi: 2157
Iscritto il: lunedì 7 gennaio 2013, 2:23
Località: Latina

Re: Macro non funziona con MAC OS

Messaggioda motopisolo » domenica 16 febbraio 2020, 17:26

charlie ha scritto:Ciao, ho provato la macro su Sierra e sembra funzionare.
Ho eseguito il test con un foglio vuoto di Calc, che viene salvato in .pdf sul percorso che ho modificato
Codice: Seleziona tutto   Espandi visualeStringi visuale
strFile = "file:///Users/mioNome/Desktop/" & strFile
Poi si apre Mail con l'allegato inserito ma senza il destinatario.

Purtroppo è quello che succede anche a me, non capisco come mai non compili in automatico i campi della mail.

unlucky83 ha scritto:"file:///Volumes/HD%20EMILIO/" Sembra l'indirizzo a un'unità disco esterna o una partizione. Se l'unità non è montata il percorso risulta non valido.

E' un disco esterno. Cosa intendi per unità non montata?
La macro salva correttamente anche su unità esterna, solo che non compila il campo mail, il corpo e l'oggetto. Su windows 10 invece, la macro fa quello che dovrebbe.
Open Office 4.1.7 os Catalina 10.15.2
motopisolo
 
*** Richiami: 1 ***
Messaggi: 8
Iscritto il: domenica 12 gennaio 2020, 14:24

Re: Macro non funziona con MAC OS

Messaggioda unlucky83 » domenica 16 febbraio 2020, 18:50

Scusa, ho confuso le discussioni e ho lasciato un commento che non c’entra niente con il tuo problema, non lo calcolare.
Non essendo un utente Mac mi tiro fuori dalla discussione
LibO5.1.6.2-Ubuntu 16.04.2 32-bit
-
Se risolvi:
1. Condividi la soluzione qui con noi
2. Metti [Risolto] al titolo del primo messaggio
Avatar utente
unlucky83
Volontario
Volontario
 
Messaggi: 2157
Iscritto il: lunedì 7 gennaio 2013, 2:23
Località: Latina

Re: Macro non funziona con MAC OS

Messaggioda charlie » domenica 16 febbraio 2020, 19:27

unlucky83 ha scritto:Non essendo un utente Mac mi tiro fuori dalla discussione

Io credo che un aiuto tu lo possa dare lo stesso. Una volta stabilito il giusto percorso del file, si tratta di capire perché la macro non riempie il campo con l'indirizzo mail del destinatario all'interno del client di posta.
charlie
macOS 10.12 Sierra: Open Office 4.1.7 - LibreOffice 6.2.8.2
http://www.charlieopenoffice.altervista.org
Avatar utente
charlie
Site Admin
Site Admin
 
Messaggi: 6415
Iscritto il: mercoledì 19 dicembre 2012, 11:50

Re: Macro non funziona con MAC OS

Messaggioda unlucky83 » domenica 16 febbraio 2020, 19:49

Le ipotesi sono due:
O la distribuzione openoffice per Mac ha dei difetti nella gestione di tutti i client di posta elettronica che girano su Mac, oppure ha un problema specifico con Mail di Mac, che mi pare sia il programma di default per la gestione della posta
LibO5.1.6.2-Ubuntu 16.04.2 32-bit
-
Se risolvi:
1. Condividi la soluzione qui con noi
2. Metti [Risolto] al titolo del primo messaggio
Avatar utente
unlucky83
Volontario
Volontario
 
Messaggi: 2157
Iscritto il: lunedì 7 gennaio 2013, 2:23
Località: Latina

Re: Macro non funziona con MAC OS

Messaggioda motopisolo » domenica 16 febbraio 2020, 19:51

unlucky83 ha scritto:Le ipotesi sono due:
oppure ha un problema specifico con Mail di Mac, che mi pare sia il programma di default per la gestione della posta

Provato anche con thunderbird, stesso risultato di Mail .
Open Office 4.1.7 os Catalina 10.15.2
motopisolo
 
*** Richiami: 1 ***
Messaggi: 8
Iscritto il: domenica 12 gennaio 2020, 14:24

Re: Macro non funziona con MAC OS

Messaggioda unlucky83 » domenica 16 febbraio 2020, 19:59

La stessa cosa succede con Libreoffice @charlie?
LibO5.1.6.2-Ubuntu 16.04.2 32-bit
-
Se risolvi:
1. Condividi la soluzione qui con noi
2. Metti [Risolto] al titolo del primo messaggio
Avatar utente
unlucky83
Volontario
Volontario
 
Messaggi: 2157
Iscritto il: lunedì 7 gennaio 2013, 2:23
Località: Latina

Re: Macro non funziona con MAC OS

Messaggioda motopisolo » domenica 16 febbraio 2020, 20:07

@unlucly83
Non so se possa essere d'aiuto; utilizzando la funzione mailto, il client di Mac compila correttamente il campo mail.
Anche cliccando direttamente sull'indirizzo si apre il client con il campo indirizzo compilato
Open Office 4.1.7 os Catalina 10.15.2
motopisolo
 
*** Richiami: 1 ***
Messaggi: 8
Iscritto il: domenica 12 gennaio 2020, 14:24

Re: Macro non funziona con MAC OS

Messaggioda unlucky83 » domenica 16 febbraio 2020, 21:12

Un altro ha riscontrato il tuo problema sul forum inglese ed è stato liquidato senza una soluzione https://forum.openoffice.org/en/forum/viewtopic.php?f=20&t=94173&hilit=SystemMailProvider+apple
Un altro ha risolto con il mailto ma non aveva allegati da inserire nella mail https://forum.openoffice.org/en/forum/viewtopic.php?f=45&t=88849&p=418172&hilit=+SystemMailProvider+macos#p418172
Chiudo con ques'altro utente del forum inglese. Lui non è riuscito a far funzionare una macro che compilasse tutto il messaggio incluse le email, però ha trovato una soluzione alternativa usando un Applescript riuscendo così a riempire tutti i campi dell'email con l'aggiunta di allegati (da quello che ho capito)https://forum.openoffice.org/en/forum/viewtopic.php?f=20&t=59325&p=262617&hilit=+mail+macos#p263757
Ci sono poche discussioni anche sul forum inglese...a quanto pare pochi utenti MacOs hanno necessità di macro per invio email.
LibO5.1.6.2-Ubuntu 16.04.2 32-bit
-
Se risolvi:
1. Condividi la soluzione qui con noi
2. Metti [Risolto] al titolo del primo messaggio
Avatar utente
unlucky83
Volontario
Volontario
 
Messaggi: 2157
Iscritto il: lunedì 7 gennaio 2013, 2:23
Località: Latina

Re: Macro non funziona con MAC OS

Messaggioda unlucky83 » domenica 16 febbraio 2020, 21:24

LibO5.1.6.2-Ubuntu 16.04.2 32-bit
-
Se risolvi:
1. Condividi la soluzione qui con noi
2. Metti [Risolto] al titolo del primo messaggio
Avatar utente
unlucky83
Volontario
Volontario
 
Messaggi: 2157
Iscritto il: lunedì 7 gennaio 2013, 2:23
Località: Latina

Re: Macro non funziona con MAC OS

Messaggioda motopisolo » lunedì 17 febbraio 2020, 19:52


Ti ringrazio; vedremo se riesco a trovare qualcuno ben volenteroso per aiutarmi a preparare questi script.
Vi tengo aggiornati
Open Office 4.1.7 os Catalina 10.15.2
motopisolo
 
*** Richiami: 1 ***
Messaggi: 8
Iscritto il: domenica 12 gennaio 2020, 14:24

Re: Macro non funziona con MAC OS

Messaggioda patel » lunedì 17 febbraio 2020, 20:58

unlucky83 ha scritto:Scusa, ho confuso le discussioni e ho lasciato un commento che non c’entra niente con il tuo problema, non lo calcolare.
Non essendo un utente Mac mi tiro fuori dalla discussione
Ma su Ubuntu ti funziona ? Quando lo usavo avevo lo stesso problema di motopisolo, apriva il client ma non compilava i campi.

 Editato: Post riscritto usando maiuscole e punteggiatura, come in uso nella lingua italiana.
Possiamo sperare di vedere così anche i prossimi? (Admin) 
-------------------
OpenOffice 4.1 e Libre Office 6.o.7.3 su Windows 10
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
patel
Volontario attivo
Volontario attivo
 
Messaggi: 3430
Iscritto il: venerdì 30 aprile 2010, 8:04
Località: Livorno

Re: Macro non funziona con MAC OS

Messaggioda unlucky83 » martedì 18 febbraio 2020, 2:06

A me non apre nemmeno il client.
LibO5.1.6.2-Ubuntu 16.04.2 32-bit
-
Se risolvi:
1. Condividi la soluzione qui con noi
2. Metti [Risolto] al titolo del primo messaggio
Avatar utente
unlucky83
Volontario
Volontario
 
Messaggi: 2157
Iscritto il: lunedì 7 gennaio 2013, 2:23
Località: Latina


Torna a Macro e UNO API

Chi c’è in linea

Visitano il forum: Nessuno e 1 ospite