bonjour,
j'ai réaliser une macro grace à l'aide du forum :
http://www.developpez.net/forums/sho...d.php?t=543313
je veux que cette macro envoi des données excel vers des signets word à partir d'un "modele.doc" puis enregistre le ce fichier sous le nom de ma 1er cellule de ma ligne excel.
j'espere que je suis assez clair, voilà ma macro cela vous parlera surement plus:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
sub test_jeudi_15()
'Nécessite d'activer la référence "Microsoft Word xx.x Object Library"
  Dim WordApp As Word.Application
  Dim WordDoc As Word.Document
  Dim Chemin As String
  Dim i As Byte
  Dim j As Byte
 
  Set WordApp = CreateObject("word.application") 'ouvre session word
  Chemin = "D:\ludo\excel\"
  'Pour passer toutes les cellule renseignées de ta colonne A
  For i = 2 To 5
 
      'ouvre du document Word
      Set WordDoc = WordApp.Documents.Open("D:\ludo\excel\modele.doc")
      'word est masqué pendant l'opération
      WordApp.Visible = False
 
      For j = 1 To 27
 
          WordDoc.Bookmarks("Signet" & j).Range.Text = Cells(i, j + 1)
      Next j
      'Ferme le document word en sauvegardant les modifications
      WordDoc.SaveAs Filename:=Chemin & Cells(i, 1) & ".doc"
  Next i
  WordDoc.Close
 
  'ferme la session Word
  WordApp.Quit
End Sub
MON PROBLEME:
lors de l'exucution de ma macro, on me demande d'ouvrir le document word en lecture seulement...
à ce moment là le document word ne peux s'ouvrir seulement qu'en lecture.
que puis-je faire sachant que j'ai essayé de reenregistré le document en suprimant l'option lecture seulement dans outils-->securité...

merci d'avance