Skip to main content

Conas ilroghnuithe a phriontáil ar leathanach amháin in Excel?

Má tá bileog oibre mór agat ina bhfuil go leor sonraí, agus anois, ba mhaith leat roinnt raonta roghnaithe a phriontáil nach bhfuil leanúnach ar leathanach amháin, ionas gur féidir leat mórán páipéir a shábháil. Soláthraíonn Excel an Socraigh Print Print gné dúinn ilroghnuithe a phriontáil ag an am céanna, ach, priontálfar gach raon roghnaithe i leathanach amháin ar leithligh. Labhróidh an t-alt seo faoi conas ilroghnuithe neamh-leanúnacha a phriontáil ar leathanach amháin.

Priontáil ilroghnuithe ó bhileog oibre amháin ar leathanach amháin le cód VBA

Priontáil roghanna iomadúla ó bhileoga oibre amháin nó iolrach ar leathanach amháin le Kutools le haghaidh Excel


Priontáil ilroghnuithe ó bhileog oibre amháin ar leathanach amháin le cód VBA

Chun iliomad roghnúcháin neamhtheagmhálacha roghnaithe de bhileog oibre amháin a phriontáil ar leathanach amháin, d’fhéadfadh an cód VBA seo a leanas cabhrú leat, déan mar a leanas le do thoil:

1. Brúigh Ctrl eochair chun na raonta is mian leat a phriontáil a roghnú.

2. Coinnigh síos an ALT + F11 eochracha, agus osclaíonn sé an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

3. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Modúil Fuinneog.

Cód VBA: Priontáil ilroghnuithe in aon leathanach amháin

Sub PrintOutRange()
'Updateby Extendoffice
Dim xRng1 As Range
Dim xRng2 As Range
Dim xNewWs As Worksheet
Dim xWs As Worksheet
Dim xIndex As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWs = ActiveSheet
Set xNewWs = Worksheets.Add
xWs.Select
xIndex = 1
For Each xRng2 In Selection.Areas
    xRng2.Copy
    Set xRng1 = xNewWs.Cells(xIndex, 1)
    xRng1.PasteSpecial xlPasteValues
    xRng1.PasteSpecial xlPasteFormats
    xIndex = xIndex + xRng2.Rows.Count
Next
xNewWs.Columns.AutoFit
xNewWs.PrintOut
xNewWs.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

4. Ansin brúigh F5 eochair chun an cód seo a rith, agus priontálfar do raonta roghnaithe ag an am céanna, agus priontálfar iad i leathanach amháin.


Priontáil roghanna iomadúla ó bhileoga oibre amháin nó iolrach ar leathanach amháin le Kutools le haghaidh Excel

Ní féidir leis an gcód thuas ach cabhrú leat na raonta roghnaithe a phriontáil ó bhileog oibre amháin, más mian leat go roghnófaí ilroghnuithe ó roinnt bileoga oibre in aon leathanach amháin, ní oibreoidh an cód thuas. Ná bíodh imní ort, anseo, is féidir liom uirlis áisiúil a thabhairt isteach duit - Kutools le haghaidh Excel, Lena Priontáil Draoi Ilroghnacha fóntais, is féidir leat na roghnúcháin a phriontáil ó bhileog oibre amháin nó ó iliomad bileoga oibre go leathanach amháin ag an am céanna.

Kutools le haghaidh Excel : le níos mó ná 300 breiseán áisiúil Excel, saor in aisce le triail gan aon teorannú i 30 lá

Tar éis a shuiteáil Kutools le haghaidh Excel, déan na céimeanna seo a leanas le do thoil:

1. Cliceáil Kutools Plus > Priontáil > Priontáil Draoi Ilroghnacha, féach ar an scáileán:

2. Sa an Priontáil Draoi Ilroghnacha, Cliceáildoc cuir cnaipe cnaipe chun an raon a theastaíonn uait a phriontáil a roghnú agus a chur isteach sna Ranna chun bosca liosta a phriontáil ceann ar cheann, (is féidir leat na raonta a roghnú ó bhileog oibre amháin nó ó bhileoga oibre iolracha), cliceáil doc bain cnaipe is féidir leis an gcnaipe na raonta nach dteastaíonn uait a bhaint, féach an scáileán:

priontáil ilroghnuithe 2

3. Tar éis duit na roghnúcháin a chur sa bhosca liosta, cliceáil le do thoil Ar Aghaidh >> cnaipe chun dul go céim 2 den draoi, sonraigh na socruithe priontála de réir mar is gá duit, agus is féidir leat as a chéile bán a chur idir na raonta roghnaithe le seic Cuir as a chéile bán idir raonta rogha, féach an scáileán:

priontáil ilroghnuithe 3

4. Ansin téigh ar cliceáil Ar Aghaidh >> sonraigh butoon, i gcéim 3 den draoi, an gníomh don bhileog oibre sealadach, is féidir leat an bhileog oibre a ghníomhachtú ach gan í a phriontáil, a phriontáil agus an bhileog oibre a choinneáil nó a phriontáil agus a scriosadh. Féach an pictiúr:

priontáil ilroghnuithe 4

5. Cliceáil Críochnaigh cnaipe, greamaíodh na raonta roghnaithe go léir i mbileog oibre nua mar rudaí pictiúr nasctha. Agus is féidir leat iad a tharraingt agus a atheagrú sa bhileog oibre. Féach an pictiúr:

priontáil ilroghnuithe 5

6. Nuair a phriontálfaidh tú an bhileog oibre nua seo, priontálfar na raonta in aon leathanach amháin de réir mar is gá duit.

Cliceáil chun níos mó eolais a fháil faoin bhfóntas Draoi Roghnúcháin Il-Priontála seo.

Íoslódáil agus triail saor in aisce Kutools le haghaidh Excel Now!


Demo: Priontáil roghanna iomadúla ó bhileoga oibre amháin nó iolrach ar leathanach amháin le Kutools le haghaidh Excel

Kutools le haghaidh Excel: le níos mó ná 300 breiseán áisiúil Excel, saor in aisce le triail gan aon teorannú i 30 lá. Íoslódáil agus triail saor in aisce Anois!

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 (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
how to print selection area with multi print ? i means selection area i wan to print 10 times
This comment was minimized by the moderator on the site
I tried your VBA code with Excel 2016 and I get an error: Compile Error: Sub of Function not defined. This line is highlighted: Set xRng1 = xNewWs.Cells(xIndex, 1)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations