Office: spalte formatieren von Text in Standard mit VBA

Helfe beim Thema spalte formatieren von Text in Standard mit VBA in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Hallo, ich möchte eine Spalte in Standart Formatierung bringen, diese Spalte wurde aber vorher in Text Formatiert: Workbooks.OpenText... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Marius82, 16. Januar 2012.

  1. Marius82 Erfahrener User

    spalte formatieren von Text in Standard mit VBA


    Hallo,

    ich möchte eine Spalte in Standart Formatierung bringen, diese Spalte wurde aber vorher in Text Formatiert:

    Code:
    Workbooks.OpenText Filename:=strDatei, Origin:= _
            xlWindows, StartRow:=1, DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, _
            1), Array(7, 1), Array(13, 2), Array(26, 1), Array(36, 2))
    Es geht um array (36,2) da wird die Spalte als Text formatiert. Um weitere Berechnungen durchzuführen muss ich die Spalte aber später wieder in das Sandartformat formatieren um in der Spalte Formeln verarbeiten zu können.

    Code:
    Cells(6, 6).Select
    Selection.NumberFormat = "General"
    ActiveCell.FormulaR1C1 = _
            "=IF(ISERROR(VLOOKUP(RC[-4],C[4]:C[5],2,0)/60),"""",VLOOKUP(RC[-4],C[4]:C[5],2,0)/60)"
    
    Leider übernimmt er mir das NumberFormat nicht, sondern schreibt die Formel als Text in die Zeile.

    Hat jemand eine Idee?

    Ich benutzte Excel 2000

    Danke
     
    Marius82, 16. Januar 2012
    #1
  2. cpt. Nemo Erfahrener User
    Hallo Marius82

    dieser Code funktioniert bei mir:
    Code:
    With ActiveSheet.Cells(6, 6)
       .NumberFormat = "General"
       .FormulaR1C1 = "=IF(ISERROR(VLOOKUP(RC[-4],C[4]:C[5],2,0)/60),"""",VLOOKUP(RC[-4],C[4]:C[5],2,0)/60)"
    End With
    ... ist zwar eine höhere Excel-Version, aber sollte auch unter xls2000 laufen. Falls nicht, bitte beide (anonymisierte) Datei einstellen.
     
    cpt. Nemo, 16. Januar 2012
    #2
  3. Beverly
    Beverly Erfahrener User
    Hi Marius,

    eine als Text formatierte Zelle lässt sich nur auf folgendem Weg wieder ins Standardformat zurücksetzen: schreibe dazu eine 1 in eine unformatierte Zelle, kopiere diese Zelle, markiere den zu formatierenden Zellbereich und gehe auf Bearbeiten -> Inhalte Einfügen und aktiviere bei "Vorgang" Multiplizieren. Das kannst du mit dem Makrorekorder aufzeichnen.

    Bis später,
    Karin
     
    Beverly, 16. Januar 2012
    #3
  4. Thomas Ramel MVP für Microsoft Excel

    spalte formatieren von Text in Standard mit VBA

    Grüezi Marius

    Eine weitere zuverlässige Variante ist 'Text in Spalten' nach dem folgenden Schema:

    • Spalte markieren
    • Format: 'Standard' oder 'Zahl' vergeben (auch wenn dies schon der Fall sein sollte)
    • Spalte markiert lassen
    • Menü: 'Daten'
    • Text in Spalten
    • [Fertig stellen]
     
    Thomas Ramel, 17. Januar 2012
    #4
  5. miriki Erfahrener User
    Ähm... Das ist die "einzige" Methode?

    Wenn ich schon eine leere, unformatierte Zelle gefunden habe... Wieso sollte ich diese dann nicht einfach kopieren (Strg-C) und auf die als "Text" formatierte Zelle mit Strg-V einkopieren? Ggf. läßt sich sogar mit "Inhalte einfügen - nur Formate" (.pastespecial) arbeiten.

    Das läßt sich auch per Makro-Rekorder aufzeichnen... ;-)

    Gruß, Michael
     
  6. cpt. Nemo Erfahrener User
    @ Michael:

    Prinzipiell ein gutes Argument. Aber bei der von Karin vorgeschlagenen Methode wird aus einem Text durch die Multiplikation eine wirkliche Zahl gemacht. Diese Zahl kannst du dann natürlich nach Belieben mit einem Zahlenformat versehen.

    Probiere es mal selbst:
    A1 -> '123456 (mit dem Auslassungszeichen als Text definiert)
    B1 -> =A1*2
    Das klappt hervorragend! Wenn du jetzt aber B1 mit 100er-Punkten formatierst und das Format überträgst, zeigt Excel dir die lange Nase ...

    Na ja, da gibt es ja noch mehr Beiträge mit anderen Lösungen, einschließlich VBA.
     
    cpt. Nemo, 18. Januar 2012
    #6
  7. miriki Erfahrener User
    Das ist völlig klar und verständlich, denn durch das ' wird jede Zahl absolut, total und explizit zu einem Text, egal welches Format die Zelle hat. Hier war ja aber ein anderes Problem:

    Nach dem Textfile-Import mit Spaltenformat-Definition "Text" hat die Zelle (gesamte Spalte) eben das Format, aus dem man auch durch eine Formel, die mit "=" anfängt, nicht wieder rauskommt. (Die Werte in den Zellen selbst fangen aber nicht mit ' an.)

    Wenn man dort aber eine Formel eintippen will, bedeutet das im Umkehrschluß: Egal, was vorher in der Zelle stand, es interessiert mich nicht, kann gelöscht werden, weil ich es eh durch eine Formel ersetzen werde. Deswegen ist das Einkopieren einer auf "Standard" formatierten Zelle eben die einfachste Art, das Ding wieder zu resetten.

    Anders würde es nur aussehen, wenn der Inhalt bestehen bleiben soll. Dann ist eine den Wert nicht verändernde, mathematische Operation eine der Möglichkeiten.

    Gruß, Michael
     
  8. cpt. Nemo Erfahrener User

    spalte formatieren von Text in Standard mit VBA

    OK Michael,

    ich habe das Ganze vielleicht etwas simplifiziert dargestellt. Zu "grobmaschig", vielleicht.
    In erster Linie ging es mir um deine Frage, ob es denn der einzige Weg sei, zum Ziel zu gelangen. Und da behaupte ich, dass die VBA-Routine, die ich in Beitrag #2 vorgestellt habe, durchaus funktioniert, Auch wenn die Zelle -wodurch auch immer- als Text "vor"formatiert ist.
     
    cpt. Nemo, 19. Januar 2012
    #8
  9. range.Formula=range.Value

    beste Grüße, Michael!
     
    buderstroisznigg, 15. Dezember 2016
    #9
Thema:

spalte formatieren von Text in Standard mit VBA

Die Seite wird geladen...
  1. spalte formatieren von Text in Standard mit VBA - Similar Threads - spalte formatieren Text

  2. Wie kann ich die x häufigsten Ausdrücke aus einer Spalte ermitteln?

    in Microsoft Excel Hilfe
    Wie kann ich die x häufigsten Ausdrücke aus einer Spalte ermitteln?: Nach umfangreicher Recherche und einigem Probieren konnte ich meine Anforderung noch nicht erfüllen. Nun hoffe ich auf Eure Unterstützung. Für ein Tippspiel importieren wir regelmäßig aus einer...
  3. Wenn ein Wert ein einer Spalte, dann komplette Zeile im anderen Blatt untereinander einfügen.

    in Microsoft Excel Hilfe
    Wenn ein Wert ein einer Spalte, dann komplette Zeile im anderen Blatt untereinander einfügen.: Hallo, kann mir jemand bitte bei folgenderm Helfen. Habe etwas ähnliches gefunden was ich brauche, nur noch eine kleine Änderung ist notwendig. Aufgabe: Es wird geprüft, ob in Spalte Q ein Wert...
  4. 2 Spalten miteinander vergleichen und bedingt formatieren

    in Microsoft Excel Hilfe
    2 Spalten miteinander vergleichen und bedingt formatieren: (Excel 2007) Hallo, ich habe eine Tabelle wo ich: 1. Spalte C mit Spalte F vergleichen will, wenn der Wert aus F größer ist als der aus C, dann soll der Hintergrund in F sich grün einfärben, wenn...
  5. Spalte in Listenfeld formatieren

    in Microsoft Access Hilfe
    Spalte in Listenfeld formatieren: Ich habe folgendes Prob: In einem Listenfeld zeige ich Preise an. Die Preise haben in diesem Fall 3 Nachkommastellen (z.B. 0,513 für 51,3 Cent). Nun werden im Listenfeld nur 2 Nachkommastellen...
  6. Word2013: Spaltenfunktion zur Gegenüberstellung von deutschem und englischem Text

    in Microsoft Word Hilfe
    Word2013: Spaltenfunktion zur Gegenüberstellung von deutschem und englischem Text: Hallo zusammen, ich möchte in einem Word-Dokument einen 28seitigen Text (inklusive Aufzählungsbenummerung und Inhaltsverzeichnis) so in Spalten formatieren, dass links der deutsche und rechts...
  7. einzelne Spalten oder Zeilen in einer Access DB formatieren

    in Microsoft Access Hilfe
    einzelne Spalten oder Zeilen in einer Access DB formatieren: Wie kann ich in der Datenblatt Ansicht in einer Access DB einzelne Spalten/Zeilen umformatieren.. Wenn ich das Ganze via "Format --> Zeichen" probiere, dann werden immer der gesamte Inhalt des...
  8. Spalten Formatieren

    in Microsoft Excel Hilfe
    Spalten Formatieren: Hallo! Habe mir mit Hilfe von Excel eine Liste zur Arbeitsstundenaufzeichnung erstellt. Ist es möglich die Größe einer Spalte in nur einer bzw. in ausgewählten Zeilen zu verändern, so dass die...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden