Supportnet / Forum / Tabellenkalkulation
Spaltenbreite
Frage
Mal ne ganz dumme Frage.
In welcher Maßeinheit werden bei Excel 2000 die Spaltenbreiten angegeben, und kann man das ändern?
Gruß Butz
Antwort 1 von _gau_
Ich habe noch nichts gefunden, wo man das ändern könnte :-(
Die Zahl für die Spaltenbreite entspricht der Anzahl von Zeichen in einer nichtproportionalen 10-Punkt-Standardschrift.
Z.B. bei der Schrift Courier (Größe 10) ist die Spalte bei einer Breite von 20 eben 20 Zeichen breit.
Steffen
Die Zahl für die Spaltenbreite entspricht der Anzahl von Zeichen in einer nichtproportionalen 10-Punkt-Standardschrift.
Z.B. bei der Schrift Courier (Größe 10) ist die Spalte bei einer Breite von 20 eben 20 Zeichen breit.
Steffen
Antwort 2 von Aliba
folgendes war in der MS Knowledge Data Base zu finden:
Spaltenbreite und Zeilenhöhe in Zentimetern angeben
Frage:
Ich arbeite mit MicrosoftEXCEL Version 5.0 für WINDOWS und möchte die
Spaltenbreite bzw. die Zeilenhöhe im Tabellenblatt in der Maßeinheit
Zentimeter festlegen. Wie kann ich das erreichen?
Antwort:
Über Menübefehle (FORMAT - SPALTE - BREITE... bzw. FORMAT - ZEILE -
HÖHE...) können Sie die Spaltenbreite in Anzahl Zeichen der verwendeten
Standardschrift und die Zeilenhöhe in Punkten einstellen. Diese beiden
Eigenschaften können Sie auch mit VISUAL BASIC für Applikationen (VBA) ändern. Außerdem haben Sie in VBA Lesezugriff auf die Eigenschaft Breite.
Sie liefert die Breite einer Spalte oder eines Bereichs in Punkten.
Das Hauptproblem, eine Spaltenbreite oder Zeilenhöhe in Zentimetern
einzustellen, besteht darin, daß alle oben genannten Eigenschaften von
der verwendeten Standardschrift abhängig sind.
Mit folgenden Beispielprozeduren können Sie Spaltenbreite bzw.
Zeilenhöhe einstellen, wenn die Standardschrift Arial 10 verwendet wird.
Entscheidend ist dabei nicht, ob Excel diese Schriftart als Standard
verwendet, sondern daß sie in der Formatvorlage "Standard" der
Arbeitsmappe festgelegt ist.
Option Explizit
Sub SpalteInZentimetern()
Dim Breite1
Konst b0 = -0,71
Konst b1 = 5,1425
SchriftartPrüfen
Breite1 = EingabeDlg("Breite für ausgewählte Spalten in Zentimetern:")
Wenn IstZahl(Breite1) Dann
Auswahl.Spaltenbreite = b0 + b1 * Breite1
Ende Wenn
Ende Sub
Sub ZeileInZentimetern()
Dim Höhe1
Konst h1 = 29,5
SchriftartPrüfen
Höhe1 = EingabeDlg("Höhe ausgewählte Zeilen in Zentimetern:")
Wenn IstZahl(Höhe1) Dann
Auswahl.Zeilenhöhe = h1 * Höhe1
Ende Wenn
Ende Sub
Sub SchriftartPrüfen()
Dim Mldg Als ZeichenF
Dim Antw Als Ganz
Konst SArt = "Arial"
Konst SGrösse = 10
Mit AktiveArbeitsmappe.FormatvorlageListe("Standard").Schriftart
Wenn .Name <> SArt Oder .Grösse <> SGrösse Dann
Mldg = "Prozedur arbeitet nur korrekt, wenn Standardschrift " & SArt
Mldg = Mldg & " " & SGrösse & " verwendet wird"
Mldg = Mldg & Zn(10) & "Diese Schriftart jetzt einstellen?"
Antw = MeldungsDlg(Mldg; vbJaNein; "Schriftartüberprüfung")
Wenn Antw = vbJa Dann
.Grösse = SGrösse
.Name = SArt
Ende Wenn
Ende Wenn
Ende Mit
Ende Sub
Anmerkungen:
Das Makro "SchriftartPrüfen" kontrolliert, ob die aktive Arbeitsmappe die
Schriftart Arial 10 verwendet und schlägt andernfalls vor, diese Schriftart
einzustellen.
Wenn Sie mit einer anderen Standardschriftart oder -größe arbeiten,
sollten Sie alle verwendeten Konstanten (b0, b1, h1, SArt, SGrösse)
entsprechend anpassen.
Um die Konstante "h1" zu bestimmen, messen Sie die Höhe einer
ausgedruckten Zeile und dividieren anschließend die von Excel angezeigte Höhe in Punkten durch die gemessene Höhe.
Beispiel:
Schriftart Courier 12
Zeilenhöhe gemessen: 10 cm
Zeilenhöhe in Punkten: 315
h1 = 315/10 = 31,5
Je größer die gewählte Zeilenhöhe, desto genauer können Sie die
Konstante bestimmen. Sie können auch mehrere Werte bestimmen und
daraus den Mittelwert errechnen.
Zur Ermittlung von b0 und b1 benötigen Sie zwei Spalten mit
unterschiedlicher Breite.
Beispiel:
Schriftart Courier 12
1. Spaltenbreite gemessen (SM1): 17 cm
Spaltenbreite in Zeichen (SZ1): 66,22
2. Spaltenbreite gemessen (SM2): 1 cm
Spaltenbreite in Zeichen (SZ2): 3,11
h1 = (SZ1 - SZ2)/(SM1 - SM2) = (66,22 - 3,11)/(17 - 1) = 3,944
h0 = SZ2 - h1* SM2 = 3,11 - h1*1 = -0,834
Auch hier empfiehlt es sich Mittelwerte aus mehreren Berechnungen zu
verwenden, um genaue Werte zu erhalten.
Die Verwendung des hier abgedruckten Makro- bzw. Programmcodes
geschieht auf Ihre eigene Verantwortung. Microsoft stellt Ihnen diesen
Makro bzw. dieses Programmlisting ohne Gewähr auf Richtigkeit,
Vollständigkeit und/oder Funktionalität, sowie ohne Anspruch auf Support
zur Verfügung. Der Makro bzw. das Programmlisting soll lediglich
exemplarisch die Funktionsweise des hier abgedruckten oder auf der
Diskette enthaltenen Beispiels aufzeigen.
CU Aliba
Spaltenbreite und Zeilenhöhe in Zentimetern angeben
Frage:
Ich arbeite mit MicrosoftEXCEL Version 5.0 für WINDOWS und möchte die
Spaltenbreite bzw. die Zeilenhöhe im Tabellenblatt in der Maßeinheit
Zentimeter festlegen. Wie kann ich das erreichen?
Antwort:
Über Menübefehle (FORMAT - SPALTE - BREITE... bzw. FORMAT - ZEILE -
HÖHE...) können Sie die Spaltenbreite in Anzahl Zeichen der verwendeten
Standardschrift und die Zeilenhöhe in Punkten einstellen. Diese beiden
Eigenschaften können Sie auch mit VISUAL BASIC für Applikationen (VBA) ändern. Außerdem haben Sie in VBA Lesezugriff auf die Eigenschaft Breite.
Sie liefert die Breite einer Spalte oder eines Bereichs in Punkten.
Das Hauptproblem, eine Spaltenbreite oder Zeilenhöhe in Zentimetern
einzustellen, besteht darin, daß alle oben genannten Eigenschaften von
der verwendeten Standardschrift abhängig sind.
Mit folgenden Beispielprozeduren können Sie Spaltenbreite bzw.
Zeilenhöhe einstellen, wenn die Standardschrift Arial 10 verwendet wird.
Entscheidend ist dabei nicht, ob Excel diese Schriftart als Standard
verwendet, sondern daß sie in der Formatvorlage "Standard" der
Arbeitsmappe festgelegt ist.
Option Explizit
Sub SpalteInZentimetern()
Dim Breite1
Konst b0 = -0,71
Konst b1 = 5,1425
SchriftartPrüfen
Breite1 = EingabeDlg("Breite für ausgewählte Spalten in Zentimetern:")
Wenn IstZahl(Breite1) Dann
Auswahl.Spaltenbreite = b0 + b1 * Breite1
Ende Wenn
Ende Sub
Sub ZeileInZentimetern()
Dim Höhe1
Konst h1 = 29,5
SchriftartPrüfen
Höhe1 = EingabeDlg("Höhe ausgewählte Zeilen in Zentimetern:")
Wenn IstZahl(Höhe1) Dann
Auswahl.Zeilenhöhe = h1 * Höhe1
Ende Wenn
Ende Sub
Sub SchriftartPrüfen()
Dim Mldg Als ZeichenF
Dim Antw Als Ganz
Konst SArt = "Arial"
Konst SGrösse = 10
Mit AktiveArbeitsmappe.FormatvorlageListe("Standard").Schriftart
Wenn .Name <> SArt Oder .Grösse <> SGrösse Dann
Mldg = "Prozedur arbeitet nur korrekt, wenn Standardschrift " & SArt
Mldg = Mldg & " " & SGrösse & " verwendet wird"
Mldg = Mldg & Zn(10) & "Diese Schriftart jetzt einstellen?"
Antw = MeldungsDlg(Mldg; vbJaNein; "Schriftartüberprüfung")
Wenn Antw = vbJa Dann
.Grösse = SGrösse
.Name = SArt
Ende Wenn
Ende Wenn
Ende Mit
Ende Sub
Anmerkungen:
Das Makro "SchriftartPrüfen" kontrolliert, ob die aktive Arbeitsmappe die
Schriftart Arial 10 verwendet und schlägt andernfalls vor, diese Schriftart
einzustellen.
Wenn Sie mit einer anderen Standardschriftart oder -größe arbeiten,
sollten Sie alle verwendeten Konstanten (b0, b1, h1, SArt, SGrösse)
entsprechend anpassen.
Um die Konstante "h1" zu bestimmen, messen Sie die Höhe einer
ausgedruckten Zeile und dividieren anschließend die von Excel angezeigte Höhe in Punkten durch die gemessene Höhe.
Beispiel:
Schriftart Courier 12
Zeilenhöhe gemessen: 10 cm
Zeilenhöhe in Punkten: 315
h1 = 315/10 = 31,5
Je größer die gewählte Zeilenhöhe, desto genauer können Sie die
Konstante bestimmen. Sie können auch mehrere Werte bestimmen und
daraus den Mittelwert errechnen.
Zur Ermittlung von b0 und b1 benötigen Sie zwei Spalten mit
unterschiedlicher Breite.
Beispiel:
Schriftart Courier 12
1. Spaltenbreite gemessen (SM1): 17 cm
Spaltenbreite in Zeichen (SZ1): 66,22
2. Spaltenbreite gemessen (SM2): 1 cm
Spaltenbreite in Zeichen (SZ2): 3,11
h1 = (SZ1 - SZ2)/(SM1 - SM2) = (66,22 - 3,11)/(17 - 1) = 3,944
h0 = SZ2 - h1* SM2 = 3,11 - h1*1 = -0,834
Auch hier empfiehlt es sich Mittelwerte aus mehreren Berechnungen zu
verwenden, um genaue Werte zu erhalten.
Die Verwendung des hier abgedruckten Makro- bzw. Programmcodes
geschieht auf Ihre eigene Verantwortung. Microsoft stellt Ihnen diesen
Makro bzw. dieses Programmlisting ohne Gewähr auf Richtigkeit,
Vollständigkeit und/oder Funktionalität, sowie ohne Anspruch auf Support
zur Verfügung. Der Makro bzw. das Programmlisting soll lediglich
exemplarisch die Funktionsweise des hier abgedruckten oder auf der
Diskette enthaltenen Beispiels aufzeigen.
CU Aliba
Antwort 3 von Kaleun
@BiBaButzemann
Schau dir mal folgenden Thread an.
https://supportnet.de/discussion/listmessages.asp?content=&recno=47737&adminrecno=22
Dort findest du ein Makro, mit dem du die Zeilenhöhe und die Spaltenbreite in cm einstellen kannst.
Gruß Kaleun
Schau dir mal folgenden Thread an.
https://supportnet.de/discussion/listmessages.asp?content=&recno=47737&adminrecno=22
Dort findest du ein Makro, mit dem du die Zeilenhöhe und die Spaltenbreite in cm einstellen kannst.
Gruß Kaleun