Hvordan skal man altid i celle A1, når man åbner projektmappe?
Som vi alle vidste, når du åbner en projektmappe, viser den cellepositionen, hvor du gemte og lukkede den sidste gang. Hvordan kan du altid fortsætte med at åbne en projektmappe med hvert ark i en bestemt celle A1? Denne artikel vil tale om nogle måder at løse det på.
Åbn altid en projektmappe med hvert ark i celle A1 ved hjælp af VBA-kode
Åbn altid en projektmappe på et bestemt ark og celle A1 ved hjælp af VBA-kode
Åbn altid en projektmappe med hvert ark i celle A1 ved hjælp af VBA-kode
For eksempel vil du altid have, at projektmappen skal åbnes i celle A1 i hvert regneark, uanset hvor du var i projektmappen, da den sidst blev lukket. Gør følgende:
1. Hold nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue. I venstre side Projekt-VBAProjekt dobbeltklik på ruden ThisWorkbook for at åbne et tomt modul og derefter kopiere og indsætte følgende kode i modulet, se skærmbillede:
VBA-kode: Åbn altid en projektmappe med hvert ark i celle A1:
Private Sub Workbook_SheetActivate(ByVal Wsh As Object)
'Updateby Extendoffice
On Error Resume Next
Wsh.Range("A1").Select
End Sub
2. Luk derefter denne kode, og klik filet > Gem som for at gemme projektmappen som Excel-makroaktiveret projektmappe format, se skærmbillede:
3. Fra nu af, når du åbner denne projektmappe næste gang, skal du klikke på Aktivér indhold for at aktivere koden og skifte mellem arkene kan du se, at hvert regneark automatisk findes i celle A1.
Åbn altid en projektmappe på et bestemt ark og celle A1 ved hjælp af VBA-kode
Hvis du bare skal åbne et specifikt ark i celle A1, når du starter projektmappen hver gang, kan følgende VBA-kode måske hjælpe dig.
For eksempel vil jeg altid gå til Sheet1 i celle A1, når jeg åbner projektmappen.
1. Hold nede i ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue. I venstre side Projekt-VBAProjekt dobbeltklik på ruden ThisWorkbook for at åbne et tomt modul og derefter kopiere og indsætte følgende kode i modulet, se skærmbillede:
VBA-kode: Åbn altid en projektmappe med et specifikt ark i celle A1:
Private Sub Workbook_Open()
'Updateby Extendoffice
Application.Goto ThisWorkbook.Sheets("Sheet1").Range("A1"), True
End Sub
Bemærk: I ovenstående kode, Sheet1 , A1 er det regneark og den cellehenvisning, du vil gå til, når du åbner projektmappen. Du kan ændre dem til dit behov.
2. Luk derefter denne kode, og klik filet > Gem som for at gemme projektmappen som Excel-makroaktiveret projektmappe format, fra nu af, når du åbner denne projektmappe næste gang, skal du klikke på Aktivér indhold for at aktivere koden, og den går automatisk til Sheet1 i celle A1.
Bedste kontorproduktivitetsværktøjer
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...
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!