Kako vedno pri celici A1 pri odpiranju delovnega zvezka?
Kot vsi vemo, bo ob odprtju delovnega zvezka prikazan položaj celice, kjer ste ga nazadnje shranili in zaprli. Kako lahko vedno odprete delovni zvezek z vsakim listom v določeni celici A1? Ta članek bo govoril o nekaterih načinih za njegovo rešitev.
Vedno odprite delovni zvezek z vsakim listom v celici A1 s kodo VBA
Vedno odprite delovni zvezek na določenem listu in celici A1 s kodo VBA
Vedno odprite delovni zvezek z vsakim listom v celici A1 s kodo VBA
Na primer, vedno želite, da se delovni zvezek odpre v celici A1 vsakega delovnega lista, ne glede na to, kje ste bili v delovnem zvezku, ko je bil nazadnje zaprt. Naredite naslednje:
1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno. Na levi Projekt-VBAProjekt podokno, dvokliknite Ta delovni zvezek če želite odpreti prazen modul, nato pa v modul kopirajte in prilepite naslednjo kodo, glejte sliko zaslona:
Koda VBA: Vedno odprite delovni zvezek z vsakim listom v celici A1:
Private Sub Workbook_SheetActivate(ByVal Wsh As Object)
'Updateby Extendoffice
On Error Resume Next
Wsh.Range("A1").Select
End Sub
2. Nato zaprite to kodo in kliknite file > Shrani kot da shranite delovni zvezek kot Excelov delovni zvezek z omogočeno makro format, glej posnetek zaslona:
3. Od zdaj naprej, ko naslednjič odprete ta delovni zvezek, kliknite Omogoči vsebino za aktiviranje kode in preklapljanje med listi lahko vidite, da je vsak delovni list samodejno v celici A1.
Vedno odprite delovni zvezek na določenem listu in celici A1 s kodo VBA
Če morate ob vsakem zagonu delovnega zvezka samo odpreti določen list v celici A1, vam bo morda v pomoč naslednja koda VBA.
Na primer, vedno želim iti na List1 v celici A1, ko odpiram delovni zvezek.
1. Drži dol ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno. Na levi Projekt-VBAProjekt podokno, dvokliknite Ta delovni zvezek če želite odpreti prazen modul, nato pa v modul kopirajte in prilepite naslednjo kodo, glejte sliko zaslona:
Koda VBA: Vedno odprite delovni zvezek s posebnim listom v celici A1:
Private Sub Workbook_Open()
'Updateby Extendoffice
Application.Goto ThisWorkbook.Sheets("Sheet1").Range("A1"), True
End Sub
Opombe: V zgornji kodi, Sheet1 in A1 so referenčni list delovnega lista in celice, na katerega želite odpreti delovni zvezek. Lahko jih spremenite po svojih potrebah.
2. Nato zaprite to kodo in kliknite file > Shrani kot da shranite delovni zvezek kot Excelov delovni zvezek z omogočeno makro format, od zdaj naprej, ko naslednjič odprete ta delovni zvezek, kliknite Omogoči vsebino za aktiviranje kode in bo samodejno prešla na Sheet1 v celici A1.
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!