Bonjour,
Je repose une question déjà posée ailleurs que sur ce forum.
Je cherche à faire dialoguer Outlook avec Excel. La procédure entière fonctionne, mais à certaines conditions et j'aimerais pouvoir les modifier.
J'ai défini mes variables de la façon suivante :
Dim XlApp, XlClas, XlSheet
'Création d'un Excel
Set XlApp = CreateObject("Excel.Application")
'Ouverture du classeur
Set XlClas = XlApp.Workbooks.Open("C:\Users\sandr\Documents\Mes sources de données\TEST3.xlsm") 'UpdateLinks:=0
' de la feuille
Set XlSheet = XlClas.Sheets("Suivi dossiers")
Je termine ensuite ma procédure par ceci :
'Sauvegarde des modifications et fermeture du classeur
XlClas.Close True 'Close True
'On quitte Excel
XlApp.Quit
'On libère la mémoire des variables
Set XlClas = Nothing
Set XlApp = Nothing
A ce stade, je cherche
- à signaler à Excel de ne pas mettre à jour les valeurs; le UpdateLinks:=0 ne fonctionne pas alors quel pourrait être le code ?
- à ce que la procédure fonctionne également si le fichier est déjà ouvert;
- à ne pas quitter Excel tout en évitant que mon fichier ne se retrouve en lecture seule et utilisé par Excel.
Merci par avance à toute personne qui pourra m'apporter son aide, sachant que je suis encore novice !
