Announcement

Collapse
No announcement yet.

Zellen formatieren - führende "0" mit anzeigen

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Zellen formatieren - führende "0" mit anzeigen

    Hallo ihr lieben,

    ich exportiere aus einem anderen Programm heraus eine Datei in Excel2003. Als Beispiel steht in einer Zelle "0600 Verpackungen nach §6.3". Von diesem Zelleninhalt brauche ich nur den ersten Teil bis zum ersten Leerzeichen (hierbei handelt es sich immer um eine Zahl mit einer führenden "0"), soweit so gut, das bekomme ich auch noch hin. Dieser Teil, die Zahl, muss in die gleiche Zelle wieder rein geschrieben werden. Auch das bekomme ich hin. Allerdings streicht er immer die führende "0". Ich brauche diese aber unbedingt, kann mir jemand helfen? Ich schätze mal das funktioniert mit NumberFormat oder so, bin mir da aber nicht sicher. Ein Quellcode wäre echt super.

    Mein Code bereits dafür:
    Cells(i, 16) = Left(Cells(i, 16), InStr(1, Cells(i, 16), " ") - 1)

    Liebe Grüsse Stefie

  • #2
    Hallo Stefie,

    bin mir nicht sicher ob es klappt, aber formatiere die Zahl mal als Text.

    Cells(i, 16) = str(Left(Cells(i, 16), InStr(1, Cells(i, 16), " ") - 1) )

    Gruss Atz

    Comment


    • #3
      Sorry

      Cells(i, 16) = CStr(Left(Cells(i, 16), InStr(1, Cells(i, 16), " ") - 1) )

      muss es heißen ;-

      Comment

      Working...
      X