Hvordan du raskt trekke filnavn fra full bane i Excel?

In Excel, kan du bruke under formel for raskt å trekke ut bare filnavn fra hele banen. Anmeldelser Velg en tom celle og skriver denne formelen = MID (A1, FINN ("*", erstatte (A1, "\\", "*", LEN (A1) -LEN (bytt ut (A1, "\\", "")))) + 1, LEN (A1)) Anmeldelser (A1 er den cellen som du vil trekke ut filnavnet fra), og trykk Enter-knappen, og dra fyllhåndtaket til å fylle området du vil. Etter det, er filnavnet hentet fra hver celle

Extract filnavn fra full bane med brukerdefinerte funksjonen
Med følgende brukerdefinerte funksjonen, kan du få filnavnet enkelt og raskt.
1.. Hold nede ALT + F11-tastene for å åpne Microsoft Visual Basic for Applications Window.
2. Klikk Sett > Modul, og lim inn følgende kode i modulen Window.
Funksjon FunctionGetFileName (FullPath As String) As String'Update 20140210Dim splitList Som VariantsplitList = VBA.Split (FullPath, "\\") FunctionGetFileName = splitList (UBound (splitList, en )) End Function3. Deretter lagre og lukke vinduet, og deretter gå tilbake til regnearket, i en tom celle, B1 for eksempel skriver inn denne formelen = FunctionGetFileName (A1), se skjermbilde:
4. Og trykk Enter-tasten, og velg deretter celle B1, og drar fyllhåndtaket til området som du ønsker å bruke denne formelen, har alle filnavnene er skilt fra de fulle baner som følgende resultat:

Extract filnavn fra full bane med VBA-kode
Foruten den brukerdefinerte funksjonen, en VBA-kode kan også hjelpe deg til å trekke ut filnavnene. Vennligst gjør som dette:
1. Hold nede ALT + F11-tastene for å åpne Microsoft Visual Basic for Applications Window.
2. Klikk Sett > Modul, og lim inn følgende kode i modulen Window.
Sub GetFileName () 'Update 20140210Dim RNG Som RangeDim WorkRng Som RangeDim splitList Som VariantOn Error Resume NextxTitleId = "KutoolsforExcel" Set WorkRng = Application.SelectionSet WorkRng = Application.InputBox ( "Range", xTitleId, WorkRng.Address, Type: = 8) For Hver RNG I WorkRng splitList = VBA.Split (Rng.Value, "\\") Rng.Value = splitList (UBound (splitList, 1)) NextEnd Sub3. Deretter trykker F5 for å kjøre denne koden, og velg området som du vil trekke ut filnavnet fra, se skjermbilde:
4. Og klikk deretter på OK, filnavnene er hentet fra utvalget som følger:
Merk: Med denne VBA-kode, vil de opprinnelige dataene bli ødelagt, så du bør kopiere en før du bruker denne koden
<. h4> Extract filnavn fra full bane med Split Cell nytten av Kutools for Excel
Med Split Cells nytten av Kutools for Excel, kan du enkelt dele celle med full bane, og få filnavnet umiddelbart. Gjør følgende
Kutools for Excel. Med mer enn 120 praktiske Excel-tillegg, gratis å prøve uten begrensning i 60 dager. Gå til DownloadFree Trial 60 daysPurchasePayPal /MyCommerce 1. Merk området med hele banen du vil trekke filnavnet, og klikk deretter Kutools > Tekst > Split Cells. Se skjermbilde:
to. I dialogboksen Del celler boksen velger du det andre alternativet, skriver du inn "\\" symbol inn under boksen, og klikk deretter på OK-knappen
3.. I dukker opp dialogboksen velger en tom celle for å finne de delte verdier, og klikk deretter på OK-knappen.
Så du kan se filnavnene er hentet fra de valgte fulle baner. Se skjermbilde:
Hvis dette verktøyet er nyttig, kan du laste ned og prøve den gratis prøveversjon nå! Enkelt sette inn arbeidsbok navn inn i cellen, topp- eller bunn en side i Excel med Kutools for Excel Sett arbeidsbok informasjonsverktøyet, kan du enkelt sette inn noen form for arbeidsbok informasjon i regnearket, slik som arbeidsbok navn, regneark navn, arbeidsbok bane og så videre. se skjermbilde: Les mer om denne funksjonen. Gratis Last ned Kutools for Excel nå