Gå til hovedindhold

Hvordan anvender jeg en knap til at åbne en anden projektmappe i Excel?

I et regneark kan vi indsætte et hyperlink for at linke en anden projektmappe, så den kan åbnes hurtigt og nemt. Men har du nogensinde prøvet at oprette en knap for at åbne en anden projektmappe gennem aktiv projektmappe?

Anvend en knap for at åbne en anden projektmappe med VBA-kode


pil blå højre boble Anvend en knap for at åbne en anden projektmappe med VBA-kode

I Excel kan vi indsætte en formknap og derefter linke en kode til den. Du kan løse dette job med følgende trin:

1. Klik indsatte > Former > rektangel, se skærmbillede:

doc-knap for at åbne projektmappe 1

2. Træk derefter musen for at tegne en formknap, og formater den efter dit behov, se skærmbillede:

doc-knap for at åbne projektmappe 2

3. Og hold så nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

4. Klik indsatte > Moduler, og indsæt følgende kode i Moduler Vindue.

VBA-kode: Åbn en specifik projektmappe:

Sub Openworkbook_Click()
'Updateby Extendoffice
    Dim xWb As Workbook
    Dim wbName As String
    On Error Resume Next
    Set xWb = Workbooks.Open("C:\Users\DT168\Desktop\test\Book2.xlsx")
    wbName = xWb.Name
    If Err.Number <> 0 Then
        MsgBox "This workbook does not exist!", vbInformation, "Kutools for Excel"
        Err.Clear
    Else
        MsgBox "This workbook is opened!", vbInformation, "Kutools for Excel"
    End If
End Sub

Bemærk: I ovenstående kode skal du ændre filstien og navnet C:\Users\DT168\Desktop\test\Book2.xlsx til den rigtige vej til den projektmappe, du vil linke til.

5. Gem og luk derefter dette kodevindue, højreklik på den formknap, du har oprettet, vælg Tildel makro fra genvejsmenuen, i poppet ud Tildel makro dialogboksen skal du klikke på makronavnet Openworkbook_Klik du har indsat lige nu, og klik OK knap, se skærmbillede:

doc-knap for at åbne projektmappe 3

6. Nu, når du klikker på formknappen:

(1.) Hvis projektmappen ikke eksisterer, får du følgende promptboks:

doc-knap for at åbne projektmappe 4

(2.) Hvis projektmappen findes, åbnes den med det samme, og der vises også en promptboks for at minde dig om:

doc-knap for at åbne projektmappe 5

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I keep on receiving this workbook does exist whilst I input the correct file path and name to the real path of the workbook?
This comment was minimized by the moderator on the site
Thank you so much. I'm from Venezuela, I needed a cod that works and this works excellently well. Regards...
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations