2007: Spaltenbreite von mehrern Spalten addieren

24/08/2009 - 16:13 von thomas müller | Report spam
Hallo,

wie kann ich unter 2007. Die Spaltenbreiten der Spalten 1 bis 20
addieren und in einer MSgbox ausgeben?

Danke

thomas
 

Lesen sie die antworten

#1 Alexander Wolff
24/08/2009 - 16:40 | Warnen spam
Die Tastatur von thomas müller wurde wie folgt gedrückt:
wie kann ich unter 2007. Die Spaltenbreiten der Spalten 1 bis 20
addieren und in einer MSgbox ausgeben?



Sub BreiteVon20Spalten()
For j = 1 To 20
k = k + Cells(1, j).Width
Next
MsgBox k 'in "Punkt" zurückgegeben
End Sub

Moin+Gruss Alexander - MVP for MS Excel - www.xxcl.de - mso2000sp3 --7-2

Ähnliche fragen