Skip i'r prif gynnwys

Sut i gydamseru holl daflenni gwaith y llyfr gwaith gyda'r un ystod wedi'i ddewis yn Excel?

Pan ddefnyddiwn lyfr gwaith excel, weithiau, mae angen i ni ddewis yr un ystodau o daflenni gwaith lluosog mewn llyfr gwaith a'u cydamseru i edrych ar y wybodaeth yn hawdd ac yn gyfleus. Bydd y dulliau canlynol yn gwneud ichi gydamseru taflenni gwaith i gael yr un ystodau mewn llyfr gwaith yn gyflym ac yn hawdd.

taflenni gwaith doc-same-range-5 taflenni gwaith doc-same-range-6

Dewiswch yr un ystodau ym mhob taflen waith gyda Select All Sheets

Cydamserwch yr holl daflenni gwaith o'r un ystod yn gyflym ag un clic

Defnyddio cod VBA i gydamseru taflenni gwaith


Dewiswch yr un ystodau ym mhob taflen waith gyda Select All Sheets

Gallwch wneud i bob taflen waith gael yr un ystod wedi'i dewis mewn llyfr gwaith fel a ganlyn:

1. Dewiswch ystod yn y daflen waith weithredol rydych chi am ei dewis ym mhob taflen waith. Er enghraifft yr ystod A103: C112

2. Yna cliciau dde ar y tab taflen waith, a dewis Dewiswch Pob Dalen o'r ddewislen. Gweler y screenshot:

taflenni gwaith doc-same-range-1

3. Bydd yr un ystod yn cael ei dewis yn yr holl daflenni gwaith yn y llyfr gwaith.

Nodyn: i ddewis yr un amrediad ym mhob taflen waith gyda'r ffordd hon, dim ond yr un amrediad ym mhob taflen waith y gall ei ddewis, ond ni all arddangos yr holl ystodau a ddewiswyd yn yr un safle â'r ffenestr.

Cydamserwch yr holl daflenni gwaith yn gyflym i'r un ystod ag un clic

Os ydych chi wedi gosod Kutools ar gyfer Excel, gallwch chi ddefnyddio'r Cydamseru Taflenni Gwaith nodwedd i gydamseru pob taflen waith yn hawdd i gael yr un ystod â'r canlynol:

Kutools ar gyfer Excel: gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod. Get it Now

1. Gweithredwch daflen waith a dewiswch yr ystod rydych chi am ei defnyddio.

2. Cliciwch Menter > Offer Taflen Waith > Cydamseru Taflenni Gwaith, gweler y screenshot:

taflenni gwaith doc-same-range-3

3. A bydd blwch prydlon yn galw allan i'ch atgoffa y bydd gan bob taflen waith yn y llyfr gwaith yr un amrediad dethol a chell chwith uchaf.

taflenni gwaith doc-same-range-4

4. Yna cliciwch OK, mae'r holl daflenni gwaith wedi'u cydamseru, pan fyddwch chi'n llywio rhwng yr holl daflenni gwaith, mae gan bob taflen waith yr un ystod. Gweler sgrinluniau:

taflenni gwaith doc-same-range-5 taflenni gwaith doc-same-range-6
taflenni gwaith doc-same-range-7 taflenni gwaith doc-same-range-8
Nodyn: Os gwiriwch Peidiwch â dangos i mi y tro nesaf yn y Cydamseru Taflenni Gwaith blwch prydlon, ni fydd y blwch hwn yn ymddangos pan fyddwch chi'n defnyddio'r nodwedd hon y tro nesaf.

Awgrymiadau:

Defnyddio cod VBA i gydamseru taflenni gwaith

Gan ddefnyddio'r cod VBA canlynol, gallwch chi wneud yn gyflym i bob taflen waith gael yr un amrediad wedi'i dewis ac arddangos yr ystod a ddewiswyd yn yr un safle â'r ffenestr.

1. Dewiswch ystod mewn un daflen waith, ac yna cliciwch Datblygwr >Visual Basic, Newydd Microsoft Visual Basic ar gyfer ffenestr cymwysiadau yn cael ei arddangos,

2. cliciwch Mewnosod > Modiwlau, ac yna copïo a gludo'r codau canlynol yn y modiwl:

VBA: cydamseru holl daflenni gwaith llyfr gwaith

Sub SynchSheets()
'Update 20130912
Dim WorkShts As Worksheet
Dim sht As Worksheet
Dim Top As Long
Dim Left As Long
Dim RngAddress As String
Application.ScreenUpdating = False
Set WorkShts = Application.ActiveSheet
Top = Application.ActiveWindow.ScrollRow
Left = Application.ActiveWindow.ScrollColumn
RngAddress = Application.ActiveWindow.RangeSelection.Address
For Each sht In Application.Worksheets
    If sht.Visible Then
        sht.Activate
        sht.Range(RngAddress).Select
        ActiveWindow.ScrollRow = Top
        ActiveWindow.ScrollColumn = Left
    End If
Next sht
WorkShts.Activate
Application.ScreenUpdating = True
End Sub

3. Yna cliciwch taflenni gwaith doc-same-range-2 botwm neu F5 yn allweddol i weithredu'r cod, bydd yr un ystod yn cael ei dewis ym mhob un o'r taflenni gwaith ac yn arddangos yr ystodau a ddewiswyd yn yr un safle ffenestr.

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations