Hyperlink-Auslösung mit Return-Taste
#1
Hallo Leute und Profis,

in einer Tabelle habe ich mittels Hyperlink eine Suchfunktion eingebaut. Mann gibt in Zelle D1 das Suchwort ein, drückt Enter und der Cursor springt auf Zelle D2 mit dem Hyperlink. Nach erneutem Drücken von der Entertaste/Return passiert nix.
Mann muß erst wieder zur Maus greifen und den Hyperlink anklicken.
Geht das nicht komfortabler? VBA vieleicht? Also das der Hyperlink mittels der Entertaste ausgeführt wird.

Danke für eure Hilfe Sleepy
Top
#2
Hallo Beltason,

so viel wie ich weiß, geht das nicht. Mit einer Tastenkombi geht´s... (VBA)
Wenn´s nun aber die Entertaste sein soll, muss ein anderer helfen. Undecided

Interpunktion und Orthographie dieses Textes sind frei erfunden.
Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.

Grüße, StefanB
Top
#3
Danke für die Info. Hast du den passenden Code für mich?
Top
#4
Den code in ein Modul. In diesem Fall ist der Hyperlink in F5 eingebettet.

Code:
Sub hyperlink()
' Tastenkombination: Strg+y
'
    Range("F5").Select
    Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
End Sub

Interpunktion und Orthographie dieses Textes sind frei erfunden.
Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.

Grüße, StefanB
Top
#5
Hallo Beltason, 19

mache es so direkt bei der Eingabe: 21
[attachment=38966]
Top
#6
Danke ihr freundlichen Helfer.
Nur leider klappt das nicht. Ich habe die Tabelle mit dem Code im Modul mal hochgeladen. Vieleicht ist das so für euch einfacher...
Danke Heart


Angehängte Dateien
.xlsm   Kundenkarten alle - Kopie (2).xlsm (Größe: 33,39 KB / Downloads: 2)
Top
#7
Hallo, 19

hier mal eine Möglichkeit: 21
[attachment=38972]

Das funktioniert jetzt ohne D2. Nach Eingabe in D1.

Das lässt sich auf verschiedene Weisen lösen. Was möchtest du denn erreichen? Was soll passieren, wenn er den Wert findet? Was ist, wenn mehrere Ergebniswerte vorhanden sind?
Top
#8
wow das sieht schon RICHTIG gut aus!!! Ich Teste jetzt mal in Ruhe gleich zu Hause und melde mich dann....
Bis dahin erstmal Danke
Top
#9
Hallo Case, habe jetzt am Wochenende mal ausführlich getestet. Genauso stelle ich es mir vor, das hast du Prima gemacht, auch das nicht mehr auf klein/großschreibung geachtet werden muss, Daumen hoch!!

Trotzdem hakelt es irgendwo. Ich habe Namen für Namen der Reihe nach eingeben. Dabei ist mir aufgefallen, das deine Suchfunktion nur bei jedem zweiten Namen funktioniert (Die weißen Zeilen) warum weiß ich nicht.

Und nur bei dem Namenala Salah springt Exel automatich zu der Zeile Salah. Wirklich nur bei Salah, habe da ausführlich getestet.
Vieleicht kommt sich die bedingte Formatierung, die ich ja schon angelegt hatte mit deiner Programmierung in die Quere, keine Ahnung? Würdest du dir das nochmal anschauen bitte? Habe die Datei nochmal angehängt.

Vielen Dank


Angehängte Dateien
.xlsm   Kopie von Kundenkarten alle - Kopie (2).xlsm (Größe: 34,31 KB / Downloads: 7)
Top
#10
Hallo Leute,

kann sich vieleicht jemand die Datei mal ansehen? Ich komme da einfach nicht weiter Blush 
Es ist wirklich wichtig, weil wir auf die Datei angewiesen sind. Danke jetzt schon an alle Helfer!
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste