Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
608to612
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
608to612
608to612
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

nochmal name vorhanden?

nochmal name vorhanden?
10.05.2005 10:23:40
roland_k
hi zusammen muss nochmal neu formulieren:
ich habe ne tabelle in der in der spalte C z. b. namen stehn.
nu will ich ne abfrage machen:
wenn ich in ner andern tabelle in eine bestimmte zelle nen namen eintrage und dieser ist schon vorhanden soll er nichts machen
wenn nicht trage ich den neuen namen in letzte zeile ein.
aber wie mache abfrage ob name in spalte schon vorhanden ?
danke
gruss roland_k

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

Betreff
Datum
Anwender
Anzeige
AW: nochmal name vorhanden?
10.05.2005 10:34:46
Frederik Fuhrmann
Hallo!
Vielleicht hilft dir die Formel =wenn(zählenwenn(A1:A10; "Roland")>1; "Name doppelt";"") weiter. bzw. ersetze "Roland" durch die Zelladresse in der der gesuchte Name steht!
Gruß
F.
AW: nochmal name vorhanden?
10.05.2005 10:44:08
UweD
Hallo

was hast du gegen meine Lösung in deinem ersten Beitrag??

Private Sub Worksheet_Change(ByVal Target As Range)
Dim LR%, Z%
If Not Intersect(Target, Range("B5")) Is Nothing Then 'reagiert nur, wenn Zelländerung in B5
With Sheets("gestern")
LR = .Cells(Rows.Count, 3).End(xlUp).Row 'letzte Zeile der Spalte C
Z = Application.CountIf(.Range("C32:C" & LR), Target) 'zählt das Vorkommen der Zelleingabe im Bereich C32 bis Letzte Zeile
If Z = 0 And Target <> "" Then ' Wenn Name noch nicht vorhanden..
.Cells(LR + 1, 3).Value = Target
MsgBox Target & " wurde ergänzt."
End If
End With
End If
End Sub


Dabei wird durch Z = Application.CountIf(.Range("C32:C" & LR), Target) ermittelt, ob der in B5 eingetragenen Name vorhanden ist.
usw..
Gruß UweD
Anzeige
verdelle es geht bin eben blond )) m T
10.05.2005 13:48:48
roland_k
hoi uwe
danke dass nochmal reagiert hast
hatte das beim umbauen auf meine anwendung falsch eindesetzt
frage mich nicht was falsch war ((
aber es lauft so bestens
danke
gruss roland_k

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige