title image


Smiley Re: Neue Zeile per VBA
Hallo,



so geht es in Word XP.

Sub Test400()

Dim Nummer

Nummer = 0

If Nummer = 0 Then

MsgBox "Es wurde nichts eingefügt."

End If

'

Nummer = 5

If Nummer > 0 Then

Selection.TypeParagraph

Selection.TypeText Text:="Nummer " & CStr(Nummer)

End If

End Sub      Hubert

Jedes Betriebsystem hat sein allgegenwärtiges Maskottchen:

Unix den Dämon,

MacOS den Apfel,

Linux den Pinguin,

Windows die allgemeinen Schutzverletzungen.





geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: