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

Überschreibe Zelle A1, wenn in B1 "NEIN" steht

Forumthread: Überschreibe Zelle A1, wenn in B1 "NEIN" steht

Überschreibe Zelle A1, wenn in B1 "NEIN" steht
15.05.2007 13:30:41
MrJola
Hallo zusammen,
in einer Tabelle wird z.B. in Spalte B über eine Auswahlliste "NEIN" eingetragen.
Dann soll in der selben Zeile in Spalte A der eingetragene Zahlenwert mit 0 überschrieben werden.
Dies hier funktioniert leider nicht, Ursprung war ein ähnliches Problem aber mit Datumeingabe.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("B6:B13")) Is Nothing Or Not IsDate(Target) Then Exit Sub
Cells(Target.Row, 1) = 0
End Sub


Anstatt dem IsDate(Target) müsste sowas stehen wie IsText(NEIN), aber da kenn ich mich eben nicht mit aus.
Vielen Dank für Eure Hilfe.
Jörg

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
...Or Target <> "NEIN" - Gruß owT
15.05.2007 13:46:00
Luc:-?
:-?

AW: Überschreibe Zelle A1, wenn in B1 "NEIN" steht
15.05.2007 13:52:00
Mag
Hi,

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 Then
If Not Intersect(Target, Range("B:B")) Is Nothing Then
If Target.Value = "NEIN" Then
Target.Offset(0, -1).Value = 0
End If
End If
End If
End Sub


Gruss

Anzeige
AW: DANKE
15.05.2007 14:23:00
MrJola
Danke Ihr Zwei!
Erste Lösung funktioniert nachdem ich Gr0ß-/Kleinschreibweise beachtet habe - umph.
Zweite läuft noch nicht, wenn ich Zeit habe versuche ich die nochmal.
Also - Danke für die schnelle Hilfe.
Jörg

AW: weitere Bereiche?
15.05.2007 14:45:57
MrJola
Problem war für die einfache Anwendung gelöst mit:

Private Sub Worksheet_Change(ByVal Target As Range)
'schreibt in "hours per MSN"=0, wenn embodied auf "yes" gestellt wird.(JL 15.5.2007)
If Intersect(Target, Range("AA6:AA500")) Is Nothing Or Target  "yes" Then Exit Sub
Target.Offset(0, -2).Value = 0
End Sub


Nun sollen aber weitere Bereiche (Spalten S; AI; AQ; ...) hinzugefügt werden und auch jedesmal Target.Offset(0, -2).Value = 0 passieren?
Mit copy paste und anpassen des Bereichs hat es nicht geklappt - was nun?
HILFE
Jörg

Anzeige
AW: weitere Bereiche?
15.05.2007 14:47:19
MrJola
habe vergessen das Häkchen "Frage offen" zu setzten

Target (dt Ziel) repräsentiert die Zelle,...
15.05.2007 15:52:25
Luc:-?
...auf die geklickt wird, Jörg.
Mit der Intersect-Fkt wird abgefragt, ob dieses Ziel innerhalb eines bestimmten Bereiches (hier AA6:AA500) liegt. Wenn du auch noch andere Bereiche hier einbeziehen willst, musst du den angegebenen Bereich entsprechend erweitern. Wenn die anderen Bereiche nicht an den o.g. anschließen, musst du Union(Range(...), Range(...)) verwenden.
Gruß Luc :-?

Anzeige
AW: Target (dt Ziel) repräsentiert die Zelle,...
15.05.2007 16:18:00
MrJola
das funktioniert perfekt.
VIELEN DANK

Bitte sehr, freut mich! Gruß owT
15.05.2007 17:31:00
Luc:-?
;-?

Forumthreads zu verwandten Themen

Letzte gefüllte Zeile in einem Feld anzeigen
Hendrik

Hallo zusammen,
bei einer Exceltabelle, die aus ca. 40 freien Zeilen besteht, die sich über die Zeit füllen, soll in Zeile 41 immer die Zahl der letzten gefüllten Zeile angezeigt werden.
Ist das möglich?
Danke im voraus!
Hendrik
28.08.2008 18:36:42
Thread-ID: 1005564
4 Beiträge
Zwei Dinge in einer Zelle
Sabine

Hallo,
ich möchte ein Problem mit Excel Formeln und ohne VBA lösen.
Es gibt drei Spalten: Datum1, Zweck, Datum 2
Wenn in Zweck in einer Spalte das Wort "Show" eingetragen wird, soll in Datum 2 in der entsprechenden Zeile stehen "Bitte nennen Sie ein Verwendungsdatum". Das kriege ich...
29.08.2008 15:25:00
Thread-ID: 1005860
2 Beiträge
Tasten während der Eingabe in einer Zelle abfragen
Arthur

Hallo.
Wie kann man in Excel auf die Eingabe in einer Zelle schon beim Tastendruck reagieren?
Beispiel: Schon während der Eingabe von Werten soll reagiert werden. Bspw. ist eine fünfstellige Bestelnummer einzutragen. Nachdem fünf Ziffern eingetragen sind soll automatisch in die nächste...
22.10.2008 11:44:52
Thread-ID: 1018286
4 Beiträge
Zahl 1 bis 7 nur in Zelle eintragen dürfen
Korl

Hallo,
ich möchte in einem Zellbereich z.B. "B7:BI103" in den jeweiligen Zellen nur die Zahlen von "1 bis"7 eintragen dürfen und sofort den Cursor in der jeweiligen Zeile um eine Zelle nach rechts setzen lassen ohne "Enter" tippen zu müssen.
Den Bereich könnte ich mit Gültigkeitskriteri...
17.11.2008 19:55:00
Thread-ID: 1025380
8 Beiträge
mehreren Zellen in einer Zelle mit Absätzen
Christian

1. Ist es möglich, die markierten Zeilen von Screenshot 1 per Formel/Makro so zu übernehmen, das diese wie in Screenshot 2 übernommen werden? Solche Felder kommen aber öfters und auch mit einzelnen Zeilen dazwischen vor. Die Formatierung (bei Zahlen mit ,00 soll ein langer Strich stehen) sollte...
28.11.2008 15:53:49
Thread-ID: 1028725
3 Beiträge
mehrere Zellen in einer Zelle mit Absätzen II
Christian

Hi
Wir brauchen etwas ähnliches wie in diesem Script von Daniel (der uns schon sehr weitergeholfen hat!):
https://www.herber.de/bbs/user/57225.xls
Zeilen sollen zusammengefasst werden, wenn die Bezeichnung in Spalte A und B gleich sind (siehe Screenshots).
https://www.herber.de...
05.12.2008 15:47:00
Thread-ID: 1030485
7 Beiträge
hochzählen in einer Zelle
Tobias

Guten Morgen zusammen,
ich möchte in einer Zelle einen Wert "hochzählen" lassen. Also z.B. in Zelle A1 soll jeweils alles zusammen addiert werden was in Zelle B1 eingegeben wurde.
Ich hoffe das ist einigermaßen verständlich...
Vielen Dank im Voraus für Eure Tipps!
20.12.2008 10:26:00
Thread-ID: 1034350
12 Beiträge
Anzeige
zählen bestimmter Zeichen in einer Zelle
Georg

Hallo Excel Welt,
wie kann ich die Anzahl bestimmter Zeichen (z.B. Kommas) in einer Zelle zählen?
Beispiel:
A2 = 12, 34, 2, 134
B2 = 3 (es sind drei Kommas in der Zelle A2) = dafür benötige ich die Lösung
Oder kann ich die Anzahl der (durch Kommas getrennten) Zahlen direkt...
21.01.2009 16:03:36
Thread-ID: 1042267
6 Beiträge
Anzeige
mehrere Zellen in einer einfügen
Claus

Hallo,
wie kann ich per Makro die Eingaben einiger Zellen in einer andere kopieren? Beispiel
A1 = 1,
A2 = 2,
A3 = 3,
A4 = 4,
A5 = 5,
Ergebnis sollte in B1 stehen und müsste wie folgt lauten 1,2,3,4,5,
Die Anzahl der A Zeilen ist nich fix. Fängt immer bei A1...
27.01.2009 18:00:00
Thread-ID: 1044333
2 Beiträge
Wörterabstand in einer Zelle
Anja

Hallo Allerseits!
Ich möche einen Vor- und Zunamen in einer Zelle formatieren. Kann man den Abstand der untereinanderstehenden Wörter verändern?
Beispieldatei ist im Anhang.
https://www.herber.de/bbs/user/58883.xls
DANKE im Vorraus für Holfe.
Gruß ANJA
29.01.2009 09:13:00
Thread-ID: 1044800
4 Beiträge
Schleife nächste Zelle +1
Michael

Hallo!
Wie schaff ich es in die letzte zelle zu gehen und den wert + 1 in die nächste zelle zu schreiben,
Muss ich dann mit offset arbeiten?
Mein Code!
Gruß Michael
Sub zeileLetztePlusEins() Dim zeile As Integer Dim zeileMax As Integer Dim WertZeile As Long With Sheets("...
02.02.2009 09:39:26
Thread-ID: 1046079
7 Beiträge
UnterschiedlicheFormatierung innerhalb einer Zelle
Heinzelmännchen

Hallo zusammen,
ich möchte einen Wert innerhalb einer Zelle (Formel) mit einer Formatierung versehen (Fett gedruckt). Funktioniert das?
Viele Grüße
Steffi
02.02.2009 11:50:00
Thread-ID: 1046136
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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