Ga naar hoofdinhoud

Hoe de actieve werkmaplocatie / pad in Excel te krijgen?

Soms opent u meerdere werkmappen tegelijkertijd en vergeet u de locaties van de werkmappen, en nu zal ik de methoden introduceren om de actieve werkmaplocatie / pad in Excel te krijgen.

Haal de werkmaplocatie op met formules

Haal de werkmaplocatie op met VBA

Haal de werkmaplocatie op met Kutools voor Excel goed idee 3

Open de map met Kutools voor Excelgoed idee 3


Haal de werkmaplocatie op met formules

In Excel kunt u de werkmaplocatie krijgen met de formule.

Selecteer een cel en selecteer een van de onderstaande formules en plak deze in de cel en druk op Enter om de locatie op te halen.

Om de werkmaplocatie te krijgen

= LINKS (CELL ("bestandsnaam", A1), FIND ("[", CELL ("bestandsnaam", A1)) - 1)

Om de werkmaplocatie en werkmapnaam op te halen

= SUBSTITUTE (LEFT (CELL ("filename", A1), FIND ("]", CELL ("filename", A1)) - 1), "[", "")

Om de werkmaplocatie, de werkmapnaam en de actieve werkbladnaam op te halen

= CELL ("bestandsnaam", A1)

Opmerkingen: Als u nog nooit een actieve werkmap hebt opgeslagen, retourneren de eerste twee formules #VALUE! fouten, terwijl de formule = CELL ("bestandsnaam", A1) blanco retourneert.


Haal de werkmaplocatie op met VBA

Als u wilt proberen de werkmaplocatie met VBA te krijgen, kunt u het onderstaande doen:

1. Schakel de werkmap in en druk op Alt + F11 toetsen om in te schakelen Microsoft Visual Basic voor toepassingen venster en klik op Invoegen > Module om een ​​modulevenster weer te geven.

2. Plak de onderstaande VBA-code in het Module venster.

VBA: toon werkmaplocatie

Sub DisplayWorkbookPath()
    MsgBox ActiveWorkbook.Path, vbInformation, "Workbook Path"
End Sub

3. klikken lopen knop, dan verschijnt er een dialoogvenster om het werkmappad voor je te tonen.

doc werkmaplocatie ophalen 1

Opmerking: Als u nog nooit een actieve werkmap hebt opgeslagen, zal deze VBA een leeg dialoogvenster weggooien. Zie screenshot:

doc werkmaplocatie ophalen 2

Als u de werkmaplocatie en werkmapnaam wilt weergeven, kunt u onderstaande VBA gebruiken:

VBA: toon werkmaplocatie en werkmapnaam

Sub DisplayWorkbookFullName()

    MsgBox ActiveWorkbook.FullName, vbInformation, "Workbook Complete Path"

End Sub

Haal de werkmaplocatie op met Kutools voor Excel

met Kutools for Excel's Voeg werkmapinformatie in hulpprogramma, kunt u de locatie van de werkmap ophalen en deze vervolgens invoegen in een cel die u nodig hebt.

Kutools for Excel, met meer dan 300 handige Excel-functies, verbeter uw werkefficiëntie en bespaar uw werktijd.

Na gratis installeren Kutools voor Excel, doe het als volgt:

1. Selecteer een cel waarin u een werkmaplocatie wilt invoegen en klik op Koetools Plus > werkboek > Voeg werkmapinformatie in. Zie screenshot:

doc werkmaplocatie ophalen 7

2. In de Voeg werkmapinformatie in dialoogvenster, vink de informatieoptie aan die u moet invoegen in de sectie Informatie, en dan kunt u ook specificeren om de informatie in cel, koptekst of voettekst in te voegen Invoegen op pagina.

doc werkmapinformatie invoegen

3. klikken Ok. Nu is de door u geselecteerde informatie ingevoegd.

doc werkmaplocatie ophalen 5

Opmerking: Als een actieve werkmap nog nooit eerder is opgeslagen, retourneert dit hulpprogramma de tekst van "Deze werkmap is nooit opgeslagen".

Klik hier voor meer informatie over Werkmapinformatie invoegen.


Open de map met Kutools voor Excel

Als u de map met de huidige werkmap wilt openen, kunt u ook solliciteren Bijbehorende map openen of Kutools for Excel.

Na gratis installeren Kutools voor Excel, doe het als volgt:

Activeer de werkmap waarvan u de map wilt openen en klik op Koetools Plus > werkboek > Bijbehorende map openen. Zie screenshot:

doc werkmaplocatie ophalen 8

Vervolgens wordt de map met de actieve werkmap geopend.

Beste Office-productiviteitstools

🤖 Kutools AI-assistent: Een revolutie teweegbrengen in de data-analyse op basis van: Intelligente uitvoering   |  Genereer code  |  Aangepaste formules maken  |  Analyseer gegevens en genereer grafieken  |  Roep Kutools-functies aan...
Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

Omschrijving


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thank you!!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations