Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
568to572
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
568to572
568to572
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Meldung bei identischen Einträgen in 2 Spalten

Meldung bei identischen Einträgen in 2 Spalten
14.02.2005 17:25:13
Werner
Hallo Forum,
ich habe für eine untere Fussball-Spielklasse eine Tabelle erstellt,in der ich u.a. auch die Begegnungen von Hand eingeben muss.Um Fehler (speziell Doppeleingaben) zu vermeiden,suche ich die Möglichkeit eine entsprechende Meldung einzubauen.
Zur Verdeutlichung:
https://www.herber.de/bbs/user/18065.xls
Wie kann man das gestalten?
Gruß Werner

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

Betreff
Datum
Anwender
Anzeige
AW: Meldung bei identischen Einträgen in 2 Spalten
ChrisL
Hi Werner
Alt + F11, Doppelklick auf Tabelle, Code einfügen.
Tabellenaufbau und Spalten müssen identisch mit Beispiel sein.
Gruss
Chris

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 Or Target.Column = 7 Then
Dim iZeile As Long
Dim ManschaftA As String, ManschaftB As String
Dim Spieltag As String
ManschaftA = Cells(Target.Row, 4)
ManschaftB = Cells(Target.Row, 7)
For iZeile = 1 To Cells(65536, Target.Column).End(xlUp).Row
If iZeile <> Target.Row Then
If Cells(iZeile, 4) = ManschaftA And Cells(iZeile, 7) = ManschaftB Then
Spieltag = Cells(iZeile, 4).End(xlUp)
MsgBox "Die " & Vor_oder_Rück(Spieltag) & "rundenbegegnung " & ManschaftA & " / " & ManschaftB & " fand bereits am " & Spieltag & " statt!", _
vbExclamation, "Warnung"
Target = ""
Exit Sub
End If
End If
Next iZeile
End If
End Sub

Function Vor_oder_Rück(Spieltag As String) As String
Dim Tag As Byte
Tag = Left(Spieltag, InStr(Spieltag, ".") - 1)
If Tag Vor_oder_Rück = "Vor"
Else
Vor_oder_Rück = "Rück"
End If
End Function
Anzeige
AW: Meldung bei identischen Einträgen in 2 Spalten
14.02.2005 22:12:09
Cardexperte
Hello Werner,
also mit der Funktion zählenwenn kannst du z.B. in der Nebenzelle die Ausgabe wie du sie willst ganz ohne VBA lösen, anbei dein Beispiel zurück, muss noch weiter ausgebaut werden, sollte aber ohne Probleme gehen, sieh es dir an, auch das Problem mit dden unterschiedlichen Texten wird so gelöst und es bleibt flexibel für alle Zeilen, bei der VBA-Lösung wirst du immer Probleme haben, jedenfalls mit der Zuordnung, geht aber auch wird jedoch ziemlich umfangreich, hier deine Datei https://www.herber.de/bbs/user/18083.xls
Gruss WS
Anzeige
AW: Meldung bei identischen Einträgen in 2 Spalten
15.02.2005 16:09:27
Werner
Hallo,
möchte euch beiden danken,finde beide Lösungen haben was...
werde mal beides probieren,schon aus Neugierde.
Danke nochmal dass ihr euch so selbstlos solcher Arbeiten annehmt.
Viele Grüße Werner

300 Forumthreads zu ähnlichen Themen

Summe mit 2 Bedingungen
TobiasM

Hallo Excel-Experten,
ich würde gerne eine Summe mit zwei Bedingungen berechnen:
Wenn Wert in Spalte H gleich "EUR" und Wert in Spalte I gleich ""2005", dann Summe der entsprechenden Werte in Spalte J.
Könnte mir jmd. bitte einen Hinweis zur Formel geben?
Vielen Dank!!!
Tobi...
28.08.2008 10:11:30
Thread-ID: 1005310
3 Beiträge
Anzeige
Application.Quit oder WB.close ???
Dirk

allo miteinander,
brauche bitte von Euch mal einen Rat, -Tip, oder einfach nur Hilfe.
Habe bei einer meiner Dateien ein Application.quit eingebaut, weil wenn Bedingung nicht erfüllt ist soll sich die komplette Mappe und die Tabellen die mit dieser zusammen arbeiten automatisch schließen...
01.09.2008 13:04:50
Thread-ID: 1006409
6 Beiträge
Zugriff auf Access-DB über DAO oder ADO
Armin

Hallo,
ich hätte eine allgemeine Frage zum Zugriff auf Access-Datenbanken.
Welche Zugriffsmethode auf eine Access-DB würdet Ihr generell empfehlen: ADO oder DAO?
Gibt es in der Praxis Vor- oder Nachteile für die eine oder andere Zugriffsweise?
Vielen Dank für Euere Meinungen und...
03.09.2008 14:28:55
Thread-ID: 1007110
2 Beiträge
Anzeige
offset? mit Combo oder Listbox aber wie?
Thomas

Hallo und einen schönen guten Tag
Bitte um Hilfe.
Offset aber wie?
Ich möchte 2 List- oder Combofelder aus einer UserForm mit Werten der aktiven Zeile füllen, die ich dann mit Hilfe der List oder Combobox ändere.
z.B.
A5 oder A6 oder A150 u.s.w.
B5 oder B6 oder B150 u....
16.09.2008 11:37:00
Thread-ID: 1010027
6 Beiträge
Kontextmenü mit Zahlen auswählen ?
Margarete

Hallo zusammen,
ich habe mal wieder eine Frage: kann ich im Kontextmenü der Maus Menüs über Zahlen auswählen?
Beispiel:
Für Auswahl GR Aktual 2008 die 1
für Auswahl GR Tool 2008 die 2
CommandBars("Cell").Reset
Set objNeuerEintrag = CommandBars("Cell").Controls.Add
W...
26.09.2008 11:39:18
Thread-ID: 1012559
3 Beiträge
Zeilen löschen in Abhängigkeit von 2 Spalten
2

Hallo zusammen,
ich habe ein Makro über den Rekorder aufgezeichnet und versuche es anzupassen. Leider kenn ich mich in der Syntax nicht aus.
Ziel:
In einem markierten Bereich die Zeilen löschen, die in Abhängigkeit von zwei Spalten eine 0 enthalten.
D.h. Spalten X und Y enthalte...
06.10.2008 14:00:00
Thread-ID: 1014434
3 Beiträge
Zählen mit zwei Bedingungen & Datum
Karen

Hallo Forum,
ich möchte gerne folgenden Sachverhalt durch eine Formel darstellen:
Ergebnis:
Ich habe eine Spalte mit einer Datumsabfolge und eine Spalte, in der die Summe des auftauchenden Datum eingetragen werden soll.
Datenquelle:
Hierzu muß ich nach dem Datum x und nac...
09.10.2008 15:49:00
Thread-ID: 1015377
3 Beiträge
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
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
6
5
1
2
5
2
2
2
6
3
6
5
11
2
5
6
4
8
2
2
6
11
3
2