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

VBA Klick auf Zelle, Wert einfügen

Forumthread: VBA Klick auf Zelle, Wert einfügen

VBA Klick auf Zelle, Wert einfügen
01.09.2022 23:12:53
Sonny
Hallo, ich habe mangels VBA kentnisse folgendes Problem:
Ich habe 2 Tabellen. Jede Tabelle ist auf einer eigenen Seite (Tabelle1 auf SeiteA und Tabelle2 auf SeiteB)
In Tabelle1 werden Artikel eingetragen (Artikelnummer).
In Tabelle2 werden Einzelne Komponenten mit ihren Spezifikationen eingetragen.
Jetzt möchte ich in Tabelle1 in eine Zelle neben einen Artikel klicken, um somit auf Tabelle2 zu landen und dort auf eine Komponente klicken, die dann in Tabelle1 (die Zelle neben dem Artickel) eingetragen wird.
Ich würde mich über lösungsvorschläge sehr freuen.
Liebe Grüße,
Sonny
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Klick auf Zelle, Wert einfügen
01.09.2022 23:43:06
Yal
Hallo Sonny,
"Zelle daneben" ist ein "ungefähr"-Begriff. Computer kommen damit nicht zurecht. Und somit ist es in dieser Form nicht programmierbar.
Was Du aber machen kannst, ist auf der Zelle doppelklicken, wo der Artikelnummer liegt (und nicht daneben). Dann wird das Artikel auf das Zielblatt "SeiteB" gesucht und wenn dort vorhanden, dorthin gesprungen.
Dann kannst Du kopieren (strg+c, kennst Du sicher) und mit einen Sprung auf das voriges Blatt "SeiteA" (Strg+PageDown) genau zurück sein, wo Du gerade warst.
Der Suche und Absprung-Code sieht so aus. Es muss im Codepane von "SeiteA" abgelegt werden (Rechtsklick auf dem Register von "SeiteA", "Code anzeigen" anklicken).

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim Ziel As Range
'Const cZielBlatt = "SeiteB"
Const cZielBlatt = "Tabelle2"
If IsEmpty(Target) Then Exit Sub  'leere Zelle ignorieren, spricht ganz normal behandeln
If Not Intersect(Target, Me.Range("B:B")) Is Nothing Then 'wir nehmen, Artikelnummer sind nur in Spalte B zu haben
Set Ziel = Worksheets(cZielBlatt).Cells.Find(Target.Value)
If Not Ziel Is Nothing Then
Worksheets(cZielBlatt).Activate
Ziel.Activate
Cancel = True
End If
End If
End Sub
Ein paar Anpassungen musst Du selbstredend noch vornehmen.
VG
Yal
Anzeige
AW: VBA Klick auf Zelle, Wert einfügen
01.09.2022 23:45:32
onur
Und WO ist die Datei dazu?
AW: VBA Klick auf Zelle, Wert einfügen
02.09.2022 17:16:29
Sonny
Vielen Dank für die schnellen Rückmeldungen (und Vorschlag). Damit habe ich nicht gerechnet.
Hier ist die Datei mit einer Anleitung wie ichs gerne wünsche.
https://www.herber.de/bbs/user/154941.xlsx
Vielen dank.
Anzeige
AW: VBA Klick auf Zelle, Wert einfügen
02.09.2022 17:17:09
Sonny
Vielen Dank für die schnellen Rückmeldungen (und Vorschlag). Damit habe ich nicht gerechnet.
Hier ist die Datei mit einer Anleitung wie ichs gerne wünsche.
https://www.herber.de/bbs/user/154941.xlsx
Vielen dank.
;

Forumthreads zu verwandten Themen

Klick auf Zelle
Manu

Hallo
ich möchte eine Excelliste entwerfen, die jedoch nur über ein Formular gefüllt werden kann. Um das editieren eines Eintrags zu vereinfachen, soll der Nutzer einfach nur auf eine Zelle klicken. Das Blatt ansich ist gesperrt, es können nur Zellen ausgewählt werden, jedoch nicht bearbei...
12.12.2008 23:44:40
Thread-ID: 1032548
3 Beiträge
Klick auf Zelle
Manu

Hallo
ich möchte eine Excelliste entwerfen, die jedoch nur über ein Formular gefüllt werden kann. Um das editieren eines Eintrags zu vereinfachen, soll der Nutzer einfach nur auf eine Zelle klicken. Das Blatt ansich ist gesperrt, es können nur Zellen ausgewählt werden, jedoch nicht bearbei...
13.12.2008 00:06:00
Thread-ID: 1032553
5 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
Anzeige
Doppelklick auf zelle mit eigenem Namen
chris

Hallo VBA Experten,
habe hier eina kurze frage.
Würde mich wie immer über Hilfe freuen.
Ich habe eine Zelle Z.b L8
diese zelle hat den Namen "testzelle_8"
Ist es jetzt möglich irgendwie an diesen Namen zu kommen.
Also wenn ich die zelle Doppelklicke das dann der Name aus...
09.03.2010 15:42:23
Thread-ID: 1144625
11 Beiträge
Anzeige
Message bei Klick auf bestimmte Zellen
bastula

Liebe Excel-Experten,
ich möchte einen bestimmten Range eines Sheets zur Berarbeitung sperren, in dem restlichen Bereich soll in dem Moment, wo man auf eine Zelles dieses Bereiches klickt, eine MessageBox mit einer Warnung kommen.
Ich habs mit: Private Sub Worksheet_SelectionChange(ByVa...
28.04.2010 17:43:13
Thread-ID: 1154356
9 Beiträge
Bei Klick auf Zelle Macro ausführen
Benedikt

Guten Abend zusammen
Nachfolgender Code funktioniert einwandfrei, aber ist in jeder Zelle des Arbeitsblatt aktiv: Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Call Macro 1 End Sub
Wie kann ich Ihn auf die Zellen B24 bis B50 beschränken?
Vielen D...
01.05.2010 17:06:32
Thread-ID: 1154879
5 Beiträge
KLICK auf Zelle - User-Form Show
Edwin

Wie kann ich durch einen Klick auf eine Zelle erreichen, daß eine User-Form geöffnet wird.
01.05.2002 21:24:48
Thread-ID: 117688
5 Beiträge
Anzeige
Klick auf Zelle?
Manuel

Hallo,
wie kann ich ein userform bei Klick in eine Zelle eines Worksheet öffnen ? Ferner sollte ich denn Zellinhalt und die Koordinaten der Zelle wissen um geänderte Werte meiner userform in eben diese Zelle zurückschreiben zu können.DankeManuel

16.05.2002 00:02:11
Thread-ID: 121191
2 Beiträge
per Mausklick Zelle mit gleichem Inhalt anspringen
Fritz_W

Hallo VBA-Experten,
ich bitte um eure Hilfe beim Realisieren folgenden Vorhabens:
Ich möchte, dass wenn ich eine Zelle des Zellbereichs J1:J15 anklicke und diese Zelle nicht den Text "" aufweist, dass daraufhin diejenige Zelle im Tabellenblatt aktiviert wird, die den gleichen Textinhalt...
18.07.2011 16:44:58
Thread-ID: 1222635
7 Beiträge
Bei Klick auf Zelle, soll Standardwert erscheinen
stefanseevetal

Hallo liebe Excel-Experten!
Ich habe eine kurze Frage: Wie bekomme ich es hin, dass in einer Zelle automatisch der Buchstabe "j" steht, sobald ich die Zelle anklicke?
Danke und viele Grüße
Stefanseevetal
19.08.2011 17:41:10
Thread-ID: 1226819
3 Beiträge
Doppelklick auf farbige Zelle filtert Tabelle mit
Tobias

Hallo,
ich suche nach einer Möglichkeit um folgendes zu erreichen:
doppelklick auf eine blaue Zelle (im Original durch bedingte Formatierung gefärbt):
1. springt excel in ein anderes Tabellenblatt
2. filtert eine Liste mit dem entsprechenden Kriterium
Die genaue Beschreibung...
21.11.2012 15:00:10
Thread-ID: 1287591
8 Beiträge
Problem --> Klick auf Zelle
Steffen

Hallo Leute, heute brauch ich wieder mal Eure Hilfe.Und zwar möchte ich bei Klick auf eine Zelle ein Makro ausführen, aber bei einem einfachen klick nicht DoppelclickKann man dies auch so auslegen das wenn man auf eine Zelle in Zeile 1 klick ein Makro ausgeführt wird.Also: einmal bei klick auf...
21.06.2002 12:51:03
Thread-ID: 130417
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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