Bonjour,
Je suis entrain d'apprendre le VBA et je voudrais savoir comment copier des cellules sur excel (par exemple de A5 à D11) et les coller dans un fichier word déjà existant sur mon ordi.
Sub ControleSiDocumentWordOuvert()
Dim Appli As Word.Application
Dim WordDoc As Word.Document
'n?c?ssite d'activer la reference Microsoft word xx.x 0bject Library
On Error Resume Next
Set Appli = GetObject(, "Word.Application")
Set WordDoc = Appli.Documents("C:\Users\Ngninteba\Desktop\CCDR\190628.doc")
On Error GoTo 0
If WordDoc Is Nothing Then
MsgBox "Le document est ferm?"
Else
MsgBox "Le document est ouvert"
'WordDoc.Close 'fermeture application Word
End If
End Sub
Ce petit code est cené pouvoir vérifier si le document word, mais je recois un message d'erreur disant "Type non défini par l'utlisateur "
Aidez moi SVP