Supportnet / Forum / Tabellenkalkulation

Hallo, ich habe eine Tabelle mit 2 Tabellenblättern. In der Spalte A sind in Tabelle 1 und Tabelle 2 die gleichen Daten hinterlegt. Ich möchte dass ich über ein Button in Tabelle 1, welcher sich in einer Spalte dahinter befindet, bei Klick in Tabelle 2 gleich in die richtige Zeile komme. Kann leider nicht programmieren, weiß aber wie man ein Button erstellt und ein Makro bearbeitet.... Leider nicht mehr. Sandra

Hallo Sandra,

anbei ein Beispiel welches anstatt eines Button mit einem Doppelklick arbeitet.

http://upload.npcfighter.de/files/36/9986/Sandra.xls

Gruß
Rainer

Vielen Dank,

das wäre durchaus auch eine Lösung, jedoch sind die Werte in anderer Reihenfolge und was das unpraktikabel macht, ist es befinden sich nicht alle Werte aus Tabelle1,Spalte1 in Tabelle2, Spalte2.

Hoffe auf Hilfe.

Sandra

Hallo Sandra,

sorry. hatte übersehen, dass Du bereits geantwortet hattest.

Du schriebst, dass sich in den beiden Tabellen die gleichen Werte befinden, deshalb nahm ich an, Du willst auch in die gleiche Zeile springen.

Probier' mal folgenden Code, er wird ebenfalls durch Doppelklick auf den relevanten Wert gestartet.

Option Explicit

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   Dim varWert As Variant, lngZeile As Long
   If Not Intersect(Target, Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row)) Is Nothing Then
      varWert = Target.Value
      lngZeile = WorksheetFunction.Match(varWert, Worksheets("Tabelle2").Range("A:A"), 0)
      Worksheets("Tabelle2").Select
      ActiveSheet.Range("B" & lngZeile).Select
   End If
End Sub

Gruß
Rainer

• symbolleisten in excel
• Excel - Symbolleiste speichern - Datei excel*.xlb fehlt
• Import von Excel nach Excel ohne Öffnen der Quelldatei
• Excel 2002 Dateien in Excel 2007 für MS Vista Home Premium
• Absturz von Powerpoint UND Excel