Note: The other languages of the website are Google-translated. Back to English
Mewngofnodi  \/ 
x
or
x
Cofrestru  \/ 
x

or

Sut i argraffu taflen waith gyda chylchoedd dilysu yn Excel?

Mewn rhai achosion, efallai y byddwn yn cylchredeg rhywfaint o ddata annilys i'w gwneud yn rhagorol, ond, pan fydd angen i chi argraffu'r daflen waith gyda'r cylchoedd dilysu, ni fydd y cylchoedd yn cael eu hargraffu. Ydych chi erioed wedi dioddef gyda'r broblem hon yn Excel? Heddiw, byddaf yn dangos rhai triciau cyflym i chi i ddatrys y swydd hon.

Argraffu taflen waith gyda chylchoedd dilysu trwy eu pastio fel llun

Argraffu taflen waith gyda chylchoedd dilysu trwy ddefnyddio cod VBA

Tab Swyddfa Galluogi Golygu a Pori Tabbed yn y Swyddfa, a Gwneud Eich Gwaith yn Haws Orau ...
Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%
  • Ailddefnyddio Unrhyw beth: Ychwanegwch y fformwlâu, siartiau ac unrhyw beth arall a ddefnyddir fwyaf cymhleth i'ch ffefrynnau, a'u hailddefnyddio'n gyflym yn y dyfodol.
  • Mwy nag 20 o nodweddion testun: Rhif Detholiad o Llinyn Testun; Tynnu neu Dynnu Rhan o Testunau; Trosi Rhifau ac Arian Cyfred yn Eiriau Saesneg.
  • Uno Offer: Llyfrau Gwaith a Thaflenni Lluosog yn Un; Uno Celloedd Lluosog / Rhesi / Colofnau Heb Golli Data; Uno Rhesi a Swm Dyblyg.
  • Hollti Offer: Rhannwch Ddata yn Daflenni Lluosog Yn Seiliedig ar Werth; Un Llyfr Gwaith i Ffeiliau Lluosog Excel, PDF neu CSV; Un Golofn i Golofnau Lluosog.
  • Gludo Sgipio Rhesi Cudd / Hidlo; Cyfrif A Swm yn ôl Lliw Cefndir; Anfon E-byst wedi'u Personoli at Dderbynwyr Lluosog mewn Swmp.
  • Hidlo Gwych: Creu cynlluniau hidlo datblygedig a'u cymhwyso i unrhyw daflenni; Trefnu yn yn ôl wythnos, dydd, amlder a mwy; Hidlo gan feiddgar, fformwlâu, sylw ...
  • Mwy na 300 o nodweddion pwerus; Yn gweithio gyda'r Swyddfa 2007-2019 a 365; Yn cefnogi pob iaith; Defnydd hawdd yn eich menter neu sefydliad.

swigen dde glas saeth Argraffu taflen waith gyda chylchoedd dilysu trwy eu pastio fel llun


Yn Excel, ni allwn argraffu'r cylchoedd dilysu yn uniongyrchol, ond, gallwn gopïo a gludo'r ystod ddata gyda chylchoedd dilysu fel llun, ac yna ei argraffu.

1. Dewiswch yr ystod ddata rydych chi am argraffu'r cylchoedd.

2. Gwasgwch Ctrl + C allweddi ar fysellfwrdd i'w gopïo, ac yna ewch i daflen waith newydd, cliciwch un gell, a chliciwch ar y dde, dewiswch Gludo Arbennig > Llun, gweler y screenshot:

doc-print-cylchoedd-1

3. Ac yna mae eich dewis wedi'i gludo fel llun, a nawr pan fyddwch chi'n argraffu'r daflen waith newydd, bydd y cylchoedd yn cael eu hargraffu'n llwyddiannus.

doc-print-cylchoedd-1


swigen dde glas saeth Argraffu taflen waith gyda chylchoedd dilysu trwy ddefnyddio cod VBA

Os nad ydych yn hoffi gludo'r ystod ddata fel llun, gall y cod VBA canlynol eich helpu hefyd.

1. Ar ôl gosod y dilysiad data, daliwch y Alt + F11 allweddi yn Excel i agor y Ffenestr Microsoft Visual Basic for Applications.

2. Yna cliciwch Mewnosod > Modiwlau, a gludwch y macro canlynol yn y Ffenestr Modiwl.

Cod VBA: Mewnosod cylchoedd coch yn y data annilys

Sub AddValidationCirclesForPrinting()
'Update 20140724
Dim Rng As Range
Dim WorkRng As Range
Dim xCount As Integer
Dim xShape As Shape
On Error Resume Next
Set WorkRng = Application.ActiveSheet.Cells.SpecialCells(xlCellTypeAllValidation)
If WorkRng Is Nothing Then
    Exit Sub
End If
xCount = 0
For Each Rng In WorkRng
   If Not Rng.Validation.Value Then
       Set xShape = Application.ActiveSheet.Shapes.AddShape(msoShapeOval, Rng.Left - 2, Rng.Top - 2, Rng.Width + 4, Rng.Height + 4)
       xShape.Fill.Visible = msoFalse
       xShape.Line.ForeColor.SchemeColor = 10
       xShape.Line.Weight = 1.25
       xCount = xCount + 1
       xShape.Name = "InvalidData_" & xCount
   End If
Next
Exit Sub
End Sub

3. Ac yna pwyswch F5 allwedd i weithredu'r cod hwn, ac mae'r data annilys wedi'i gylchredeg â'r hirgrwn coch, gweler y screenshot:

doc-print-cylchoedd-1

4. Pan ewch i argraffu'r daflen waith hon sy'n cynnwys y cylchoedd coch, bydd y cylchoedd yn cael eu hargraffu hefyd.

Nodyn:

Gyda'r cod VBA hwn, ni fydd y cylchoedd yn cael eu tynnu gyda'r Excel's Cylchoedd Dilysu Clir nodwedd, os ydych chi am ddileu'r cylchoedd, cymhwyswch y cod isod.

Cod VBA: Tynnwch gylchoedd dilysu yn y daflen waith

Sub RemoveValidationCircles()
'Update 20140724
Dim xShape As Shape
For Each xShape In Application.ActiveSheet.Shapes
    If xShape.Name Like "InvalidData_*" Then
        xShape.Delete
    End If
Next
End Sub

Erthygl gysylltiedig:

Sut i gylchredeg data annilys yn Excel?


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.