Discussion :

[poseidonsr]

Bonjour,

J'ai ce bout de code qui fonctionne avec excel 2019 mais qui pose problème avec excel 2016 sur un autre appareil. Effectivement, l'initialisation de "dso" ne fonctionne pas sur excel 2016. Si quelqu'un connait une solution ça serait génial.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
 
        Dim dso As OleDocumentProperties
 
On Error Resume Next
        'Set dso = CreateObject("DSOFile.OleDocumentProperties")
        Set dso = New DSOFile.OleDocumentProperties
On Error GoTo 0
 
        If dso Is Nothing Then
            MsgBox "Ne s'initialise pas", VbOkOnly, ""
            Exit Sub
        End If

[jurassic pork]

hello,
tes versions d'Excel sont en 32 bits ou 64 bits ?
Ami calmant, J.P

[poseidonsr]

Hello,

Les deux versions sont en 64 bits. J'ai installé cette dll : https://www.codeproject.com/Tips/1118708/Bit-Application-Cannot-Use-DSOfile"]

[jurassic pork]

vois-tu dans l'éditeur VBA de ton Excel 2019 et de ton Excel 2016 dans les références, la référence à cette DLL ?

[poseidonsr]

Oui la référence existe et est cochée. Le code ne me renvoie pas d'erreur, la variable dso vaut nothing sur Excel 2016.

[jurassic pork]

tu peux jeter un oeil ici

et quel type de propriétés veux-tu traiter ?