Hallo,
möchte an einen Text eine ganze Zahl anhängen die auf einem Feld als Kommazahl ausgegeben ist
Beispiel auf a1 wird soll """ Baily - 120 """ stehen
auf b1 steht Baily
auf c1 steht 120,77 ( Kommazahl soll als Ganzzahl erscheinen )
Public Sub ganzezahl()
Dim a As Worksheet
Set a = ThisWorkbook.Sheets(1)
a.Cells(1, 1) = a.Cells(1, 2) & "-" & a.Cells(1, 3)
End Sub
wer weiß Bescheid
|