Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
25.09.2025 16:01:26
VBA - Laufzeitfehler 9105 zu viele Zeichen 255
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
384to388
384to388
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Suchmakro (enthaltener Text), Hyperlink ....

Forumthread: Suchmakro (enthaltener Text), Hyperlink ....

Suchmakro (enthaltener Text), Hyperlink ....
23.02.2004 16:02:02
Phreaker
Hallo erstmal,
ich versuche einen Makro zu schreiben, der die Dateien eines Ordner nach enthaltenem Text durchsucht!
Die Dateien dir gefunden wurden, sollen dann als Hyperlink aufgelistet werden.
Kennt jemand die Schlüsselbefehle, die dafür notwendig sind???
Vielen Dank im vorraus für deine Antwort!
mfg Phreaker
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Suchmakro (enthaltener Text), Hyperlink ....
23.02.2004 18:04:16
K.Rola
Hallo,
Beispiel:
Option Explicit

Sub Inhalt_zu_Hyperlink()
Const VERZEICHNIS As String = "C:\Eigene Dateien\Excel\"
Dim strDatei As String, lngZ As Long
If Dir(VERZEICHNIS, vbDirectory) = "" Then
MsgBox VERZEICHNIS & " wurde nicht gefunden!" & Space(10), 64, "weise hin..."
Exit Sub
End If
Columns(1).ClearContents
strDatei = Dir(VERZEICHNIS & "*.*")
[a1] = VERZEICHNIS
[a2] = strDatei
lngZ = 3
Do While strDatei <> ""
strDatei = Dir()
Cells(lngZ, 1) = strDatei
ActiveSheet.Hyperlinks.Add Anchor:=Cells(lngZ, 1), Address:=VERZEICHNIS & strDatei
lngZ = lngZ + 1
Loop
End Sub


Gruß K.Rola
Anzeige
;

Forumthreads zu verwandten Themen

Kriterien in Query aus Exceltabelle
Joachim

Hallo zusammen,
ich hab heute entdeckt, dass ich mit dem Query direkt auf meine Oracle-DB komme. Mal wieder was neues gelernt.
Ich habe die Abfrage im Query mit Kriterien gebastelt und übergebe das Ergebnis nach Excel. Alles wunderschön. Nur sehr statisch.
Ich möchte aber per VBA:
20.11.2008 15:52:00
Thread-ID: 1026469
2 Beiträge
Öffnen einer xlt - Vorlage per Hyperlink
Alfons

Hallo Zusammen
Ich hab da ein Problem.
Ich hab ein Excel - Menue erstellt und möchte in diesem Menue Kollegen
xlt Vorlagen zur Verfügung stellen.
Auf einem Tabellenblatt öffnet sich die Vorlage wie gewollt, so dass beim Speichern
das "Speichern unter ...." Menue erscheint.<...
17.12.2008 09:31:00
Thread-ID: 1033522
3 Beiträge
Minisymbolleiste Excel 2007
Susanne

Hallo,
selbst wenn ich das Häkchen bei den Excel-Optionen aus mache, erscheint diese Minisymbolleiste bei einem Rechtsklick auf eine Markierung - zusätzlich zum herkömmlichen Rechtsklick-Menü. Wie wird man die los?
18.01.2009 05:50:00
Thread-ID: 1041046
7 Beiträge
Dateiinhalt mit Hyperlinks in Excel ausgeben
PaMa

Guten Tag zusammen
Ich hoffe, Ihr VBA - Profis könnt mich hier bei meiner aktuellen Problemstellung unterstützen.
Und zwar hab ich folgendes vor:
in einer Excel - Arbeitsmappe hab ich einen Knopf
Wenn ich auf diesen Knopf klicke so soll folgendes geschehen:
- Der Dateiinhalt...
23.01.2009 07:15:00
Thread-ID: 1042795
4 Beiträge
Anzeige
Zelladresse in Code mit - Syntaxfrage
Peter

Guten Tag
Innerhalb eines Codes füge ich eine neue Codezeile ein. Dabei gibt mir "Variante 1" für die Zeile 5 den richtigen Wert.
Nun möchte ich G5 ersetzen, damit in jeder Schlaufe der richtige Wert resultiert.
Anstatt G5 schreibe ich für G
[spName].column ' dies ergibt die Zah...
11.02.2009 08:54:00
Thread-ID: 1049441
7 Beiträge
Formel Textteilstring dynamisch extrahieren
Horst_H

Hallo,
seit Stunden probiere ich bislang leider ergebnislos eine Formel zu erstellen:
Quelle:
"S2001W.rar;http://www.netload.in/dateigTTIDfQowZ/S2001W.rar.htm;93.32
MB;0;12.02.2009"
Ergebnis soll sein der string zwischen dem 1. und dem 2. Semikolon, weil die Testlänge unters...
19.02.2009 13:50:00
Thread-ID: 1052127
6 Beiträge
Anzeige
Text:Hyperlink makro zuweisen
Tobias

Ahoi allerseits,
Ich möchte einem text ein sortierungs-makro zuweisen.
Ich könnte jetzt ein textfeld aufziehen, so gings mit rechtermaustaste-zuweisen ganz einfach
kann ich es aber auch direkt auf den text legen?
sozusagen ein hyperlink zum makro ?
besten dank,
tobias
23.02.2009 20:08:37
Thread-ID: 1053274
4 Beiträge
wieso geht das nicht?
reto

Private Sub Label18_Click() If Label18_Click.Value > Label1_Click.Caption Then Label18_Click.Caption = 24 End If End Sub
Vielen Dank für die Hilfe!
Gruss Reto
24.03.2009 15:15:56
Thread-ID: 1063373
21 Beiträge
Info in Symbolleiste oder Extrafenster
Oliver

Hallo.
Wie kann ich, zum Beispiel die Spalte und Reihe, in einer Symbolleiste oder einem Extrafenster (sollte immer im Vordergrund sein - als Info!!) mir anzeigen lassen?
Danke
Oliver
20.04.2009 13:22:22
Thread-ID: 1069799
17 Beiträge
Ausgabeverknüpfung, wie geht das?
hroth

Hallo Excel-Freunde
Ich arbeite auf einem Mac (Mac OS X, Excel 2004). Auf dem Eingabeformular für dieses Forum ist die Excel-Version 2004 für den Max nicht aufgeführt. Daher meine ergänzenden Informationen!
Ich arbeite an einem Reservationssystem für ein Hotel. Dabei habe ich eine Arbei...
23.05.2009 19:03:32
Thread-ID: 1076883
2 Beiträge
kleines Syntaxproblem
Jörg

Guten Abend zu später Stunde!
wenn die Tabellenblätter FG0, FG1, FG2 usw heißen, hole ich mir von da einen bestimmten Wert mit zB der simplen Formel =FG0!E2 ins Blatt xyz
Jetzt ist in Blatt xyz in Zelle B2 dieser Blattname mit noch was dran vorhanden, zB FG0Meier
Nun will ich mich a...
22.06.2009 23:30:21
Thread-ID: 1083626
4 Beiträge
VBA: GoalSeek mit Schätzwert --Wie geht das?
Gho-Reg

Private Sub CommandButton2_Click() 'C39 = Ergebnisrendite 'C15 = Zielrendite 'F28 = hochkontierte Gewinnmarge Range("C39").GoalSeek Goal:=Range("C15"), ChangingCell:=Range("F28") End Sub
Das ist mein derzeitiger code. Der funktioniert auch problemlos. Nur durch die Beschränkung der Näher...
26.06.2009 22:57:57
Thread-ID: 1084667
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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