Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
444to448
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
444to448
444to448
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Angabe aus Zeichenkette filtern

Angabe aus Zeichenkette filtern
21.06.2004 21:21:22
Markus
Hallo und guten Abend,
ich brauche bitte Eure Hilfe und zwar:
hole ich mir per Code aus einer Zeile die Formel, z.B.:
frm = WBBetrieb.Sheets("Leer").Range("B14").FormulaR1C1
Ergebnis:
='C:\MRS\PL04T\[TB1.xls]Leer'!$A$1
jetzt möchte in eine weiter Variable aber nur den Wert einlesen der zwischen der eckigen Klammer steht, also:
wkb = "TB1.xls"
Wie bekomme ich dies hin.
Die Angabe über die Verknüpfte Mappe bekomme ich nur aus der Formel in der Zelle.
Danke schonmal
Markus

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Angabe aus Zeichenkette filtern
21.06.2004 21:39:02
Karin
Hallo Markus,
das Problem läßt sich mit INSTR lösen.
Ergebnis = "'C:\MRS\PL04T\[TB1.xls]Leer'!$A$1"
wkb = Mid(Ergebnis, InStr(1, Ergebnis, "[") + 1, InStr(1, Ergebnis, "]") - InStr(1, Ergebnis, "[") - 1)
Gruß Karin
AW: Angabe aus Zeichenkette filtern
FP
Hallo Markus,
kleines Beispiel:

Sub Demo()
Dim strFormel   As String
strFormel = "='C:\MRS\PL04T\[TB1.xls]Leer'!$A$1"
strFormel = Left$(strFormel, InStr(strFormel, "]") - 1)
strFormel = Mid$(strFormel, InStr(strFormel, "[") + 1)
MsgBox strFormel
End Sub

Servus aus dem Salzkammergut
Franz
Danke habt mir sehr geholfen
21.06.2004 22:08:46
Markus
MFG
Markus
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige