Programme VBA

Bonjour à tous je suis en se moment en stage et à l'issu de celui ci je doit fair un programme VBA qui pourrais convertir un fichier excel en word déjà complété.

J'ai déjà fait un programme cependant il y a un problème dessus et je ne sais pas où est mon erreur pourriez vous y jetez un coup d’œil et me faire un retour si possible corriger l'erreur . Merci d'avance .

'imprimer la zone Page1

Sub ImpZoneEtTitle()

With Worksheets("Feuil1").PageSetup

.CenterHorizontally = True

.PrintArea = "Page1"

.Orientation = xlPortrait

.FitToPagesWide = 1

.FitToPagesTall = 1

End With

Worksheets("Feuil1").PrintOut

End Sub

Sub Deplacer()

' Deplacer Macro

ActiveSheet.Shapes.Range(Array("Image2")).Select

ActiveSheet.Shapes("Image2").IncrementTop -111

End Sub

Sub Rectangle2_Cliquer()

Sheets("Page de garde").Range("Page1").CopyPicture xlScreen, xlBitmap

Set wrdApp = CreateObject("Word.Application")

On Error GoTo Line1

Set wrdDoc = wrdApp.Documents.Open("\\Firmin\a2a\Gestion_Technique\Interventions\Rapport décontamination\A2A Rapport décontamination.docm")

wrdApp.Visible = True

Exit Sub

Line1:

MsgBox "Le fichier 'x' doit être placé dans le répertoire 'C:\x.doc'", vbOKOnly + vbExclamation, "Attention"

End Sub

bonjour Jean_will

ce que tu demandes s'appelle du publipostage que tu devrai trouvé des exemples dans ce forum en utilisant la loupe en haut droit

Rechercher des sujets similaires à "programme vba"