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 samodejno vstaviti prazno novo vrstico s tipko Command v Excelu?

V mnogih primerih boste morda morali vstaviti prazno novo vrstico v določeni položaj vašega delovnega lista. V tem članku vam bomo pokazali, kako samodejno vstaviti prazno novo vrstico, tako da kliknete gumb za ukaz v Excelu.

Vstavite prazno novo vrstico samodejno s tipko Command


Preprosto vstavite prazne vrstice v vsako drugo vrstico v Excelu:

Vstavi Blank Rows & Colimns pripomoček Kutools for Excel vam lahko pomaga vstaviti prazne vrstice v vsako X vrstico v Excelu. Prikaz slike:

Kutools za Excel vključuje več kot 300 priročno orodje Excel. Prosti brez omejitev v 60 dneh. Prenesite brezplačno preskusno različico zdaj


puščica modra desno mehurček Vstavite prazno novo vrstico samodejno s tipko Command


Z naslednjo kodo VBA lahko vstavite prazno novo vrstico s klikom gumba za ukaz. Prosimo, naredite na naslednji način.

1. Najprej morate vstaviti gumb za ukaz. Prosimo, kliknite Razvojni > Vstavi > Gumb za urejanje (nadzor ActiveX). Prikaz slike:

2. Nato povlecite gumb za ukaz na delovni list, ki ga potrebujete za dodajanje novih vrstic, z desno miškino tipko kliknite gumb Command in kliknite Nepremičnine iz menija z desnim klikom.

3. V Ljubljani Nepremičnine pogovorno okno vnesite prikazano besedilo gumba za ukaz v napis polje pod Kategorizirani kartico in nato zaprite pogovorno okno.

Vidite lahko, da je prikazano besedilo gumba za ukaz spremenjeno kot prikazano spodaj.

4. Z desno tipko miške kliknite gumb za urejanje in nato kliknite Ogled kode iz menija z desnim klikom.

5. Potem je Microsoft Visual Basic za aplikacije okno, zamenjajte izvorno kodo z spodnjo kodo VBA v Koda okno.

VBA koda: samodejno vstavite prazno novo vrstico s tipko Command

Private Sub CommandButton1_Click()
    Dim rowNum As Integer
    On Error Resume Next
    rowNum = Application.InputBox(Prompt:="Enter Row Number where you want to add a row:", _
                                    Title:="Kutools for excel", Type:=1)
    Rows(rowNum & ":" & rowNum).Insert Shift:=xlDown
End Sub

Opombe: V kodi je CommanButton1 ime gumba za ukaz, ki ste ga ustvarili.

6. Pritisnite druga + Q tipke za hkratno zapiranje Microsoft Visual Basic za aplikacije okno. In izklopite Način oblikovanja pod Razvojni tab.

7. Kliknite vstavljeni gumb za urejanje in a Kutools za Excel pogovorno okno se pojavi. Prosimo, vnesite določeno številko vrstice, kamor želite dodati prazno novo vrstico, in kliknite OK gumb. Prikaz slike:

Potem se prazna nova vrstica vstavi v določen položaj vašega delovnega lista, kot je prikazano spodaj. In ohranja celično oblikovanje zgoraj navedene celice.


puščica modra desno mehurčekSorodni č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.
  • To post as a guest, your comment is unpublished.
    JW · 1 months ago
    Yes, I played with the script and it worked for me. You just add the row number you want (I chose row 6), but I'll be shocked if it's allowed to be published.

    Private Sub CommandButton1_Click()
    Dim rowNum As Integer
    On Error Resume Next
    Rows(rowNum & "6").Insert Shift:=xlDown
    End Sub
  • To post as a guest, your comment is unpublished.
    Tarl · 1 months ago
    Is there a way to have the new row keep the formatting of the row below instead of the row above?
  • To post as a guest, your comment is unpublished.
    Simon · 7 months ago
    Is there a way to add an Insert Row button and have the new rows keep the cells merged/formatted as they are in the rest of a table?
  • To post as a guest, your comment is unpublished.
    Michelle S · 1 years ago
    I'm having the same issue as Kim - When the sheet is unprotected it adds the row with the correct formatting and correct formulas. Once the sheet is protected it doesn't copy down the formulas. Any thoughts?
    • To post as a guest, your comment is unpublished.
      crystal · 10 months ago
      Dear Michelle,
      By default, a protected worksheet does not allow to insert blank row.
      Therefore, the VBA code can't work in that case.
  • To post as a guest, your comment is unpublished.
    Kim · 1 years ago
    Hi

    I am using this code but it is not bringing down the formulas from the row before, can you help please.
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Dear Kim,

      Please insert a Table with the range you will insert blank rows inside. After that, when inserting new row, the formula will bring down automatically.

      Best Regards, Crystal
      • To post as a guest, your comment is unpublished.
        Robert · 8 months ago
        Can you provide an example? Not following what you're say here. Thanks
        • To post as a guest, your comment is unpublished.
          crystal · 8 months ago
          Hi,
          Please convert your range to a table range in order to bring down the formula automatically when inserting new rows. See screenshot: