Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1020to1024
1020to1024
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Danke an Erich G. und neues Thema: Hyperlinks

Forumthread: Danke an Erich G. und neues Thema: Hyperlinks

Danke an Erich G. und neues Thema: Hyperlinks
03.11.2008 17:48:00
Karl
Hallo Forum,
Kann ich über einen Commandbutton an bestimmte Textmarken in einer Exceltabelle springen.
Es ist allerdings an eine Bedingung geknüpft. Und zwar:
-Wenn klick, dann prüfe heutiges Datum und springe zu dem ensprechenden Datum in der Tabelle.
Hoffe es ist so verständlich.
Gruß Karl
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Danke an Erich G. und neues Thema: Hyperlinks
03.11.2008 18:06:49
Tino
Hallo,
so könnte es Funktionieren, die Spalte mit dem Datum steht im Beispiel in Spalte A
Beispiel: 
Option Explicit 
 
Private Sub CommandButton1_Click() 
Dim Datum As Long 
Dim i As Long 
Datum = Date 
   
  With Application.WorksheetFunction 
    On Error Resume Next 
    i = .Match(Datum, Range("A:A"), 0) 
    On Error GoTo 0 
  End With 
 
If i > 0 Then Cells(i, "A").Select 
 
 
End Sub


Gruß Tino

Anzeige
AW: Danke für Rückmeldung und Vorschlag
03.11.2008 18:20:00
Erich
Hi Karl,
noch ein Vorschlag: 

Option Explicit
Private Sub CommandButton1_Click()
Dim varZ ' as Variant
varZ = Application.Match(CDbl(Date), Columns(1), 0)
If IsNumeric(varZ) Then Cells(varZ, 1).Select
End Sub

Danke für deine Rückmeldung! - Grüße von Erich aus Kamp-Lintfort

Anzeige
AW: Danke an Erich G. und neues Thema: Hyperlinks
04.11.2008 07:05:12
Beverly
Hi Karl,

Sub Schaltfläche1_BeiKlick()
Cells(Application.WorksheetFunction.Match(CDbl(Date), Columns(1), 0), 1).Select
End Sub


Voraussetzung ist, dass das heutige Datum in Spalte A vorkommen muss, sonst läuft der Code auf einen Fehler. Andernfalls eine Umgehung des Fehlers einbauen


Sub Schaltfläche1_BeiKlick()
On Error Resume Next
Cells(Application.WorksheetFunction.Match(CDbl(Date), Columns(1), 0), 1).Select
On Error GoTo 0
End Sub



Anzeige
Datum ist in Zeile, nicht in Spalte
04.11.2008 09:52:02
Karl
Vielen Dank für die schnelle Hilfe!!
Allerdings sind meine Daten ein einer Zeile und befinden sich in einer anderen Tabelle (Mist, das hab ich vergessen zu sagen... SORRY)
Der Button ist in Tabelle Navigator. Die Daten sind in Tabelle Ressourcenplan.
Danke für eure Hilfe!!!
Gruß
Der K@rl
Anzeige
AW: Datum ist in Zeile, nicht in Spalte
04.11.2008 10:26:32
Beverly
Hi Karl,

Application.Goto reference:=Worksheets("Ressourcenplan").Cells(3, Application. _
WorksheetFunction.Match(CDbl(Date), Worksheets("Ressourcenplan").Rows(3), 0))



Anzeige
AW: Datum ist in Zeile, nicht in Spalte
04.11.2008 10:56:00
Erich
Hi Karl,
oder auch so: 

Private Sub CommandButton1_Click()
Dim varZ ' as Variant
Const lngZeile As Long = 3       ' suche in Zeile 3
With Worksheets("Ressourcenplan")
varZ = Application.Match(CDbl(Date), .Rows(lngZeile), 0)
If IsNumeric(varZ) Then Application.Goto .Cells(lngZeile, varZ), True
End With
End Sub

Wenn das Datum nicht gefunden wird, passiert gar nichts, es wird auch nicht das Blatt gewechselt.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
Beides läuft! Danke euch beiden!
04.11.2008 11:31:00
Karl
Hallo ihr Beiden,
beide Lösungen funktionieren. Allerdings ist Erichs etwas besser bzw. kann ich die Lösung besser gebrauchen.
Gruß
K@rl
;

Forumthreads zu verwandten Themen

Hyperlink Formel auf Gültigkeit prüfen
zapultin

Hallo Forum!
Ich verwende die Hyperlinkformel in Excel. Nun möchte ich gerne wissen, ob der berechnete Hyperlink funktioniert (es kann nämlich sein, daß die Datei, auf die gelinkt wird noch nicht existiert).
Wie kriege ich das OHNE ein VBA Makro hin? Gibt es gar keine Möglichkeit dies z...
15.08.2008 15:49:14
Thread-ID: 1002228
3 Beiträge
Hyperlink Funktion mit VBA auswerten
zapultin

