Note: The other languages of the website are Google-translated. Back to English

Kako dovoliti zunanje osveževanje podatkov na zaščitenem delovnem listu v Excelu?

V Excel ste morda uvozili podatke iz drugih aplikacij z vgrajeno funkcijo - Pridobi zunanje podatke in uvožene podatke enostavno posodobili z gumbom Osveži vse. Po zaščiti delovnega lista pa je gumb Osveži vse onemogočen in uvoženih podatkov ni več mogoče posodobiti. Kako dovoliti zunanje osveževanje podatkov na zaščitenem delovnem listu? Metoda v tem članku vam lahko pomaga.

Dovoli osvežitev zunanjih podatkov na zaščitenem delovnem listu s kodo VBA


Dovoli osvežitev zunanjih podatkov na zaščitenem delovnem listu s kodo VBA

Spodnja koda VBA vam lahko pomaga osvežiti uvožene zunanje podatke po zaščiti delovnega lista v Excelu. Naredite naslednje.

1. Na zaščitenem delovnem listu pritisnite druga + F11 tipke hkrati, da odprete Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli, nato kopirajte in prilepite spodnji skript VBA v okno modula. Oglejte si posnetek zaslona:

Koda VBA: dovoli osvežitev zunanjih podatkov na zaščitenem delovnem listu

Sub DataRefresh()
'Update by Extendoffice 5/28/2019
    ActiveSheet.Unprotect "123"
    ActiveWorkbook.RefreshAll
    Application.OnTime Now + TimeValue("00:00:01"), "DataRefresh2"
End Sub
Sub DataRefresh2 ()
    If Application.CommandBars.GetEnabledMso("RefreshStatus") Then
        Application.OnTime Now + TimeValue("00:00:01"), " DataRefresh2"
    Else
        ActiveSheet.Protect "123"
    End If
End Sub

Opombe: V kodi VBA je »123« geslo, ki smo ga določili za zaščito delovnega lista. Prosimo, spremenite ga glede na vaše potrebe.

3. Prepričajte se, da je kazalec v prvem odseku kode Sub DataRefresh, in nato pritisnite F5 tipko za zagon kode. V pojavnem oknu Uvozi datoteko v pogovornem oknu izberite zunanjo datoteko, iz katere ste uvozili podatke, in nato kliknite uvoz gumb.

Po vrnitvi na delovni list lahko vidite, da se zunanji podatki takoj posodabljajo.

Opombe: Ta koda lahko osveži zunanje podatke na zaščitenem delovnem listu, ki je uvožen iz Accessa, Besedila in Excelove datoteke.


Sorodni članki:


Najboljša orodja za pisarniško produktivnost

Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%

  • Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
  • Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
  • Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
  • Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
  • Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
  • Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
  • Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
  • Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
  • Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.
zavihek kte 201905

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!
dno pisarniške mize
Komentarji (3)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
Dzięki bardzo pomocne makro. Pozdrawiam
Ta komentar je moderator na spletnem mestu minimiziral
bolj preprost način je opisan tukaj: https://stackoverflow.com/a/22088630/1349511

Ta delovni zvezek.RefreshAll
DoEvents
' se ne bo nadaljevala, preden je osvežitev končana
Ta komentar je moderator na spletnem mestu minimiziral
oprostite, napačno - najprej preberite komentarje na stackoverflow!
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL