title image


Smiley Bruch per VBA
Hallo,

erhalte leider nicht den richtigen Bruch durch folgenden Code.



Es soll eine Form erscheinen, in der auch der Zähler und Nenner eingegeben wird und durch OK der Bruch an der Enfügemarke erscheint.



Hat jemand eine Idee?



Sub Makro2()

Dim sZähler As String

Dim sNenner As String

sZähler = "22" ' txtZaehler.text(Bezeichner der Textbox der Form)

sNenner = "111"' txtNenner.text

Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, text:= _

"EQ \F(sZähler;sNenner) ", PreserveFormatting:=False

End Sub





Gruß

Benny



geschrieben von

Anhang
Bild 12933 zu Artikel 597099

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: