Excel Spaltenbreite

[Sidi61]

hallo zusammen,

nach vielen Versuchen eine exakte berechnete Breiteneinstellung nach Millimeterangabe umzusetzten bin ich wieder auf die einfache feste Umrechnung mit einem festen Wert gekommen

Delphi-Quellcode:

ExcelApp.ActiveWorkbook.ActiveSheet.Columns.Columns[Spalte].ColumnWidth := Breite * 0.5073;

Was ich nicht ganz verstehe ist, dass im Ausdruck die Spaltenbreite immer 1,5 mm breiter ist als vorgegeben. Dies ist bei Vorgabe 10, 25, 50 und 100 mm der Fall d.h. eine Veränderung des Umrechnungsfaktors bringt da nichts.

Kennt jemand einen besseren exakteren Weg die Spaltenbreite einzustellen??

Gruß
Sidi61

[Delphi-Laie]

Etwas schwierig zu verstehen und nachzuvollziehen.

Wenn der Ausdruck 1,5 mm breiter als vorgegeben ist, warum lassen sich diese 1,5 mm nicht einfach von der Formel

Zitat:

Zitat von Sidi61 (Beitrag 1352209)

Delphi-Quellcode:

ExcelApp.ActiveWorkbook.ActiveSheet.Columns.Columns[Spalte].ColumnWidth := Breite * 0.5073;

subtrahieren?

[Sidi61]

habe ich gemacht, ist aber nicht schön :roll:

Delphi-Quellcode:

ExcelApp.ActiveWorkbook.ActiveSheet.Columns.Columns[Spalte].ColumnWidth := (Breite - 1) * 0.5073;

Gruß
Sidi61