Ligne vide après signet

Bonjour
Si ta question est la suite de ton message du 18/02 à 20:34, utilise plutôt
une boucle pour aller sur chacune des lignes de ton tableau Word (sachant
donc que tu commences à la ligne 2 puisque ton tableau comporte des
en-têtes)
Voic une manière de procéder :
Un bouton de commande situé sur un Userform d'Excel va placer sur chaque
ligne de la 1ère colonne du tableau Word les éléments saisis dans les
textbox du Userform.
Il faudra ajouter dans ton projet VBA dans Excel, une référence à Microsoft
Word 11.0 Object Library (ou autre version)
Cordialement
Pascal

Private Sub CommandButton1_Click()
Dim AppWrd As Word.Application
Dim DocWrd As Word.Document
Set AppWrd = New Word.Application
Set DocWrd = AppWrd.Documents.Open("C:TestsDoc1.doc")
Dim i&
i = 1
For Each ctr In Me.Controls
If TypeOf ctr Is MSForms.TextBox Then
i = i + 1
DocWrd.Tables(1).Rows(i).Range.Text = ctr
End If
Next ctr
AppWrd.Visible = True 'histoire de visualiser les saisies
DocWrd.Save
AppWrd.Quit
Set DocWrd = Nothing
Set AppWrd = Nothing
End Sub


"GA" <gerard.a.ayme@wanadoo.fr> a écrit dans le message de news:
%23Rsd4IhFFHA.2980@TK2MSFTNGP09.phx.gbl...

Bonsoir à tous,

Comment peut-on en Vba, à partir d'excel, trouver la première ligne vide
en dessous d'un signet dans un tableau word existant ??

Merci de votre réponse

Cordialement