Sut i argraffu colofnau dethol gyda'i gilydd ar un dudalen yn Excel?
Yn ddiofyn, mae Excel yn rhannu sawl colofn ddethol yn dudalennau wedi'u gwahanu wrth argraffu. Os ydych chi eisiau argraffu colofnau dethol gyda'i gilydd ar un dudalen, beth fyddech chi'n ei wneud? Bydd yr erthygl hon yn dangos dulliau i chi ei gyflawni.
Argraffu colofnau dethol ynghyd â chod VBA
Argraffu colofnau dethol yn hawdd ynghyd ag offeryn anhygoel
Argraffu colofnau dethol ynghyd â chod VBA
Gallwch argraffu sawl colofn ddethol gyda'i gilydd ar un dudalen gyda chod VBA. Gwnewch fel a ganlyn.
1. Gwasgwch Alt + F11 allweddi ar yr un pryd i agor y Microsoft Visual Basic ar gyfer Cymhwyso ffenestr.
2. Yn y Microsoft Visual Basic ar gyfer Cymhwyso ffenestr, cliciwch Mewnosod > Modiwlau. Ac yna copïo a gludo gan ddilyn y cod VBA i mewn i ffenestr y Modiwl.
Cod VBA: Argraffu colofnau dethol gyda'i gilydd
Sub Print_MultiAreas()
Dim xRg As Range
Dim xSht As Worksheet
Dim xArea As Range
Dim xTxt As String
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select columns:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xSht = Worksheets.Add(After: = Sheets(Sheets.Count))
For Each xArea In xRg.Areas
xArea.Copy Destination: = xSht.Range(xArea.Address)
xSht.Range(xArea.Address).Value = xArea.Value
Next
xSht.PrintPreview
'xSht.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
Application.DisplayAlerts = False
xSht.Delete
Application.DisplayAlerts = True
xRg.Parent.Activate
End Sub
3. Gwasgwch y F5 allwedd i redeg y cod. Yna a Kutools ar gyfer Excel blwch deialog yn ymddangos, dewiswch y colofnau sydd eu hangen arnoch i argraffu fesul un gan ddal y Ctrl allwedd. Ac yn olaf cliciwch y OK botwm. Gweler y screenshot:
4. Yna fe gewch ffenestr rhagolwg print, cliciwch y print botwm i ddechrau argraffu.
Nodyn: Os nad yw rhai o'r colofnau a ddewiswyd mewn un dudalen, yn y ffenestr rhagolwg, dylech glicio ar y Dudalen Nesaf i weld detholiadau eraill. A byddant yn cael eu hargraffu i dudalennau ar wahân fel eu tudalennau eu hunain.
Argraffu colofnau dethol yn hawdd ynghyd ag offeryn anhygoel
Os yw cod VBA yn anodd i chi ei drin, gallwch roi cynnig ar y Argraffu Dewin Dewis Lluosog cyfleustodau Kutools ar gyfer Excel. Gyda'r cyfleustodau hwn, gallwch argraffu sawl colofn ddethol gyda'i gilydd yn hawdd ar un dudalen gyda sawl clic yn unig.
Cyn gwneud cais Kutools ar gyfer Excel, os gwelwch yn dda ei lawrlwytho a'i osod yn gyntaf.
1. Dewiswch y colofnau fesul un gan ddal y Ctrl allwedd. Yna cliciwch Kutools Byd Gwaith > Argraffu > Argraffu Dewin Dewis Lluosog.
2. Yn y Argraffu Dewin Dewisiadau Lluosog - Cam 1 o 3 blwch deialog, rhestrir eich holl golofnau a ddewiswyd yn y blwch rhestr, cliciwch ar y Gorffen botwm.
3. Yna mae'r holl golofnau a ddewiswyd yn cael eu tynnu fel gwrthrychau a'u rhoi ar daflen waith wag (yn ddiofyn, rhoddir yr holl golofnau a ddewiswyd mewn colofn, gallwch drefnu eu safleoedd yn ôl yr angen). Yna dechreuwch argraffu'r daflen waith.
Nodyn: Os ydych chi am nodi'r gosodiadau argraffu, cliciwch y Digwyddiadau botwm yn y blwch deialog cam 1 hwn o 3, ac yna nodwch y gosodiadau fel eich angen fel isod y llun a ddangosir.
Os ydych chi am gael treial am ddim (30 diwrnod) o'r cyfleustodau hwn, cliciwch i'w lawrlwytho, ac yna ewch i gymhwyso'r llawdriniaeth yn ôl y camau uchod.
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn 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!