Bonjour à tous,
je suis entrain de réaliser une macro excel à l'aide du langage vba et j'ai besoin de copier coller une feuille excel sur un document word. Le copier et l'ouverture de word e sais faire via ma macro excel mais je n'arrive pas à coller :
Voici mon code :
Sub docword()
Dim Wrd As Object
Set Wrd = CreateObject("Word.Application ")
Dim appWrd As Object
Set appWrd = Wrd.Documents.Add
Wrd.Visible = True
Selection.Paste
ChangeFileOpenDirectory "C:\Macro_Edition\"
ActiveDocument.SaveAs Filename:="Rapport.doc", FileFormat:= _
wdFormatDocument, LockComments:=False, Password:="", AddToRecentFiles:= _
True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:= _
False, SaveNativePictureFormat:=False , SaveFormsData:=False, _
SaveAsAOCELetter:=False
End Sub
j'ai une erreur d'éxecution de type "sub non définie"
Pouvez vous m'aider.
Merci d'avance.
-----