spaltenhoehe in cm?

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: spaltenhoehe in cm?
von: nina
Geschrieben am: 24.09.2003 00:18:15

Hallo,

ich suche die Option um die Spaltenhoehen- und Breitenangabe von Points nach cm umzustellen, da ich zentimeter-genaue Spaltenangaben brauche.
Falls das irgendwie moeglich ist, wie wuerde ich dann eine Liste (untereinander) von Spalten als folgt erstellen:
||
||
||
--
||
||
--
||
--
in der art: 10cm, 3.2cm, 5.4cm hoch, etc...
erstellen? Wird der Rand zwischen zwei Kaestchen mitgerechnet oder nicht? Und falls nicht, wie dick ist der Rand?

Danke.

ps: benutze englisches excel, falls wichtig.

Bild


Betrifft: AW: spaltenhoehe in cm?
von: GerdW
Geschrieben am: 24.09.2003 00:38:43

Wenn du das nicht öfter machen musst, erstell dir ein Zeichnungsobjekt
(z.B. Rechteck aus "Zeichnen"), das kannst du in cm formatieren und
daran deine Zeilen anpassen.

Gerd


Bild


Betrifft: AW: spaltenhoehe in cm?
von: Kl@us-M.
Geschrieben am: 24.09.2003 01:05:10

Hallo Nina,
vielleicht hilft das hier weiter ?
http://www.kmbuss.de/Excel-CD/Beispiel/059.xls
Gruss aus dem Hunsrück
Klaus-Martin


Bild


Betrifft: AW: spaltenhoehe in cm?
von: LotharP
Geschrieben am: 24.09.2003 10:59:06

Hallo Klaus ,
ich hab' mir das gerade mal angeschaut. Toll!
Verständnisproblem hab' ich allerdings bei hoehe = CSng(antwort)
Was ist CSng?
Vieleicht kannst du das mal kurz erläutern, wäre nett.

Gruß

Lothar


Bild


Betrifft: AW: spaltenhoehe in cm?
von: nina
Geschrieben am: 24.09.2003 18:49:05

Fantastisch, Klaus!
genau was ich brauchte. Vielen Dank.

nina


Bild


Betrifft: AW: spaltenhoehe in cm?
von: Bernhard
Geschrieben am: 24.09.2003 07:56:08

Hallo Nina,

2 Listings für Dich:

Sub ZeilenHoehe()
   Dim varCM As Variant
   varCM = InputBox( _
      prompt:="Bitte die gewünschte Zeilenhöhe in cm angeben:")
   If varCM = "" Then Exit Sub
   Selection.RowHeight = CDbl(varCM) / 0.035
End Sub



Sub ZeilenBreite()
   Dim varCM As Variant
   varCM = InputBox( _
      prompt:="Bitte die gewünschte ZeilenBreite in cm angeben:")
   If varCM = "" Then Exit Sub
   Selection.ColumnWidth = CDbl(varCM) / 0.035
End Sub


... in ein Modul eingeben, einer Schaltfläche zuweisen.... und freuen!
(nicht von mir... aus H.Herbers Archiv-CD)

Gruß,

Bernhard


 Bild

Beiträge aus den Excel-Beispielen zum Thema " Alle zahlen Addieren"