Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1216to1220
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
Inhaltsverzeichnis

Doppelklick für 3 Tabellenblätter

Doppelklick für 3 Tabellenblätter
chris58
Hallo !
Ich habe ein Formular, wo ich auch Mahnungen drinnen habe. Ich habe diesen Code, der bei doppelklick alle Daten in die erste Mahnung übernimmt. Jedoch habe ich 1. Manung, 2. Mahnung und 3. Mahnung.
Kann man den Code so erweitern, daß die Daten bei allen 3 Tabellenblättern übernommen wird ?
Danke für die Hilfe
chris
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("D2:D50000")) Is Nothing Then
Sheets("1. Mahnung").Range("C30").Value = Target.Value
End If
End Sub

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Doppelklick für 3 Tabellenblätter
20.06.2011 18:35:52
mas
Hallo Chris
evtl. so
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("D2:D50000")) Is Nothing Then
Sheets("1. Mahnung").Range("C30").Value = Target.Value
Sheets("2. Mahnung").Range("C30").Value = Target.Value
Sheets("3. Mahnung").Range("C30").Value = Target.Value
End If
End Sub

AW: Doppelklick für 3 Tabellenblätter
20.06.2011 18:56:30
chris58
Danke, ja das funktioniert bestens, danke für die schnelle Hilfe
chris
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige