Zahlen in Excel-Tabelle eintragen

Computer: Software & Programmierung Visual Basic
#1

Hallo,

ich möchte aus einer Zelle in Excel eine Zahl: 2156,600
in eine andere Zelle per VBA übertragen.
beim schreiben in die Zelle funktioniert aber nur 2156,6
wenn ich aber die Zahl 2156,60 schreiben will meckert Excel, das sei keine Zahl und wenn ich 2156,600 schreiben will, dann schreibt er einfach 2156600 ohne Punkt und Komma - er ignoriert einfach das Komma - das ist ja jetzt aber ne völlig falsche Zahl geworden…
Wenn ich die Zelle vorher formatiere als Zahl mit 3 nachkommastellen, geht es immer noch nicht.
Formatiere ich sie aber und trage die selbe Zahl von Hand ein geht es selbstverständlich

Variable = cells(1,1) ‚das wäre dann die Zahl 0002156,600000…‘
cells(2,2)= mid(Variable,3,8) ‚gibt genau die Zahl 2156,600‘
ich brauch die 3 Stellen hinter dem Komma, weil da kann auch mal was anderes als 0 stehen

Vielen Dank für Hilfe!

Werner

#2

Hi Wännä,

meinst Du so?

Cells(intZeile, intSpalte).NumberFormat = „0.000“

Martin

#3

beim schreiben in die Zelle funktioniert aber nur 2156,6
wenn ich aber die Zahl 2156,60 schreiben will meckert Excel,
das sei keine Zahl

Hi Werner,
kann ich nicht nachvollziehen dass 2156,60 keine Zahl sei. Und Anzahl der Nachkommastellen machste doch mt Format
Gruß
Reinhard

#4

Hi Wännä,

meinst Du so?

Cells(intZeile, intSpalte).NumberFormat = „0.000“

–> ja! genau so formatier ich die Zellen!
Werner

#5

Dezimalzahlen in VBA

Hallo,

mach’s so:
Cells(1, 1).NumberFormat = „0.000“
Cells(1, 1).Value = „2156.600“

Gruß.Timo

ich möchte aus einer Zelle in Excel eine Zahl: 2156,600
in eine andere Zelle per VBA übertragen.
beim schreiben in die Zelle funktioniert aber nur 2156,6
wenn ich aber die Zahl 2156,60 schreiben will meckert Excel,
das sei keine Zahl und wenn ich 2156,600 schreiben will, dann
schreibt er einfach 2156600 ohne Punkt und Komma - er
ignoriert einfach das Komma - das ist ja jetzt aber ne völlig
falsche Zahl geworden…
Wenn ich die Zelle vorher formatiere als Zahl mit 3
nachkommastellen, geht es immer noch nicht.
Formatiere ich sie aber und trage die selbe Zahl von Hand ein
geht es selbstverständlich

Variable = cells(1,1) ‚das wäre dann die Zahl
0002156,600000…‘
cells(2,2)= mid(Variable,3,8) ‚gibt genau die Zahl 2156,600‘
ich brauch die 3 Stellen hinter dem Komma, weil da kann auch
mal was anderes als 0 stehen

Vielen Dank für Hilfe!

Werner

#6

Hallo,

mach’s so:
Cells(1, 1).NumberFormat = „0.000“
Cells(1, 1).Value = „2156.600“

nun…wenn das so einfach wäre…wenn ich wüsste, was für eine Zahl an der Stelle steht, dann würd ich sie ja nicht übertragen brauchen…da stehen immer andere, aber gleich lange Zahlen…
Aber du hast den Tipp trotzdem gegeben!
Das Komma stört - wenn ich alle Kommas vorher in Punkte ersetze, dann kann ich es in Excel übertragen!!

Danke!

Werner