Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
388to392
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zeilenhöhe und Spaltenbreite auf cm umstellen

Zeilenhöhe und Spaltenbreite auf cm umstellen
01.03.2004 19:29:00
Sylvia
Hallo,
kann mir jemand sagen wie mann die Zeilenhöhe und Spaltenbreite in cm umstellen kann statt wie üblich in Pt.
Danke
Sylvia

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilenhöhe und Spaltenbreite auf cm umstellen
01.03.2004 19:48:26
Klaus
Hallo Sylvia,
vielleicht kann ich dir helfen.
Mit folgenden Makros müßte es möglich sein

Sub Zeilenhöhe()
Dim hoehe As Single
Dim aktuell As Single
Dim Text As String
Dim antwort As String
aktuell = Selection.RowHeight / 29.5
Text = "Aktuelle ZeilenHöhe: " & Format(aktuell, "###0,00 cm") & Chr(13) & _
"Geben Sie die gewünschte Zeilenhöhe für die aktuelle Zeile oder Markierung in cm ein:"
antwort = InputBox(Text, "Neue Zeilenhöhe festlegen", Format(aktuell, "###0,00"))
If antwort <> "" Then
hoehe = CSng(antwort)
Selection.RowHeight = hoehe * 29.5
End If
End Sub




Sub Spaltenbreite()
Dim Width As Single
Dim aktuell As Single
Dim Text As String
Dim antwort As String
aktuell = (Selection.ColumnWidth + 0.71) / 5.1425
Text = "Aktuelle Spaltenbreite: " & Format(aktuell, "###0,00 cm") & Chr(13) & _
"Geben Sie die gewünschte Spaltenbreite für die aktuelle Spalte oder Markierung in cm ein:"
antwort = InputBox(Text, "Neue Spaltenbreite festlegen", Format(aktuell, "###0,00"))
If antwort <> "" Then
Width = CSng(antwort)
Selection.ColumnWidth = -0.71 + 5.1425 * Width
End If
End Sub

Tschüß Klaus
Anzeige
AW: Zeilenhöhe und Spaltenbreite auf cm umstellen
02.03.2004 22:16:31
Klaus
Hallo Sylvia,
es ist noch ein Fehler in den Makros.
"###0,00 cm" muss richtig heißen "###0.00 cm" und
"###0,00 " heißt "###0.00 cm"
Entschuldigung
Tschüß Klaus
AW: Zeilenhöhe und Spaltenbreite auf cm umstellen
02.03.2004 22:16:46
Klaus
Hallo Sylvia,
es ist noch ein Fehler in den Makros.
"###0,00 cm" muss richtig heißen "###0.00 cm" und
"###0,00 " heißt "###0.00 cm"
Entschuldigung
Tschüß Klaus

355 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige