Vai al contenuto principale

Come inserire o eliminare una riga parziale in Excel?

È facile inserire o eliminare un'intera riga dal foglio di lavoro in Excel. Ma come inserire o eliminare solo una riga parziale dal foglio di lavoro? Questo articolo ti aiuterà.

Inserisci o elimina una riga parziale con la funzione Inserisci / Elimina celle
Inserisci o elimina riga parziale con codice VBA


Inserisci o elimina una riga parziale con la funzione Inserisci / Elimina celle

Ad esempio, si desidera inserire o eliminare una riga parziale nella riga 5 con tre celle, eseguire le operazioni seguenti.

Inserisci riga parziale

1. Selezionare tre celle nella riga 5 (le celle selezionate devono essere uguali alle celle inserite), quindi fare clic su inserire > Inserisci celle per Casa tab. Vedi screenshot:

2. Nel inserire finestra di dialogo, selezionare Sposta le celle a destra or Sposta le celle verso il basso opzione e quindi fare clic su OK pulsante.

Quindi la riga parziale con tre celle viene inserita come mostrato nell'immagine sottostante.

Elimina riga parziale

1. Dopo aver selezionato la riga parziale che si desidera eliminare, fare clic su Elimina> Elimina celle per Casa scheda.

2. Nel Elimina finestra di dialogo, selezionare Sposta celle a sinistra or Sposta le celle in alto di cui hai bisogno, quindi fai clic su OK pulsante. Vedi screenshot:

Quindi la riga parziale selezionata viene eliminata.


Inserisci o elimina riga parziale con codice VBA

È inoltre possibile applicare i seguenti codici VBA per inserire o eliminare una riga parziale in Excel.

1. Selezionare qualsiasi cella in una determinata riga in cui si desidera inserire righe parziali, quindi premere altro + F11 per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Moduli. Quindi copia e incolla il codice VBA sottostante nel file Code finestra.

Codice VBA: inserisci una riga parziale in Excel

Sub InsertRow()
    Dim I As Long
    On Error Resume Next
LInput:
    I = Application.InputBox("Enter number of rows required.", "Kutools for Excel", 1, , , , , 1)
    If I < 1 Then
        MsgBox "Error, please retype", vbInformation, "Kutools for Excel"
        GoTo LInput
    End If
    Cells(ActiveCell.Row, 1).Resize(Int(I), 3).Insert xlDown
End Sub

Note:: Nel codice VBA, il numero 1 significa che la riga parziale verrà inserita dalla prima colonna e il numero 3 significa che inserirà tre celle tra le colonne. Puoi modificarli in base alle tue esigenze.

3. premi il F5 chiave per eseguire il codice, quindi un Kutools for Excel viene visualizzata la finestra di dialogo, immettere il numero di righe richieste necessarie, quindi fare clic su OK pulsante.

Se si immette 3 nella casella, quindi fare clic su OK pulsante, tre righe parziali con tre colonne verranno inserite nella posizione specificata del foglio di lavoro.

Per eliminare una riga parziale, puoi eseguire il codice VBA sottostante.

Codice VBA: elimina la riga parziale in Excel

Sub DelActiveCell_Row()
    Dim I As Long
    On Error Resume Next
LInput:
    I = Application.InputBox("Enter number of rows required.", "Kutools for Excel", 1, , , , , 1)
    If I < 1 Then
        MsgBox " Error, please retype", vbInformation, "Kutools for Excel"
        GoTo LInput
    End If
    Cells(ActiveCell.Row, 1).Resize(Int(I), 3).Delete xlShiftUp
End Sub

Dopo aver eseguito il codice, c'è anche un file Kutools for Excel viene visualizzata la finestra di dialogo per ricordare quante righe parziali si desidera eliminare, immettere il numero e fare clic su OK pulsante. Quindi le righe parziali specificate vengono eliminate immediatamente.

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...

Descrizione


Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations