Erreur visual basic depuis passage de 2010 à 2016
paysan68
-
paysan68 -
paysan68 -
Bonjour, j'ai un petit soucis avec une macro que j'ai écris sur excel 2010, car depuis que je suis passé sur escel 2016 j'ai une erreur d'exécution '13', le soucis se produit à la ligne indiquée ci-dessous:
Pour info la macro sert à remplir des signets dans un fichier word.
Merci beaucoup pour vos réponses
Sub Macro1()
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
Dim i As Byte
Dim j As Byte
Set WordApp = CreateObject("Word.Application") 'ERREUR ICI
WordApp.Visible = True
memoire = "C:\Users\adrien.haenn\Desktop\Lingenheld Démolition\Chiffrage\nouveau chiffrage\MT_TS_Desam_Demol.docx"
Set WordDoc = WordApp.Documents.Open(memoire, ReadOnly:=True)
Pour info la macro sert à remplir des signets dans un fichier word.
Merci beaucoup pour vos réponses
A voir également:
- Erreur visual basic depuis passage de 2010 à 2016
- Visual basic - Télécharger - Langages
- Microsoft 365 basic - Accueil - Microsoft Office
- Visual c++ 2019 - Guide
- Passage qwerty azerty - Guide
- Visual paradigm - Télécharger - Gestion de données
1 réponse
Bonjour,
quelque soit l'Office:
quelque soit l'Office:
Sub Macro1()
'avec reference Microsoft Word xx.x object library
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
'ou sans
'Dim WordApp As Object
'Dim WordDoc As Object
Dim i As Byte
Dim j As Byte
Set WordApp = CreateObject("Word.Application")
Set WordDoc = CreateObject("Word.Document")
WordApp.Visible = True
paysan68
Bonjour, merci de ta réponse je vais essayer cela demain, je te tiens au courant
