VBA regostrer bruger iword, opet som sidefod

Tags:    visual-basic

Planen er som følgende:
Når man åbner et bestemt word dokumet skal man indtaste navn og stilling. Det er lavet som to tekst bokse. De oplysninger skal så placeres som sidefod, sammen med sidetal.
Private Sub CommandButton1_Click()
With ActiveDocument.Sections(1)
.Footers(wdHeaderFooterPrimary).Range.Text = "sådan noget hø"HER SKULLE JEG SÅ SAMMEN SMELTE TEXT!:TEXT MED KODEN
End With
With ActiveDocument.Sections(1)
.Footers(wdHeaderFooterPrimary).PageNumbers.Add
End With
End Sub

/Mette[Redigeret d. 25/03-03 21:04:34 af mealwa]



1 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 4 karma
Sorter efter stemmer Sorter efter dato
Du siger egentlig ikke noget om, hvad problemet er, så jeg gætter:

<pre>Private Sub CommandButton1_Click()

With ActiveDocument.Sections(1)
.Footers(wdHeaderFooterPrimary).Range.Text = Text1.Text
.Footers(wdHeaderFooterPrimary).PageNumbers.Add
End With

End Sub</pre>

Håber det hjælper dig videre.


Software is here and now but rock and roll is forever.



t