Hent filnavn fra anden fil.

Hvordan henter du data?

Jeg henter indholdet i en celle til en anden mellem 2 filer.

='C:\Calc.xlsm]akr1'!E234

Hvis der hvor du henter indholdet til er celle B5 og hvis du bruger Excel 2013+ så:

=MID(FORMULATEXT(B5);1;FIND("]";FORMULATEXT(B5)))

Hvad hedder formulartaxt i dansk version?

Jeg gætter på FORMELTEKST, men jeg har ikke en dansk version, så jeg kan ikke tjekke.

Det fungere ikke, desværre

Du får et tilsvarende kort svar som du selv giver.
Det fungerer fint for mig!

Okay, jeg prøver med en længere forklaring. Jeg har en dansk version.

=MIDT(FORMELTEKST(B5);1;FIND("]";FORMELTEKST(B5)))

Denne funktion, hvis det er korrekt, virker ikke. Jeg har forsøgt at google mig frem til om FORMELTEKST er korrekt, men det kan ikke lykkes at finde noget.

Er der nogle andre som har et bud på hvordan jeg får navnet på en anden excel fil ind i mit første ark.

Jeg har 2 filer: "mappe1" & "mappe2"

"mappe1" henter i kolonne B data fra "mappe2". Begge filer har kun et ark "Ark1".

  A  B
1  X  =[Mappe2]Ark1!A1
2  Y  =[Mappe2]Ark1!A2
3  Z  =[Mappe2]Ark1!A3

Jeg ønsker at celle A5 skal hvis filnavnet på den fil som hentes ind i kolonne B, alstå "mappe2" i dette eksempel.

Denne er lang, men kan vist klare det:
=MID(CELL("filename";[Mappe2.xls]Ark1!$A$2);SEARCH("[";CELL("filename";[Mappe2.xls]Ark1!$A$2))+1;SEARCH("]";CELL("filename";[Mappe2.xls]Ark1!$A$2))-SEARCH("[";CELL("filename";[Mappe2.xls]Ark1!$A$2))-1)

Og på dansk:
=midt(celle("filnavn"[Mappe2.xls]Ark1!$A$2);Søg("[";celle("filnavn";[Mappe2.xls]Ark1!$A$2))+1;søg("]";CELLe("filnavn";[Mappe2.xls]Ark1!$A$2))-Søg("[";CELLe("filnavn";[Mappe2.xls]Ark1!$A$2))-1)

VH
Anedi

Hej Anedi,

Jeg kan ikke få din funktion til at virke. Når jeg taster "Enter" kommer der et vindue frem "Opdatere værdier: Mappe2"?

Heidi

Prøv at skifte: [Mappe2.xls]Ark1!$A$2
ud med 'C:\Calc.xlsm]akr1'!E234, hvis det er den fil du henter dine oplysninger fra.

Vh
Anedi

Her er den fil jeg selv lavede.

http://web01.gratisupload.dk/f/8uyecni2k9/

Du skal selvfølgelig tilrette B5 til din egen fil som du vil hente noget fra.

Bemærkede du, at jeg i  #3 skrev:

... og hvis du bruger Excel 2013+ så: ...

Med andre ord - hvis du bruger en ældre version end 2013 virker det ikke for der findes funktionen FORMULATEXT/FORMELTEKST ikke.

Hvis du bruger ældre version end 20013 kan du i stedet for FORMELTEKST bruge følgende brugerdefinerede funktion (ShowFormula) der skal indsættes i et VBA-modul

Function ShowFormula(Cell)
Application.Volatile
    If Cell = "" Then
        ShowFormula = ""
  ElseIf Left(Cell.FormulaLocal, 1) <> "=" Then
        ShowFormula = Cell
    Else
        ShowFormula = Right(Cell.FormulaLocal, Len(Cell.FormulaLocal))
    End If
End Function