title image


Smiley dann noch schmutziger:
Hallo NoNet,



wie wärs dann mit



Sub PixelBreitenbestimmung()

breite = Range("A14").ColumnWidth

höhe = Range("A14").RowHeight

ausrichtung = Range("A14").WrapText

Range("A14").WrapText = False

Range("A14").Columns.AutoFit

pixelBreite = Range("A14").Width

Range("A14").WrapText = ausrichtung

Range("A14").RowHeight = höhe

Range("A14").ColumnWidth = breite

End Sub





Viele Grüße



Ulrich
(Falls vorhanden:) Tabellen sind eingefügt mit Tool von Schorsch Dabbeljuh
hier sein offizieller Download-Link

(Fast) alles über Excel-Formeln ohne VBA findet man auf der Seite Excelformeln

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: