Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
840to844
840to844
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wahr/Falsch auf True/False ändern

Forumthread: Wahr/Falsch auf True/False ändern

Wahr/Falsch auf True/False ändern
30.01.2007 21:06:14
Jörg
Hallo zusammen,
mein Excel setzt meine Daten auf Deutsch statt auf Englisch ein, schreibt also Wahr und Falsch statt True und False. Ich habe mit dem Makrorecorder versucht, die Umänderung automatisch laufen zu lassen. Von Hand funktioniert das auch, als laufende Funktion leider nicht.
Leider weiss ich nicht, woran das liegt. Kann mir jemand dabei helfen? Bitte.
Vielen Dank und einen schönen Feierabend.
Grüße an alle Jörg

Sub WAHRFALSCH_auf_TrueFalse_umändern()
Application.ScreenUpdating = False
Worksheets("Daten").Visible = True
Worksheets("Daten").Select
Range("I3:BE10000").Select
ActiveWindow.ScrollColumn = 1
ActiveWindow.SmallScroll ToRight:=3
ActiveWindow.ScrollColumn = 51
ActiveWindow.ScrollRow = 3
Range("I3:BE10000,BG3:BH10000").Select
Range("BG3").Activate
Selection.Replace What:="WAHR", Replacement:="True", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Selection.Replace What:="FALSCH", Replacement:="False", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False
Range("A3").Select
Worksheets("Start").Visible = True
Worksheets("Daten").Visible = False
Application.ScreenUpdating = True
End Sub

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wahr/Falsch auf True/False ändern
30.01.2007 21:57:30
Peter
Hallo Jörg,
wenn es dir genügt, die Werte True/False als Text zu haben, d. h. mit vorangestelltem Apostroph, dann so:
Public 

Sub Aendern()
Dim Zelle As Range
For Each Zelle In Range("I3:BE10000")
If UCase(Zelle.Value) = "WAHR" Then Zelle.Value = "'True"
If UCase(Zelle.Value) = "FALSCH" Then Zelle.Value = "'False"
Next Zelle
End Sub

Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige
AW: Wahr/Falsch auf True/False ändern
30.01.2007 22:37:23
Jörg
Hallo Peter,
vielen Dank, hat super geklappt.
Schönen Feierabend wünsche ich dir.
Grüße Jörg
;

Forumthreads zu verwandten Themen

ListBox False oder True
A.Franz

Hallo..,
warscheinlich mache ich nur wieder einen Denkfehler, aber nachdem ich 100mal was probiert habe das nicht funktioniert frage ich lieber.
Ich habe eine ListBox in der sich ja bekanntlich Einträge (wenn welche vorhanden sind) markieren lassen (blau).Nun möchte ich erreichen, das w...
29.01.2009 19:51:00
Thread-ID: 1045160
7 Beiträge
OptionButton - False oder True
Wolfgang

Hallo,
wenn ein bestimmter Text in der Textbox 8 enthalten ist, soll OptionButton7 aktiviert werden. Wenn ein anderer Text enthalten ist, soll OptionButton7 deaktiviert bleiben oder ggfs. wieder werden. Wie kann ich den nachstehenden Code entsprechend umstellen? Irgendwie funktioniert das b...
15.10.2009 11:17:55
Thread-ID: 1109790
3 Beiträge
Label.Visible=True oder False geht, geht nicht
ing.grohn

Hallo Forum,
aus einer Userform rufe ich eine Sub DruckBeratungshilfe1 auf.orm
in der Userform ist das Label25 auf visible=false gesetzt.
Die Sub wird wie folgt aufgerufen: Private Sub CommandButton1_Click() Beratungshilfeantrag2.Label25.Visible = True 'diese Zeile klappt nicht Dr...
16.02.2010 19:29:21
Thread-ID: 1139030
4 Beiträge
Anzeige
application.visible = false oder = true
Dieter(Drummer)

Guten Tag VBAler/innen,
warum kann ich mit z.B. Shortkey Strg+e (könnte natürlich auch ein anderer Shortkey festgelegt werden), ausgeblendetes Excel nicht wieder einblenden/aktivieren?
Jetziger Code im Modul:
... application.visible = false 'Excel ausblenden, Strg+x - Funktioniert.<...
24.04.2017 17:51:14
Thread-ID: 1554451
3 Beiträge
Zellen auslesen Wahr oder falsch
Sven

