Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
380to384
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
380to384
380to384
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Before double click

Before double click
12.02.2004 22:18:53
Ernst Dunkel
Guten Abend Forum
Ich möchte mit einem Doppelklick aus einer Zelle (A10 bis A15), die Inhalte der aktiven Zeile löschen.
Wie müsste der untenstehende, fehlerhafte Code richtig sein?

Mit freundlichen Grüßen
Ernst Dunkel

Private Sub worksheet_beforedoubleclick(ByVal target As Excel.Range, cancel As Boolean)
If target.Address = ("A10:A15") Then
Range("A:D").ClearContents  'hier stimmt was nicht
End If
End Sub

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Before double click
12.02.2004 22:22:17
Bert
Bei einem Klick- oder Doppelclickereignis, kann target immmer nur eine Zelle sein,
du kannst nicht auf zwei Zellen gleichzeitig klicken.
Bert
AW: Before double click
12.02.2004 22:27:52
Ernst Dunkel
Hallo Bert
Kannst du mir den Code abändern?
AW: Before double click
12.02.2004 22:48:43
Bert
Ja, aber welches Zelle soll denn Target sein? Und welche Zeile soll dann
gelöscht werden? Die gleiche Zeile wie Target?
Bert
AW: Before double click
12.02.2004 23:01:34
Mike
das sollte eigentlich helfen

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column >= 5 Then
Exit Sub
End If
Target.Clear
End Sub

hier wird die zelle gelöscht, in der ein doppelklick gemacht wird.
gruß
mike
Anzeige
Zeilen der Aktiven Zell A
12.02.2004 23:23:32
Ernst Dunkel
Hallo Bert und Mike
Ich möchte mit einem Doppelklick aus einer Zelle (A10 bis A15), die Inhalte der aktiven Zeile löschen, d.h., wenn der Curser auf A10 steht, sollen alle Zellen der Zeile 10 gelöscht werden.
AW: Zeilen der Aktiven Zell A
13.02.2004 00:05:41
K.Rola
Hallo,

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, [a10:a15]) Is Nothing Then Rows(Target.Row).ClearContents
Cancel = True
End Sub

Gruß K.Rola
AW: Zeilen der Aktiven Zell A
13.02.2004 00:10:44
Ernst Dunkel
Hallo K. Rola
Funktioniert super! rechtherzlichen Dank für Deine Hilfe.
Gute Nacht
Ernst Dunkel

48 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige