Skip to main content

Conas as a chéile a bhogadh go bileog nua nuair a dhéantar seiceáil ar bhosca seiceála in Excel?

Tá an t-alt seo ag caint ar shraith áirithe a bhogadh isteach i mbileog nua nuair a dhéantar seiceáil ar bhosca seiceála in Excel.

Bog as a chéile nuair a dhéantar an bosca seiceála a sheiceáil le cód VBA


Bog as a chéile nuair a dhéantar an bosca seiceála a sheiceáil le cód VBA

Déan mar a leanas le do thoil chun sraith áirithe a bhogadh go bileog oibre shonraithe agus bosca seiceála in Excel á seiceáil.

1. Aistrigh go dtí an bhileog oibre is gá duit as a chéile a bhogadh bunaithe ar an mbosca seiceála, cliceáil Forbróir > Ionsáigh > Bosca Seiceála (Rialú ActiveX) chun bosca seiceála a chur isteach. Féach an pictiúr:

2. Cliceáil ar dheis ar an táb bileog, agus ansin cliceáil Féach an cód ón roghchlár cliceáil ar dheis. Féach an pictiúr:

3. San oscailt Microsoft Visual Basic d’Fheidhmchláir fuinneog, cóipeáil agus greamaigh faoi bhun chód VBA isteach i bhfuinneog an Chóid.

Cód VBA: Bog as a chéile i mbileog oibre shonraithe nuair a dhéantar bosca seiceála a sheiceáil

Private Sub CheckBox1_Click()
    Dim xRg As Range
    Dim xAddress As String
    On Error Resume Next
    If CheckBox1.value Then
        xAddress = Application.ActiveWindow.RangeSelection.Address
        Set xRg = Application.InputBox("Please select the range row you will move(single cell):", "KuTools For Excel", xAddress, , , , , 8)
        If xRg Is Nothing Then Exit Sub
        Set xRg = xRg(1).EntireRow
        xRg.Copy
        ActiveWorkbook.Sheets("Sheet3").Range("A1").PasteSpecial xlPasteAllUsingSourceTheme
        xRg.Clear
        Application.CutCopyMode = False
    End If
End Sub

nótaí: Sa chód, tugann Shee3 agus A1 le fios go mbogfar an tsraith shonraithe go dtí an chéad tsraith i mBileog3. Athraigh iad le do thoil bunaithe ar do chuid riachtanas.

4. Brúigh an Eile + Q eochracha chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

5. Múch an Mód Dearaidh trí chliceáil ar an Mód Dearaidh cnaipe ar an Forbróir Tab.

6. Seiceáil an ticbhosca, ansin a Kutools le haghaidh Excel tagann bosca dialóige aníos, roghnaigh an chéad chill den tsraith (nó an tsraith iomlán please a theastaíonn uait chun bogadh agus cliceáil ar an OK cnaipe. Ansin bogfar an tsraith iomlán shonraithe chuig bileog oibre áirithe láithreach. Féach an pictiúr:


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 (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Excuse me for being a beginner at this but I need the spreadsheet to do this but copy the item rather than move it, how do I go about that?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations