Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
920to924
920to924
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeile-/len löschen bei Doppelklick

Forumthread: Zeile-/len löschen bei Doppelklick

Zeile-/len löschen bei Doppelklick
30.10.2007 08:24:36
Andre´
Hallo alle zusammen,
Ich habe Daten in den Spalten A bis D stehen. Nun möchte ich erreichen, dass wenn bei Doppelklick nur in der Spalte D in einer Zelle die Zeilen gelöscht werden die den gleichen Zellinhalt haben wie die Zelle in der der Doppelklick getätigt wurde. In dem angehängten Beispiel müsste bei Doppelklick in die Zelle D10 oder D11 oder D12 die Zeilen 10 bis 12 entfernt werden. Bei Doppelklick in die Zelle D19 oder D20 wären es die Zeilen 19 und 20. Es kann aber auch vorkommen, dass der Inhalt nur einmal vorhanden ist, dann muss nur diese eine Zeile gelöscht werden.
https://www.herber.de/bbs/user/47242.xls
Ich hoffe mir kann jemand helfen.
Danke im Voraus!
MFG Andre

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zeile-/len löschen bei Doppelklick
30.10.2007 08:33:19
Worti
Hallo Andre,
zB. so:


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
     Dim rngC As Range
     Set rngC = Range("D:D").Find(Target)
     Do
       rngC.EntireRow.Delete
       Set rngC = Range("D:D").FindNext
     Loop Until rngC Is Nothing
End Sub


Gruß Worti
Anzeige
AW: Zeile-/len löschen bei Doppelklick
30.10.2007 09:05:00
Andre´
Hallo Worti,
funktioniert soweit ganz gut, nur wenn Doppelklick in einer anderen Spalte gemacht wird kommt.
Userbild
Es sollte vielleicht noch geprüft werden ob in der Zelle der Spalte D etwas enthalten ist weil bei Doppelklick in eine leere Zelle es ziemlich lange dauern kann.
Ich hoffe Du kannst mir auch hierbei behilflich sein.
MFG Andre

Anzeige
AW: Zeile-/len löschen bei Doppelklick
30.10.2007 09:15:11
Worti
Hallo,
den einen Fehler hatte ich ja schon bemerkt, hier jetzt noch die Abfrage auf leer mit eingebaut.


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
     Dim rngC As Range
     If Target.Column = 4 And Target <> "" Then
        Set rngC = Range("D:D").Find(Target)
        Do
          rngC.EntireRow.Delete
          Set rngC = Range("D:D").FindNext
        Loop Until rngC Is Nothing
     End If
End Sub


Gruß Worti
Anzeige
doch noch nicht gelöst :-(
30.10.2007 09:36:00
Andre´
Hallo Worti,
mir ist aufgefallen, wenn z.B in der Zelle D2 ein K steht und in D3=K1, D4 = K2, D5=K3 ...
https://www.herber.de/bbs/user/47248.xls
dass dann bei Doppelklick in die Zelle D2 alle Zellen gelöscht werden die mit K beginnen. Es sollte schon genau der selbe Inhalt gesucht und gelöscht werden.
Ich hoffe dass es auch dafür eine Lösung gibt.
MFG Andre

Anzeige
AW: doch noch nicht gelöst :-(
30.10.2007 09:55:36
Hajo_Zi
Hallo André,
ich habe es jetzt nicht getestet, aber ergänze beim ersten Find ,LookAt:=xlWhole

ja das ist es DANKE Hajo :-)))
30.10.2007 10:17:14
Andre´

Berichtigung
30.10.2007 09:03:05
Worti
Hallo nochmal,
hier eine kleine Korrektur:


Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
     Dim rngC As Range
     If Taregt.Column = 4 Then
        Set rngC = Range("D:D").Find(Target)
        Do
          rngC.EntireRow.Delete
          Set rngC = Range("D:D").FindNext
        Loop Until rngC Is Nothing
     End If
End Sub


Gruß Worti
Anzeige
gelöst :-) Danke an Worti
30.10.2007 09:17:00
Andre´
Hi,
habe es wie folgt gelöst.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Excel.Range, Cancel As Boolean)
Dim rngC As Range
If Target.Column = 4 And ActiveCell > "" Then
Set rngC = Range("D:D").Find(Target)
Do
rngC.EntireRow.Delete
Set rngC = Range("D:D").FindNext
Loop Until rngC Is Nothing
End If
End Sub


MFG Andre

Anzeige
;

Forumthreads zu verwandten Themen

Doppelklick auf Excel-Datei funktioniert nicht
Markus

Hallo,
mein Excel spinnt ein wenig.
Klicke ich im Datei-Explorer auf eine Excel-Datei wird zwar Excel geöffnet, aber Excel reklamiert dann sogleich, dass die Datei nicht geöffnet werden kann.
Der gesamte DateiPfad der Excel-Datei inkl. des Dateinamenes wird in angezeigt (z.B. d:\da...
02.09.2008 19:37:00
Thread-ID: 1006922
4 Beiträge
Zwei Bereiche Zwei UF mit Doppelklick
Frank

Hallo zusammen, schlage mir mal wieder die nacht um die Ohren.
Vielleicht kann man mir ja irgendwie helfen.
Ich habe ein Tabellenblatt in dem es Zwei Bereiche gibt. Ich möchte nun jeweils die Bereiche mit einer UF per doppelklick ansprechen. Wie schaffe ich es,dass ich den zweiten Berei...
17.09.2008 23:47:00
Thread-ID: 1010567
2 Beiträge
Doppelklick Zelle daten aus anderes Tabelle Vlooku
Karel

Hallo Liebe Leute,
Durch doppelklick auf zelle Wechselkurs Spalte I (Tabelle Invoice) aus ander Tabelle (Kurse) Wechselwährung in Zelle eintragen.
Habe datei als beispiel mit eingefügt
https://www.herber.de/bbs/user/55871.xls
1) Bei Kürzel EURO nur 1 eintragen
2) Datum Währ...
07.10.2008 19:39:32
Thread-ID: 1014802
2 Beiträge
Beim Doppelklick das UserForm starten ?
Selma

Hallo Leute,
wie kann ich beim Doppelklick im Zellenbereich K12:K (ActiveSheet.UsedRange) das UserForm7 starten
und beim Doppelklick im Zellenbereich Q12:Q (ActiveSheet.UsedRange) das UserForm2 starten?
Vielen Dank im Voraus !
Liebe Grüße,
Selma
13.10.2008 17:17:00
Thread-ID: 1016126
4 Beiträge
Vom Doppelklick zum Einmalklick: UF und LB
Lenhard

Moin Excellianer!!
Durch folgenden Code und einem Doppelklick auf ein gesperrtes Tabellenblatt starte ich ein das UserForm0...
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) UserForm0.Show Cancel = True End Sub
Meine Frage hier: Kann man das Use...
17.12.2008 23:27:50
Thread-ID: 1033722
5 Beiträge
Doppelklick
Dieter.G

Hallo zusammen,
wie kann ich per "Doppelklick" die beiden Werte aus einer beliebigen Zeile in Spalte I und den benachbarten Wert aus der übernächsten Spalte K Tablelle1, in die erste frei Zelle von unten in Spalte B und C in Tabelle2 kopieren?
Danke schon mal
Gruß Dieter
24.01.2009 13:20:00
Thread-ID: 1043341
4 Beiträge
Bei Doppelklick Zellinhalt übernehmen
Thomas

Hallo an alle und einen schönen guten Abend,
ich habe vor längerer Zeit hier im Forum mal einen Kalender gefunden den ich jetzt sehr gut einsetzen könnte.
Ist es möglich, und wenn ja wie, dass wenn man auf ein Datum im Kalender klickt, dieses Datum in einer anderen Zelle automatisch übe...
08.02.2009 17:58:59
Thread-ID: 1048392
3 Beiträge
Automatischer Eintrag durch Doppelklick auf Zelle
Micha

Hallo liebe Spezialisten,
nachdem mir vorhin so Super in diesem Forum geholfen wurde, hier gleich die nächste Frage:
Ist es möglich, das in einem bestimmten Tabellenbereich mir durch einen Doppelklick auf eine Zelle automatisch ein "x" in diese Zelle eingegeben wird?
Würde mich über...
12.02.2009 14:30:00
Thread-ID: 1050071
6 Beiträge
Zeilen per Doppelklick kopieren von Sheet zu Sheet
Sheet

Hallo Excelfreunde,
ich habe ein Problem bei der Anpassung von einigen VBACodes, die ich mir mit eurer Hilfe
in mühevoller Arbeit zusammengestellt habe. Danke noch mal dafür!
Ich habe eine Beispieldatei meiner Arbeitsmappe beigefügt, in der ich euch die bisherige Funktionsweise erlä...
06.03.2009 16:39:05
Thread-ID: 1057378
3 Beiträge
VBA Progr. Schleife- Doppelklick in Zelle
Jeebee

Guten Morgen,
Habe in Excel folgendes Problem: Ich übernehme eine Tabelle aus SAP. Leider Sind die Zahlen dort nicht als Zahl definiert sondern als Text. Jede Zahl zB. 33,01- hat einen Bindestrich hinten dran. Dass ich den wegkriege konnte ich bereits mit "Makro aufzeichnen" lösen.
Dies...
07.03.2009 09:56:05
Thread-ID: 1057531
3 Beiträge
Doppelklick für alle Mappen
Herbert

Hallo liebe Helfer
Ich möchte ein Doppelklick-Ereignis für alle Mappen haben, also den Code in die Personl.xls setzen um das u.a. Makro in anderen Tabelllen auch ausführen zu können. Ich weis aber nicht wie ;-(
So habe ich zur Zeit es für das aktuelle Sheet:
Private Sub Workbook_...
17.03.2009 10:52:49
Thread-ID: 1061025
7 Beiträge
Zeilen unterhalb eines Doppelklick ausblenden/einb
19david65

Hallo,
habe ein Excel-Problem, woran ich seit einigen Tagen knabbere und im Forum bisher auch keine Lösung gefunden habe.
In einer Excel-Tabelle habe ich Hauptzellen/-felder deren Inhalt stets mit "**" (zwei Sternen) anfangen (Beispiel: "** Energie" oder "** Haushalt"). Die Hauptzellen...
26.03.2009 08:33:45
Thread-ID: 1064096
9 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige