Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako premakniti določeno vrstico v nov list, ko je v Excelu označeno potrditveno polje?

Ta članek govori o premikanju določene vrstice v nov list, ko je v Excelu označeno potrditveno polje.

Premakni vrstico, ko je potrditveno polje označeno s kodo VBA


Premakni vrstico, ko je potrditveno polje označeno s kodo VBA


Če želite preveriti potrditveno polje v Excelu, naredite, kot sledi, za premikanje določene vrstice na določen delovni list.

1. Če želite preklopiti na delovni list, morate premakniti vrstico na podlagi potrditvenega polja, kliknite Razvojni > Vstavi > Kontrolni polji (nadzor ActiveX) potrdite polje. Prikaz slike:

2. Z desno miškino tipko kliknite zavihek stanja in kliknite Ogled kode iz menija z desnim klikom. Prikaz slike:

3. V odprtju Microsoft Visual Basic za aplikacije okno, kopirajte in prilepite pod kodo VBA v okno Code.

VBA koda: premaknite vrstico v določen delovni list, ko potrdite potrditveno polje

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

Opombe: V kodi Shee3 in A1 označujeta, da bo navedena vrstica premaknjena v prvo vrstico v Sheet3. Prosimo, da jih spremenite glede na vaše potrebe.

4. Pritisnite druga + Q tipke za zapiranje Microsoft Visual Basic za aplikacije okno.

5. Izklopite način oblikovanja s klikom na Način oblikovanja gumb na Razvojni tab.

6. Potrdite potrditveno polje, nato a Kutools za Excel pogovorno okno se pojavi, prosimo, izberite prvo celico vrstice (ali celotno vrstico), ki jo morate premakniti in klikniti OK gumb. Potem bo navedena celotna vrstica takoj premaknjena na določen delovni list. Prikaz slike:


Sorodni članki:



Priporočena orodja za produktivnost za Excel

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
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.