Hallo!
Ich habe die Hyperlinkfunktion in einem Excel Blatt verwendet. Nun will ich per VBA ermitteln, ob der Hyperlink funktioniert.
Komischerweise gibt der Zugriff RANGE.HYPERLINKS auf die Zelle wo ich die Hyperlinkfunktion verwendet keinen Hyperlink!
Nur wenn ich in der Zelle per...
16.08.2008 11:17:00
Thread-ID: 1002331
2 Beiträge
Hyperlinks - Korrektur ?
Petra

Hallo Excelianer(innen)
Ich prüfe (per VBA) eine große Liste auf Fehlereintragungen, bei Auffinden eines solchen generiere ich eine Fehlerliste (Hyperlinks auf die fehlerhafte Zelle). Klappt alles wunderbar.
Jetzt mein Problem: es kommt vor, das vom Anwender eine Zeile (auf die ein Hyp...
19.08.2008 13:02:24
Thread-ID: 1002903
4 Beiträge
Anzeige
Email per Hyperlink aus Zelle mit Formel
Frank

Hallo und schönen guten Morgen zusammen,
neues kleines Problem!
Ich möchte mit Hilfe eines Hyperlink per klick eine Email öffnen!
Soweit so gut und kein Problem!
Jetzt steht die Email Adresse aber nicht wirklich in der Zelle sondern diese hole ich mir per
Sverweises aus ein...
21.08.2008 09:22:45
Thread-ID: 1003367
3 Beiträge
Hyperlinks aktualisieren
Lars

Hallo zusammen,
ein Kollege von mir hat eine Excel Datei mit Hyperlinks. Die Hyperlinks liegen auf einem anderen Netzlaufwerk als die Excel Datei. Wenn der Server umbenannt wird, sind somit alle Hyperlinks ungültig. Gibt es eine schnelle Möglichkeit, alle in der Excel-Datei vorhandenen Link...
29.08.2008 14:38:00
Thread-ID: 1005841
3 Beiträge
ThisWorkbook.FollowHyperlink Address - Makros akt.
Peter

Guten Abend
Kann ich bei nachfolgendem Code eine Ergänzung anbringen, damit allfällig vorhandene Makros einer zu öffnenden Datei automatisch aktiviert werden?
Wenn ja, wie?
Danke für jede Hilfe.
Gruss, Peter
If Dir(strPath & "\" & strFile) "" Then
Cancel = True<...
02.09.2008 22:09:05
Thread-ID: 1006962
3 Beiträge
Hyperlinks
Bernd

Hallo, ich möchte folgendes Problem lösen.
In einer Formularerstellung mit Excel wird ein Formular ausgefüllt.
Danach wird dieses Formular in einer seperaten Datei gespeichert und Daten aus dem Formular werden in einem anderen Worksheet gespeichert.
Der Dateiname und Speicherort ist...
15.09.2008 08:22:03
Thread-ID: 1009649
6 Beiträge
Hyperlink auf Server
andreas

Hallo zusammen,
folgendes Problem, ich füge in einer Tabelle einen Hyperlink mit Verweis auf einen Ordner auf dem Server.
Dieser funktioniert solange die Tabelle nicht abgespeichert ist. Nach dem Abspeichern funktioniert der Hyperlink nicht mehr weil die Adresse vom System umgeschrieben...
23.09.2008 11:56:31
Thread-ID: 1011680
3 Beiträge
Hyperlink freigeben
chrisss

Hallo
Ich habe eine Excel-Datei 1, die Daten aus einer anderen Excel-Datei 2 bezieht. Wenn ich nun die Daten in Datei 1 aktualisieren möchte, geht immer eine Sicherheitswarnung auf, "Die automatische Aktualisierung von Hyperlinks wurde deaktiviert". Über Optionen kann ich dann den "Inhalt...
24.09.2008 12:59:34
Thread-ID: 1012043
2 Beiträge
Anzeige
Namen(-steil) finden und zuordnen /var. Hyperlink
Juppie

Hallo liebe Experten,
ich hätte nicht gedacht, dass ich daran verzweifle - auch habe ich keine Lösung googeln können, deshalb hier meine Frage.
Es existiert eine Tabelle mit 3 Spalten. Die erste Spalte A ist der Ordner (Nr 1 bis n), wo Rechnungen nach dem Namen abgelegt werden sollen. S...
03.10.2008 16:13:21
Thread-ID: 1014055
2 Beiträge
Hyperlink soll je nach KW auf andere Datei verw.
Alex

Hallo,
gleich einmal vorweg, ich bin neu im Forum und hoffe, dass ihr mir bei meinem kleinen Hyperlink- Problem helfen könnt.
Folgende Aufgabe sollte gelöst werden.
Ich möchte einen Hyperlink einrichten, der automatisch je nach Kalenderwoche auf das entsprechende Bestellformular ve...
11.10.2008 12:37:00
Thread-ID: 1015732
3 Beiträge
Hilfe: Hyperlink auf email setzen?
Mike

Hi Leute,
Mein Problem bzw. Frage ist folgende:
Ich möchte in einer Exceltabelle einen Hyperlink setzen,
mit dem automatisch das Excelfile, in dem der Link sitzt,
an eine bestimmte email-Adresse versandt werden soll.
(bzw. durch den sich Outlook öffnet und der Empfänger...
21.10.2008 10:14:00
Thread-ID: 1017882
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige