Betrag wird als Text angezeigt

[dertommy]

Hallo!

Ich habe folgendes Problem. Ich übertrage von Tabelle1 auf Tabelle2 Zahlen. Sobald aber in Tabelle1 eine Zahl mit Komma steht, z.B. 10,5 wird diese dann in der Tabelle2 als Text ausgegeben. Um nicht jedes mal manuell die Zahlen von Text auf Zahl umzuwandeln, würde ich gerne wissen, ob es eine Möglichkeit gibt, dass automatisch in Tabelle2 die Zahl auch wirklich als Zahl angezeigt wird?

Hier der Ausschnitt meines Codes, wo die Zahl von Tabelle1 in Tabelle2 übertragen wird:

Code:

With ThisWorkbook.Worksheets("Tabelle2")
.Cells(.Cells(.Rows.Count, 2).End(xlUp).Row + 0, 4).Formula = "" & zelle.Offset(0, -1).Value & ""
End With

Ich habe auch sicherheitshalber die ganze Tabelle mit hochgeladen.
Ich hoffe, dass mir jemand helfen kann.
LG

[Kuwer]

Hallo,

With ThisWorkbook.Worksheets("Tabelle2")

  .Cells(.Cells(.Rows.Count, 2).End(xlUp).Row + 0, 4).Value = Zelle.Offset(0, -1).Value

End With

Gruß Uwe

[BoskoBiati]

Hi,

Code:

With ThisWorkbook.Worksheets("Tabelle2")
                        .Cells(.Cells(.Rows.Count, 2).End(xlUp).Row + 1, 2) = Art
                        .Cells(.Cells(.Rows.Count, 2).End(xlUp).Row + 0, 3) = Date
                        .Cells(.Cells(.Rows.Count, 2).End(xlUp).Row + 0, 4) = zelle.Offset(0, -1)
                    End With

[dertommy]

Hallo!

Super danke, funktioniert jetzt.

LG