Guten Tag,
ich brauch hier das Format für die Anzeige Label27, gerechnet wird Richtig.
Label27.Caption = Format(ActiveCell.Offset(0, 18).Value, ("#,##0.00")) / 116 * 100
gruß Walter