Thema Datum  Von Nutzer Rating
Antwort
13.06.2014 17:04:12 Gast95619
NotSolved
Blau Zelle mit Namen soll Tabelle mit gleichen Namen öffnen
13.06.2014 18:09:23 Gast19967
Solved
13.06.2014 18:33:37 Gast6998
Solved
13.06.2014 18:54:09 Gast30789
NotSolved
13.06.2014 18:35:59 Gast46460
NotSolved

Ansicht des Beitrags:
Von:
Gast19967
Datum:
13.06.2014 18:09:23
Views:
1552
Rating: Antwort:
 Nein
Thema:
Zelle mit Namen soll Tabelle mit gleichen Namen öffnen

Das klassische Klick-Ereignis (also einfacher Linksklick) gibt es nicht.

Es gibt nur:

  1. ein Ereignis, das auftritt wenn sich die Zellenauswahl ändert (SelectionChange)
  2. ein Ereignis, das auftritt bevor man eine Zelle doppelt anklickt (BeforeDoubleClick)
  3. ein Ereignis, das auftritt bevor man eine Zelle rechtsklickt (BeforeRightClick)

Deiner Problemstellung kommt Punkt 1 oder 2 am nächsten.

 

Am sinnvollsten wäre jedoch ein Hyperlink. Hyperlinks reagiert auf einen einfachen Linksklick.

Diese Hyperlinks lassen sich auch automatisiert erzeugen:

(Dieses Beispiel geht davon aus, dass die Namen in der ersten Spalte des Datenbereichs stehen)

Option Explicit

Public Sub RefreshNames()
  
  Dim rngCell As Excel.Range
  
  With ThisWorkbook.Worksheets("Tabelle1")
    
    For Each rngCell In .UsedRange.Columns(1).Cells
      Call rngCell.Hyperlinks.Delete
      If WorksheetExists(rngCell.Text, ThisWorkbook) Then
        Call .Hyperlinks.Add(rngCell, "", "'" & rngCell.Text & "'!A1", _
                             TextToDisplay:=rngCell.Text)
      End If
    Next
    
  End With
  
End Sub

Public Function WorksheetExists(Name As String, Optional ByVal Workbook As Excel.Workbook) As Boolean
  On Error Resume Next
  If Workbook Is Nothing Then Set Workbook = ActiveWorkbook
  WorksheetExists = CBool(Workbook.Worksheets(Name).Index)
End Function

 

Gruß


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
13.06.2014 17:04:12 Gast95619
NotSolved
Blau Zelle mit Namen soll Tabelle mit gleichen Namen öffnen
13.06.2014 18:09:23 Gast19967
Solved
13.06.2014 18:33:37 Gast6998
Solved
13.06.2014 18:54:09 Gast30789
NotSolved
13.06.2014 18:35:59 Gast46460
NotSolved