Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
16.10.2025 00:15:51
Passwort im Herbersforum ändern
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
1656to1660
1656to1660
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Automatisch Hyperlink nach Texteingabe erstellen

Forumthread: Automatisch Hyperlink nach Texteingabe erstellen

Automatisch Hyperlink nach Texteingabe erstellen
28.11.2018 08:33:26
Nik
Hallo zusammen, ich habe folgendes Anliegen:
Ich habe eine Fehlerdatenbank, die dauerhaft mit neuen Daten gefüllt wird.
In der Spalte G meines Arbeitsplatzen "Fehler" werden diese Fehler mit einer genaueren Fehlerbeschreibung erläutert.
Sobald dort Text eingegeben ist, soll dieser zu einem Hyperlink formatiert werden und zu dem Arbeitsblatt "Lösungen" in die Spalte B (und der selben Zeile wie in "Fehler") führen.
Ist das möglich?
Danke für eure Zeit!
Anzeige

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

Betreff
Datum
Anwender
Anzeige
ja, ist möglich; aber bitte Musterdatei..
28.11.2018 08:51:37
UweD
hochladen.
AW: Automatisch Hyperlink nach Texteingabe erstellen
28.11.2018 09:09:08
Nik
https://www.herber.de/bbs/user/125705.xlsx
Hab jetzt mal zum Beispiel 8 Einträge angelegt und manuell mit Hyperlinks zum richtigen Ziel eingefügt.
Wenn man jetzt einen 9. Eintrag macht und den Text in Spalte G ausfüllt soll also ein Hyperlink mit dem eingegeben Text automatisch entstehen.
Hoffe es ist verständlich!
Anzeige
AW: Automatisch Hyperlink nach Texteingabe erstellen
28.11.2018 10:08:38
UweD
Hallo
wie folgt
- Rechtsclick auf den Tabellenblattreiter
- Code anzeigen
- diesen Code dort reinkopieren
Microsoft Excel Objekt Tabelle1 
Option Explicit 
 
Private Sub Worksheet_Change(ByVal Target As Range) 
    On Error GoTo Fehler 
    Dim TB As Worksheet, Sp As Integer, Z1 As Integer 
 
    '###### 
    Set TB = Sheets("Lösungen") 
    Sp = 7 'Spalte G 
    Z1 = 1 'Überschrift 
    '###### 
 
    If Not Intersect(Columns(Sp), Target) Is Nothing Then 
        If Target.Row > Z1 Then 
            If Target.Count > 1 Then 
                MsgBox "Bitte nur eine Zelle bearbeiten" 
                With Application 
                    .EnableEvents = False 
                    .Undo 
                    .EnableEvents = True 
                End With 
                Exit Sub 
            End If 
 
            With Target 
                Application.EnableEvents = False 
                .Hyperlinks.Delete 
                Me.Hyperlinks.Add Anchor:=Target, Address:="", SubAddress:= _
                    TB.Name & "!B" & .Row, TextToDisplay:=.Value 
            End With 
        End If 
 
    End If 
    '*** Fehlerbehandlung 
    Err.Clear 
Fehler: 
    Application.EnableEvents = True 
    If Err.Number <> 0 Then MsgBox "Fehler: " & _
        Err.Number & vbLf & Err.Description: Err.Clear 
End Sub

LG UweD
Anzeige
AW: Automatisch Hyperlink nach Texteingabe erstellen
28.11.2018 10:43:00
Nik
Okay, wenn ich in meiner 10. Zeile die Daten ausfülle funktioniert alles. Aber wenn ich noch einen weiteren Eintrag tätige erstellt er keinen Hyperlink mehr.
Woran kann das liegen?
AW: Automatisch Hyperlink nach Texteingabe erstellen
28.11.2018 14:22:47
Nik
Okay hab meinen Fehler gefunden, läuft doch nach dem beschriebenen Prinzip super!
Danke UewD
Prima! Danke für die Rückmeldung. owT
28.11.2018 14:25:13
UweD
;

Forumthreads zu verwandten Themen

Wert zeischen 2 Zeichen ausgeben
Müller

Hi zusammen
Ich würde gerne den Wert zwischen dem Zeichen " ausgeben lassen. Z.b. in so einem Text:
uebcaise"http://www.irgendwas.de"eirhasbdf"http://www.website.de"vhergta
Jetzt müsste es 2 Werte ausgeben können:
Wert1: http://www.irgendwas.de
Wert2: http://www.website.de
07.12.2008 11:33:00
Thread-ID: 1030829
7 Beiträge
Anzeige
Macro gesucht Text teilen ab Zeichen "-"
Tom

Liebes Forum,
ich suche ein Macro welches mir alle Zeichen links vom "-" (Minus) in eine neue Spalte B und alle Zeichen rechts vom Minus in die neue Spalte C kopiert. Das "-" (Minus) kann ggf. öfter vor kommen, ich möchte es nur auf das erste von links beziehen.
Konkret
Textxyz 79.x...
06.07.2009 12:18:48
Thread-ID: 1086596
2 Beiträge
Macro gesucht Text teilen ab Zeichen "-"
Tom

Liebes Forum,
ich suche ein Macro welches mir alle Zeichen links vom "-" (Minus) in eine neue Spalte B und alle Zeichen rechts vom Minus in die neue Spalte C kopiert. Das "-" (Minus) kann ggf. öfter vor kommen, ich möchte es nur auf das erste von links beziehen.
Konkret
Textxyz 79.x...
06.07.2009 12:19:17
Thread-ID: 1086598
9 Beiträge
Bei IF(Left auf Formel nicht auch Wert abstellen
Joachim

Hallo,
ich möchte mich bei der Excel-Left(A1;1)-Funktion - ohne VBA - auf den wahren Inhalt einer Zelle beziehen (bspw. =A1; =60+60; 52) und nicht auf den Wert der mir angezeigt wird.
Gibt es dafür einen Befehl?
Dank und Gruß aus Berlin, Joachim
11.10.2009 16:08:47
Thread-ID: 1108912
3 Beiträge
Anzeige
Text ab einer bestimmten Stelle löschen +Hyperlink
Werner

Hallo,
ich habe in Excel in einer Spalte (Spalte D) unter einander sehr viele Zeilen nach folgenden Schema
(Hinweis: Ich habe das h am Anfang hier weggelassen, weil der Beitrag sonst immer als Hyperlink dargestellt wird, in meiner Tabelle ist es vorhanden):
ttp://www.ihrname.de*dfg...
05.12.2009 23:35:56
Thread-ID: 1122006
3 Beiträge
Wenn-Formel in Abh. von 1. Zeichen in Zelle
1.

Hallo zusammen,
kennt jemand eine Wenn-Funktion die das erste Zeichen einer Zelle bewertert?
Sachverhalt:
A1: 0123423; die erste Ziffer ist eine Null
A2: 1123423; die erste Ziffer ist keine Null
Der Zellinhalt (A1 und A2) stellt Filialnummern dar, die je nachdem ob vorne ei...
17.02.2010 14:13:20
Thread-ID: 1139231
3 Beiträge
wert suchen mit bedingung ab bestimmter spalte
martin

Hallo Zusammen,
ich brauche mal eben eure Hilfe. Und zwar will ich einen Wert suchen, klappt soweit auch ganz gut, allerdings soll er mir nicht den ersten wer anzeigen, sondern erst ab einer bestimmten spalte, die auch vorgegeben ist und sich auch ändern kann.
anbei die excel liste...vo...
18.04.2010 14:15:03
Thread-ID: 1152428
4 Beiträge
Anzeige
Kopieren von Werten nach Suche bestimmter Zeichenk
Werten

Hallo Zusammen,
ich habe eine Excel-Datei mit mehreren Tabellen.
In einer bestimmten Spalte eines dieser Arbeitsblätter möchte ich nun nach einer genauen Zeichenkette suchen und, wenn vorhanden, den Wert der benachbarten Zelle in ein bestimmtes Feld einer anderen Tabelle eintragen.
...
02.02.2011 15:14:21
Thread-ID: 1198638
2 Beiträge
Anzeige
Formel von festen Wert in Variable umstellen
festen

Hallo an Alle,
sitze bei einem Problem wieder mal fest.
ActiveCell.EntireColumn.Cells(neuZeile3, 11).Value = "=SUBTOTAL(9,R[2]C:R[485]C)"
schreibt mir in Zelle L11 ein Teilergebnis von L13-L498 ... klappt soweit auch.
nun möchte ich aber anstatt des Wertes 485 eine Variable eins...
11.01.2012 17:22:06
Thread-ID: 1245686
7 Beiträge
Texteingabe größer als 30 Zeichen teilen
Florian

Hallo zusammen,
ich habe mal wieder ein Problem, ich habe ein Makro geschrieben welches die Eingabe in Excel überwacht.
Wenn die Stringlänge größer 30 Zeichen ist soll der Inhalt in die zelle darunter geschrieben werden.
Funktioniert soweit super, es werden sogar Stringlängen von z....
09.08.2012 00:38:27
Thread-ID: 1274315
3 Beiträge
Fehler ab einer bestimmten Nachkommastelle?
Wolfango

Hallo zusammen,
in der hochgeladenen Datei habe ich ein (für mich) merkwürdiges Phänomen beschrieben.
Es scheint so, als rechnet Excel unter bestimmten Bedingungen nicht korrekt.
Vermutlich ist die Erklärung aber eine ganz andere.......?
Hier das Bsp mit Beschreibung:
http...
11.09.2012 18:08:22
Thread-ID: 1278170
5 Beiträge
Wert in Tabelle 2 suchen und Fundstellen übertrage
casantis

Hallo liebe Gemeinde,
Ich habe dieses Macro hier im Forum gefunden. Dabe werden die Werte aus Spalte A der Tabelle1 in Tabelle2 an beliebiger Stelle gesucht und die Werte aus den Spalten B:C der Fundzeile in dieses Blatt übernommen werden. Sub Uebetragen() Dim rng As Range Dim iRowL As Int...
26.10.2012 09:44:21
Thread-ID: 1283965
2 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