Skip to main content

Conas athnuachan sonraí seachtracha a cheadú sa bhileog oibre faoi chosaint in Excel?

B’fhéidir go ndearna tú sonraí a iompórtáil ó fheidhmchláir eile chuig Excel lena fheidhm thógála - Faigh Sonraí Seachtracha, agus na sonraí iompórtáilte a nuashonrú go héasca tríd an gcnaipe Athnuachan Uile. Tar éis an bhileog oibre a chosaint, áfach, tá an cnaipe Refresh All díchumasaithe agus ní féidir na sonraí iompórtáilte a nuashonrú a thuilleadh. Conas athnuachan sonraí seachtracha a cheadú sa bhileog oibre faoi chosaint? Is féidir le modh san alt seo cabhrú leat.

Lig do shonraí seachtracha athnuachan a dhéanamh ar an mbileog oibre faoi chosaint le cód VBA


Lig do shonraí seachtracha athnuachan a dhéanamh ar an mbileog oibre faoi chosaint le cód VBA

Is féidir leis an gcód VBA thíos cabhrú leat sonraí seachtracha allmhairithe a athnuachan tar éis duit an bhileog oibre in Excel a chosaint. Déan mar a leanas le do thoil.

1. Sa bhileog oibre faoi chosaint, brúigh an Eile + F11 eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúil, ansin cóipeáil agus greamaigh an script VBA thíos i bhfuinneog an Mhodúil. Féach an pictiúr:

Cód VBA: Lig athnuachan sonraí seachtracha ar an mbileog oibre faoi chosaint

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

nótaí: Sa chód VBA, is é “123” an focal faire a shonraigh muid chun an bhileog oibre a chosaint. Athraigh é le do thoil bunaithe ar do chuid riachtanas.

3. Déan cinnte go bhfuil do chúrsóir sa chéad chuid de chód Sub DataRefresh, agus ansin brúigh an F5 eochair chun an cód a rith. Sa popping suas Iompórtáil Comhad bosca dialóige, roghnaigh an comhad seachtrach as a ndearna tú sonraí a allmhairiú, agus ansin cliceáil ar an Iompórtáil cnaipe.

Tar éis duit filleadh ar an mbileog oibre, is féidir leat a fheiceáil go ndéantar na sonraí seachtracha a nuashonrú láithreach.

nótaí: Is féidir leis an gcód seo na sonraí seachtracha a athnuachan i mbileog oibre faoi chosaint a allmhairítear ón gcomhad Rochtana, Téacs chomh maith le comhad Excel.


Earraí gaolmhara:

Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am.  Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...

Tuairisc


Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
sorry, incorrect - read comments at stackoverflow first!
This comment was minimized by the moderator on the site
a more simple way is described here: https://stackoverflow.com/a/22088630/1349511

ThisWorkbook.RefreshAll
DoEvents
' code will not continue before Refresh finished
This comment was minimized by the moderator on the site
Dzięki bardzo pomocne makro. Pozdrawiam
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations