Bonjour,
ayant eu un probleme de fonctionnement de macro sous VBA a cause reference manquante, je voulais insérer un code qui gere automatiquement ce type d'erreur en cas de probleme. Voila le code:
J'ai trouvé ce code qui est censé décocher les références manquantes de microsoft.support:
Sub RemoveLibraryReferences()
On Error Resume Next
Dim xObject As Object
Set xObject = ThisWorkbook.VBProject.References.Item("Office")
ThisWorkbook.VBProject.References.Remove xObject
Set xObject = ThisWorkbook.VBProject.References.Item("stdole")
ThisWorkbook.VBProject.References.Remove xObject
End Sub
Le probleme c'est qu'elle ne m'a pas retiré les références Microsoft Office 9.0 et OLE Automation comme elle devrait et qu'en plus ce qui m'intéresse c'est plutot DATE.
Quelqu'un a déjà utilisé ce type de macros pour effacer les références maquantes?
merci d'avance,
Bubus
ayant eu un probleme de fonctionnement de macro sous VBA a cause reference manquante, je voulais insérer un code qui gere automatiquement ce type d'erreur en cas de probleme. Voila le code:
J'ai trouvé ce code qui est censé décocher les références manquantes de microsoft.support:
Sub RemoveLibraryReferences()
On Error Resume Next
Dim xObject As Object
Set xObject = ThisWorkbook.VBProject.References.Item("Office")
ThisWorkbook.VBProject.References.Remove xObject
Set xObject = ThisWorkbook.VBProject.References.Item("stdole")
ThisWorkbook.VBProject.References.Remove xObject
End Sub
Le probleme c'est qu'elle ne m'a pas retiré les références Microsoft Office 9.0 et OLE Automation comme elle devrait et qu'en plus ce qui m'intéresse c'est plutot DATE.
Quelqu'un a déjà utilisé ce type de macros pour effacer les références maquantes?
merci d'avance,
Bubus
