Excel Forum Per condividere esperienze su Microsoft Excel

Office 2010. In VBA Riferimenti, manca la libreria Outlook

  • Messaggi
  • OFFLINE
    digito
    Post: 89
    Registrato il: 27/04/2005
    Utente Junior
    Excel 2010
    00 25/11/2018 09:37
    Gent.mi,

    ho notato che in VBA all'editor e controllo riferimenti, non c'è nessun riferimento a Microsoft Outlook 14.0 o 15.0.
    Vorrei sapere il procedimento per ripristinare o installare prelevando dalla rete.
    Al momento non sono riuscito trovare dalla rete la suddetta libreria.
    Fiducioso di un gradito riscontro, ringrazio e saluto
    Domenico.
  • OFFLINE
    dodo47
    Post: 2.032
    Registrato il: 06/04/2013
    Utente Veteran
    2010
    00 25/11/2018 10:28
    ciao
    non so aiutarti ma, se proprio non cavi un ragno dal buco, utilizza il "late binding" al posto dell' "early binding" che ti costringe a spuntare un riferimento nel vbe.

    In tal modo, non avresti problemi su altri pc che non hanno tale riferimento.

    Immagino tu stia cercando di fare qualcosa del genere:

    (early binding) che vuole il riferimento alla lib di off Outlook:

    dim Outlk as outlook.application
    set Outlk = new outlook.application
    etc...etc

    (late binding) nessun riferimento voluto:

    dim Outlk as object
    set Outlk = createobject("outlook.application")
    etc...etc

    saluti


    [Modificato da dodo47 25/11/2018 10:42]
    Domenico
    Win 10 - Excel 2016
  • OFFLINE
    digito
    Post: 89
    Registrato il: 27/04/2005
    Utente Junior
    Excel 2010
    00 25/11/2018 11:12
    Gent.mo Dodo47,

    è mia intenzione realizzare un programmino per invio di comunicazioni ed invio allegati (Fatture e File in PDF) e dalle informazioni in rete, necessita l'inserimento della libreria in VBA di Microsoft Outlook 15.0 che manca.
    Dal tuo intervento, noto che si può ovviare inserendo Late binding che a me è nuovo e se gentilmente puoi illustrare con un esempio pratico come realizzare.

    Ringrazio e fiducioso, saluto.
  • OFFLINE
    dodo47
    Post: 2.033
    Registrato il: 06/04/2013
    Utente Veteran
    2010
    00 25/11/2018 11:25
    te l'ho scritto come impostare (ES):
    Sub InviaMail()
    Set OutL = CreateObject("Outlook.Application")
    OutL.Session.Logon 'forse non necessario
    Set mMail = OutL.CreateItem(0)
    Destinatario = Range("A1")
    Oggetto = Range("A2")
    Testo = Range("A3")
    With mMail
     .To = Destinatario
     .CC = ""
     .BCC = ""
     .Subject = Oggetto
     .Body = Testo
     .display 'mostra email
     '.Send ' invia email
    End With
    Set mMail = Nothing
    Set OutL = Nothing
    End Sub



    E comunque leggi qui

    https://support.microsoft.com/en-us/help/245115/using-early-binding-and-late-binding-in-automation

    [Modificato da by sal 25/11/2018 19:23]
    Domenico
    Win 10 - Excel 2016
  • OFFLINE
    digito
    Post: 90
    Registrato il: 27/04/2005
    Utente Junior
    Excel 2010
    00 25/11/2018 12:34
    Gent.mo Dodo47,

    mi dispiace, non funziona ancora.
    Ho inserito le variabili:
    > Dim OutL, mMail As Object, destinatario As Object, Oggetto, testo <
    Ho inserito i campi: destinatario-oggetto e testo all'invio mi chiede:
    Variale non definita in:
    > With mMail
     .to = destinatario <
    con il cursore vicino .To

    e gli allegati si possono inserire?
    scusa per il fastidio, ringrazio e saluto.
  • OFFLINE
    dodo47
    Post: 2.034
    Registrato il: 06/04/2013
    Utente Veteran
    2010
    00 25/11/2018 13:35
    ciao
    quello che ti ho passato è un vecchio codice, per intenderci funzionante con office 2003.

    Probabilmente ci saranno degli aggiustamenti da fare.

    Purtroppo non uso più outlook, pertanto non posso testarne la attuale funzionalità.

    Ti suggerisco di effettuare ricerche sull'argomento.

    La strada è quella.
    Si, si possono allegare file.

    L'unica cosa che posso fare è quella di allegarti un vecchio lavoro "funzionante" con exc/outl 2003.

    Se sai di vba, sicuramente non avrai problemi ad adattarlo.

    La procedura invia email a tutti oppure ad un gruppo di indirizzi e gestisce molti parametri compreso l'invio di uno o più allegati.

    saluti


    Domenico
    Win 10 - Excel 2016