title image


Smiley Doch, das geht schon...
Z.B. so:



Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)

Me.ScaleMode = 1

Me.FontName ="Arial"

Me.FontSize = 12

If Me.TextWidth(Me!MeinFeld) > 1000 then

Debug.Print "passt nicht rein!"

end if

End Sub


Gruß aus dem Norden

Reinhard


Bitte immer die Access-Version angeben


 



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: