Clever-Excel-Forum

Hi Leute,

vielen Dank vorab für eure Ideen und Unterstützung. Ich bin neu hier im Forum und schätze, dass ich aufgrund neuer beruflicher Aufgaben zukünftig hier häufiger reinschneie :)


Aktuelle Lage:
Ich habe in einer Exceldatei 2 verschiedene Blätter. Auf Blatt 1 sind sagen wir mal Kundennummern gelistet. Auf Blatt 2 sind mehrere Einträge mit der Kundennummer die verschiedene Artikel beinhalten.


Mein Wunsch:
Ich würde gerne auf die Kundennummer auf Blatt 1 klicken und auf Blatt 2 "verlinkt" werden. Soll heissen, Auf den Klick hin, öffnet sich Blatt 2 und markiert optimalerweise die Artikel der dazugehörigen Kundennummer?



Ich hab zwar vor Ewigkeiten mal nen Excelkurs gemacht und im 1. Semester (auch schon ein paar Jahre her) VBA Grundlagen gelernt. Kam aber leider nie dazu es anzuwenden. Freu mich aber dass es jetzt soweit ist und hoffe auch eure Unterstützung!!

Beste Grüße

Lance

Hallo, auf Blatt 1 die Zelle mit der Kundennummer rechts anklicken.
Kontextmenü>Hyperlink einfügen > aktuelles Dokument
"Geben Sie den Zellbezug ein" > Tabelle2!Kundennummer

meinst Du so? oder eine VBA-Lösung?

(14.03.2021, 22:48)StefKe schrieb: [ -> ]Hallo, auf Blatt 1 die Zelle mit der Kundennummer rechts anklicken.
Kontextmenü>Hyperlink einfügen > aktuelles Dokument
"Geben Sie den Zellbezug ein" > Tabelle2!Kundennummer

meinst Du so? oder eine VBA-Lösung?

Hi Stefke,

vom Prinzip her schon, VBA muss es nicht sein, so würde mir das schon reichen. Allerdings kann ich ja nur eine bestimmte Zelle damit verknüpfen oder? Da ich aber die Kundennummer auf dem Blatt 2 mehrmals habe, hätte ich die gerne alle ausgewählt.

Edit: Im Prinzip soll wenn ich auf die Kundennummer klicke, eine Suche im 2. Blatt durchgeführt werden und mir die Zeilen der Artikel mit der jeweiligen Kundennummer angezeigt werden. Vllt grenzt der Begriff Verlinkung die Ideenfindung etwas ein.
Daran wie es gelöst wird, hab ich an sich keine Ansprüche :)

Moin!
Ich würde es mit dem Filter lösen.
Wenn es denn unbedingt VBA sein soll, kann man ihn per Doppelklick in Tabelle1 Spalte A lösen:

Microsoft Excel Objekt Tabelle1

Option Explicit 
 
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
If Not Intersect(Range("A2:A5"), Target) Is Nothing Then 
  Tabelle2.Range("A1").CurrentRegion.AutoFilter 1, Target 
  Tabelle2.Activate 
End If 
End Sub 
 

Datei im Anhang

Gruß Ralf

(15.03.2021, 06:34)RPP63 schrieb: [ -> ]Moin!
Ich würde es mit dem Filter lösen.
Wenn es denn unbedingt VBA sein soll, kann man ihn per Doppelklick in Tabelle1 Spalte A lösen:

Gruß Ralf

Funktioniert einwandfrei. Danke!!
Rein aus Interesse, was meinst du mit dem Filter? Händisch die Tabellenblätter wechseln und den filtern einstellen? Bei einigen hundert Zeilen ist das rtecht aufwändig...

VG