Unverträgliche typen beim splitten..
23.09.2004 10:04:12
Robert
Ich habe hier ein kleines Problem.
Kann den Fehler aber selbst nicht erkennen, schaut meiner Meinung nach ok aus ;)
Sub DateinamenAuslesen()
Dim source As String
Dim str1 As String
Dim str2 As String
source = ActiveCell.Formula
str1 = Split(source, "[")
str2 = Split(str1, "]")
str2 = "_" & str2
Range("A1") = str2
End Sub
Sobald er das erste mal splitten will bekomme ich die Meldung "Typen unverträglich".
In "source" ist ein Verknüpfungspfad, bei dem ich nur den Dateinamen auslesen will.
z.B. ='M:\Projekte\Muster\[Musterdatei.xls]Übersicht'!$E$24
Musterdatei.xls soll anschließend ausgegeben werden können.
Ich bin für jede Hilfe dankbar!