Hi an @lle,
ich habe ne tabelle wo ich spielergebnisse eingebe, nun möchte ich das die spalten mit dem Torverhältnis ausgelesen wird, und die Mannschaft mit den mehr geschoßenen Toren in einer andere Zelle kopiert wird, und wiederum mit den weniger geschoßenen Toren in einer anderen Zelle.<...
11.12.2004 17:37:03
Thread-ID: 531569
2 Beiträge
Anzeige

Infobox / Tutorial

Wahr/Falsch auf True/False ändern in Excel

Schritt-für-Schritt-Anleitung

Um die Werte "Wahr" und "Falsch" in Excel automatisch in "True" und "False" zu ändern, kannst du folgendes VBA-Makro verwenden. Dieses Makro durchläuft einen bestimmten Zellbereich und ersetzt die deutschen Begriffe durch die englischen:

Sub WAHRFALSCH_auf_TrueFalse_umändern()
    Application.ScreenUpdating = False
    Worksheets("Daten").Visible = True
    Worksheets("Daten").Select
    Range("I3:BE10000").Select
    ActiveWindow.ScrollColumn = 1
    ActiveWindow.SmallScroll ToRight:=3
    ActiveWindow.ScrollColumn = 51
    ActiveWindow.ScrollRow = 3
    Range("I3:BE10000,BG3:BH10000").Select
    Range("BG3").Activate
    Selection.Replace What:="WAHR", Replacement:="True", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False
    Selection.Replace What:="FALSCH", Replacement:="False", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False
    Range("A3").Select
    Worksheets("Start").Visible = True
    Worksheets("Daten").Visible = False
    Application.ScreenUpdating = True
End Sub

Häufige Fehler und Lösungen

  • Fehler: Das Makro wird nicht ausgeführt.

    • Lösung: Stelle sicher, dass du die Makros in Excel aktiviert hast. Gehe zu "Datei" > "Optionen" > "Sicherheitscenter" > "Einstellungen für das Sicherheitscenter" und aktiviere die Makros.

  • Fehler: Werte werden nicht ersetzt.

    • Lösung: Überprüfe, ob die Zellen im Bereich "I3:BE10000" tatsächlich die Werte "WAHR" oder "FALSCH" enthalten.

Alternative Methoden

  1. Manuelle Methode: Du kannst die Werte auch manuell ersetzen, indem du den Zellbereich auswählst und mit der Tastenkombination Strg + H das Ersetzen-Fenster öffnest. Gib "WAHR" in das Feld "Suchen nach" und "True" in das Feld "Ersetzen durch" ein. Wiederhole dies für "FALSCH" und "False".

  2. Formel-Methode: Wenn du die Werte nicht direkt ändern möchtest, kannst du eine Formel verwenden:

    =WENN(A1="WAHR", TRUE, FALSE)

    Dies gibt TRUE oder FALSE zurück, je nachdem, ob die Zelle A1 "WAHR" oder "FALSCH" enthält.

Praktische Beispiele

  • Angenommen, du hast in deinem Excel-Dokument eine Liste von Werten in der Spalte A, die "WAHR" und "FALSCH" enthalten. Du kannst das oben genannte VBA-Makro verwenden, um alle Vorkommen in einem großen Bereich zu ersetzen.

  • Wenn du nur einige Zellen hast, kannst du die manuelle Methode verwenden. Zum Beispiel, in der Zelle B1 könntest du die Formel verwenden, um das Ergebnis in der Form von TRUE oder FALSE zu erhalten.

Tipps für Profis

  • VBA-Optimierung: Wenn du oft mit großen Datenmengen arbeitest, könnte es sinnvoll sein, das Makro zu optimieren, indem du nur die tatsächlich genutzten Zellen durchsuchst.

  • Verwendung von Named Ranges: Definiere benannte Bereiche für deine Daten, um die Lesbarkeit und Wartbarkeit deines Codes zu verbessern.

  • Debugging: Nutze die Debugging-Tools in VBA, um Probleme im Code zu identifizieren. Setze Haltepunkte und überprüfe die Werte während der Ausführung.

FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass mein VBA-Makro korrekt funktioniert? Überprüfe den Code auf Syntaxfehler und teste ihn mit einem kleinen Datensatz, bevor du ihn auf große Datenmengen anwendest.

2. Was tun, wenn ich "WAHR" und "FALSCH" in anderen Sprachen ersetzen möchte? Du kannst die Werte im VBA-Makro entsprechend anpassen, indem du die jeweiligen Übersetzungen für "True" und "False" einfügst.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige