Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1296to1300
1296to1300
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mit Doppelklick Zelle füllen

Forumthread: Mit Doppelklick Zelle füllen

Mit Doppelklick Zelle füllen
17.02.2013 20:03:47
Thorsten
Hallo zusammen,
ich bin neu hier und habe ein Problem. Ich möchte gerne in eine Excel-Tabelle in verschiedene Zellen klicken, und in den verschiedenen Zellen soll dann was anderes stehen.
z.B.
- Doppelklick in A1 = Hallo
- Doppelklick in B1 = hurra
- Doppelklick in A2 = date
- Doppelklick in B2 = time
Habe im Netz verschiedene Ansätze gefunden, aber nichts war genau auf mein Problem ausgerichtet.
Ich hoffe, ihr könnt mir helfen.
Vielen Dank schon mal.
Thorsten

Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mit Doppelklick Zelle füllen
17.02.2013 20:08:48
Hajo_Zi
Hallo Torsten,
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Taget.Address(False, False) = "A1" Then
Target = "Hallo"
ElseIf Taget.Address(False, False) = "B1" Then
Target = "hurra"
ElseIf Taget.Address(False, False) = "A2" Then
Taget = Date
ElseIf Taget.Address(False, False) = "B2" Then
Target = Time
End If
End Sub

Anzeige
AW: Mit Doppelklick Zelle füllen
17.02.2013 20:16:57
Hajo_Zi
Hallo Thorsten,
nochmal 
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address(False, False) = "A1" Then
Target = "Hallo"
ElseIf Target.Address(False, False) = "B1" Then
Target = "hurra"
ElseIf Target.Address(False, False) = "A2" Then
Target = Date
ElseIf Target.Address(False, False) = "B2" Then
Target = Time
End If
End Sub
Gruß Hajo

Anzeige
AW: Mit Doppelklick Zelle füllen
17.02.2013 20:26:37
Thorsten
Hallo Hajo,
das ging ja richtig schnell.
Ich versuche es mal und melde mich dann wieder.
DANKE, schon mal.

AW: Mit Doppelklick Zelle füllen
17.02.2013 20:36:29
Thorsten
Hallo Hajo,
das funktioniert super in einer leeren Arbeitsmappe. Aber in meiner Ausgearbeiteten Arbeitsmappe funktioniert es nicht. Ist ist der komplette Text, den ich drin stehen habe. Vielleicht beißt sich ja irgendwas:
(Anmerkung: Zelle I8 ist eigentlich verbunden = I8:J8)
--------------
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address(False, False) = "I8" Then
Target = Date & " | " & Time
ElseIf Target.Address(False, False) = "I90" Then
Target = Date & " | " & Time
ElseIf Target.Address(False, False) = "J93:J132" Then
Target = "X"
ElseIf Target.Address(False, False) = "O8" Then
Target = Date & " | " & Time
ElseIf Target.Address(False, False) = "090" Then
Target = Date & " | " & Time
ElseIf Target.Address(False, False) = "P93:P132" Then
Target = "X"
End If
End Sub

'Wenn in Spalte D was eingetragen wird
'erscheint 1 Spalte weiter die Uhrzeit aus dem System 
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Range("F93:F132"), Target) Is Nothing Then
If Len(Target.Value) > 0 Then Target.Offset(0, 1).Value = Date & " | " & Time
End If
If Not Application.Intersect(Range("L93:L132"), Target) Is Nothing Then
If Len(Target.Value) > 0 Then Target.Offset(0, 1).Value = Date & " | " & Time
End If
End Sub

--------------

Anzeige
AW: Mit Doppelklick Zelle füllen
17.02.2013 20:40:07
Hajo_Zi
Hallo Torsten,
bei Doppelklick kann die Zelladresse nicht "J93:J132"; "P93:P132" sein.
Ich baue keine Datei nach, die Zeit hat schon jemand investiert.
Ein Link zur Datei wäre nicht schlecht.
Gruß Hajo

Anzeige
AW: Mit Doppelklick Zelle füllen
17.02.2013 20:59:17
Thorsten
Ich bin dabei die Datei auf 300kb zu bekommen. Dies dauert noch etwas. Es liegt an den letzten 100kb.

AW: Mit Doppelklick Zelle füllen
17.02.2013 21:24:36
Thorsten
Hallo Hajo,
ich habe eine neue Datei gebastelt.
Diese spielt das wider, was ich suche.
https://www.herber.de/bbs/user/83946.xls
Danke.

Anzeige
AW: Mit Doppelklick Zelle füllen
17.02.2013 20:49:32
Peter
Hallo Thorsten,
versuche es so: 
Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address(False, False) = "I8" Then
Target = Date & " | " & Time
ElseIf Target.Address(False, False) = "I90" Then
Target = Date & " | " & Time
ElseIf Target.Column = 10 Then   ' "J93:J132"
Select Case Target.Row
Case 93 To 132: Target = "X"
End Select
ElseIf Target.Address(False, False) = "O8" Then
Target = Date & " | " & Time
ElseIf Target.Address(False, False) = "090" Then
Target = Date & " | " & Time
ElseIf Target.Column = 16 Then ' "P93:P132"
Select Case Target.Row
Case 93 To 132: Target = "X"
End Select
End If
End Sub

Gruß Peter

Anzeige
AW: Mit Doppelklick Zelle füllen
17.02.2013 20:53:50
Peter
Hallo Thortsten,
Dein Code enthält noch einen Schreibfehler: es darf nicht Null90 sondern O90 heißen.
Gruß Peter

AW: Mit Doppelklick Zelle füllen
17.02.2013 21:06:46
Thorsten
Ich schaffe es nicht, die xls-Datei auf 300kb zu minimieren.
Ich versuche mal den Vorschlag von Peter.

AW: Mit Doppelklick Zelle füllen
17.02.2013 21:15:45
Thorsten
Hallo Peter,
das mit dem "X" eintragen funktioniert. Aber die Datums/uhrzeit-eintragung leider noch nicht.
Kann es sein, dass es nicht funktioniert weil I8 und J8 "verbunden" sind?

Anzeige
AW: Mit Doppelklick Zelle füllen
17.02.2013 23:22:13
Thorsten
Hallo Peter,
hallo Hajo,
ich danke Euch recht herzlich für Eure Mühen. Es hat nun funktioniert :-)
Vielen Dank
Gruß
Thorsten
;

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
Anzeige
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
Anzeige
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
Anzeige
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
Anzeige
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
Anzeige

Beliebteste Forumthreads (12 Monate)

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