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

Autokorrektur auf mehrere spalten aufrufen bzw abschalten

Forumthread: Autokorrektur auf mehrere spalten aufrufen bzw abschalten

Autokorrektur auf mehrere spalten aufrufen bzw abschalten
22.07.2024 12:35:33
Suzi
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Application.AutoCorrect.ReplaceText = Target.Column = 1

End Sub


Das ist ja nur auf eine Spalte anwendbar. Ich bräuchte es aber auf mehrere. NICHT auf alle.
Könnte mir da jemand helfen?
Danke schonmal im voraus.

Lg
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Autokorrektur auf mehrere spalten aufrufen bzw abschalten
22.07.2024 13:06:09
MCO
Hallo Suzi!

Folgender Code erfüllt deine Bedingung.
Ich hab nur alle Spalten, die es begrifft in den String, getrennt mit Punkt reingeschrieben. Dies muss so sein, da 1-9 immer wieder auch in den spalten 10-x vorkommen. 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Spalten_ohne_RSK = "1.2.3.5.6.9.10."

    Application.AutoCorrect.ReplaceText = InStr(Spalten_ohne_RSK, Target.Column & ".") > 0

End Sub


Gruß, MCO
Anzeige
AW: Autokorrektur auf mehrere spalten aufrufen bzw abschalten
22.07.2024 13:12:25
Suzi
Ich danke dir vielmals. Es hat geklappt. Ich bin überglücklich. Danke, danke, danke.
AW: Autokorrektur auf mehrere spalten aufrufen bzw abschalten
22.07.2024 14:42:53
Yal
Moin,

richtige Antwort von MCO, ich erlaube mir eine andere Version zu liefern: 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Select Case Target.Column

    Case 1, 2, 3, 4, 5

        Application.AutoCorrect.ReplaceText = True

    Case Else

        Application.AutoCorrect.ReplaceText = False

    End Select

End Sub

Ich gehe davon aus, dass der Code-Zweck hier weniger versteckt ist.

Bitte beachten, dass bei einem "SelectionChange"-Ereignis "Target" die Zelle entspricht, die gerade selektiert wird und nicht die, die gerade verlassen wurde.
Ausserdem aggiert, mMn, Application.AutoCorrect.ReplaceText auf das ganze Blatt...

VG
Yal
Anzeige

Forumthreads zu verwandten Themen

nur eine der Spalten darf gefüllt sein
Simon

Hallo,
ich habe glaube ich eine einfache Frage, komme aber nicht drauf Sie selbst zu lösen:
ich habe 4 Spalten: ja; nein; mehr Menge; weniger Menge
dahinter möchte ich eine 5te Spalte Kontrolle setzen. In dieser soll eine Fehlermeldung erscheinen falls mehr als eine Spalte ausgefüll...
01.09.2008 16:15:00
Thread-ID: 1006502
8 Beiträge
Anzeige
Info aus mehreren Spaltenüberschriften entnehmen
mopitz

Hallo,
Da mein Problem etwas komplex ist, füge ich eine Datei zur Veranschaulichung an.:
https://www.herber.de/bbs/user/56058.xls
Ich möchte in der ersten Tabelle zu den Spalte "Kunde"(kommt nur einmal vor) die Technologie reinschreiben lassen. Diese Info erhalte ich aus der "Tabell...
16.10.2008 13:34:19
Thread-ID: 1016847
7 Beiträge
Pulldown in mehreren Spalten
Wolfgang

Hallo,
der untenstehende Code bewirkt bei Anwählen eines jeweilien Tabellenblattes, dass in I2:I6000 ein Pulldown erscheint. Wäre denkbar, dass der Code ausgeweitet wird um zwei weitere Pulldown in Spalte K2:K6000 mit "Ja" "Nein" und in Spalte M2:M6000 mit "Date". Ich habe schon zig verschi...
15.11.2008 18:33:43
Thread-ID: 1024798
3 Beiträge
kopieren/filtern von x-Spalten in x-Blättern
x-Spalten

So, anderes Thema:
Ich habe eine Arbeitsmappe mit verschiedenen Arbeitsblättern, diese Arbeitsblätter sind von der struktur her alle gleich aufgebaut, nur der Inhalt unterscheidet sich voneinander.
Ich möchte jetzt eine Auflistung generieren, die mir auf dem letzten Blatt der Arbeitsmap...
22.11.2008 16:34:00
Thread-ID: 1026984
16 Beiträge
Anzeige
Filter - Kriterium in mehreren Spalten
walter

Hallo,
ich stöbere nun schon seit zwei Tagen in der Excel-Hilfe und in diesem Forum und finde keine Lösung für mein Problem:
Ich habe eine Liste, in der jeder Datensatz 5 Kategorien zugeteilt ist. Das Problem ist dabei, dass ein und dieselbe Kategorie in verschiedenen Spalten stehen kan...
15.01.2009 08:33:57
Thread-ID: 1039897
3 Beiträge
Anzeige
Mehrere Filter gleichzeitig auf "Alle"
Alex

Hallo zusammen,
ich habe in meiner Datei 10 Autofilter.
Benötige eure Hilfe; wie kann ich schreiben, dass Filter 1-7 gleichzeitig aufgehoben, d.h. deaktiviert werden?
Sub FilterAlleAnzeigenÜ() ActiveSheet.Unprotect "passw" Selection.AutoFilter Field:=1 'hier Field 1-7 ? ActiveShee...
23.01.2009 10:34:13
Thread-ID: 1042839
4 Beiträge
Filter - Text in Spalten
LD

Hallo,
habe hier eine Adressliste aus welcher ich nur die email adr. rausziehen will.
Habe schon einen Filter angewendet um alle Zeilen mit @ anzuzeigen, allerdings
steht vor den adr. "email an" und ich bekomme das nicht weg. Wenn ich Text
in Spalten mache, sind alle anderen Zei...
13.03.2009 13:50:22
Thread-ID: 1059860
6 Beiträge
Scrollarea auf mehrere Spalten definieren
Janni

Hallo zusammen,
ich habe folgendes Problem, ich will in meinem Tabellenblatt nur die Spalten A, C und E editierbar machen, d.h. man soll auf die Spalten B und D nicht klicken dürfen bzw. den Zelleninhalt nicht ändern können. Ich habe probiert es über die ScrollArea festzulegen. Ich kann in...
27.03.2009 11:07:02
Thread-ID: 1064529
6 Beiträge
Pivot, unterschiedliche Spalten mehrere Tabellen
Peer

Liebe Excelfreunde,
ich habe folgendes Problem:
Ich habe mehrerer Tabellen in verschiedenen Reitern, die sich bis auf eine Kennzahl in der Spalte unterscheiden. Nun möchte ich die Ergebnisse in einer Tabelle konsolidieren. Hinzu kommt, das der Schlüssel nicht unbedingt in allen drei Ta...
07.05.2009 14:37:36
Thread-ID: 1073626
3 Beiträge
Anzeige
Mehrere Pivottabellen auf einen Filter reagieren
vux

Hallo,
einfaches Anliegen:
Sagen wir ich habe eine Tabelle mit einer Spalte "Länder" und ein Sheet mit 20 Auswertungspivottabellen.
Kann man es einrichten, dass wenn man an einer Stelle ein Land eingibt, alle Pivottaballen nach diesem Land gefiltert werden? Sonst muss ich jedesmal 2...
16.06.2009 14:53:58
Thread-ID: 1081917
3 Beiträge
Autofilter über mehrere Tabellenblätter
Burk

Hallo,
ich habe mehre Blätter in einer Mappe mit jeweils einer großen Liste
Gibt es die Möglichkeit Datensätze mit einem bestimmten Feldeintrag über mehre Blätter hinweg gleichzeitig herauszufiltern, wie es der Autofilter mit einer Tabelle macht?
Vielleicht mit VBA?
Bin für alle...
02.07.2009 11:17:06
Thread-ID: 1085862
5 Beiträge
Autofilter für Spalten?
Timo

Hallo,
ich würde gern über ein Makro gewisse Spalten ausblenden.
In der Beispieldatei über den u.s. Link sollen alle Spalten ausgeblendet (also versteckt) werden, die eine "0" in Zeile 1 aufweisen. Überall, wo eine "1" steht, sollen die Spalten weiterhin lesbar sein.
https://www.h...
12.07.2009 18:07:56
Thread-ID: 1087997
9 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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