Vai al contenuto principale

Come inserire un numero specifico di colonne a intervalli fissi in Excel?

Nel tuo utilizzo quotidiano di Excel, potresti imbatterti in una situazione di cui hai bisogno aggiungi più colonne tra le colonne esistenti. Ovviamente puoi inserire le colonne una per una usando la funzione Inserisci. Ma quando stai di fronte a dati di grandi dimensioni e devi inserire tre colonne dopo ogni seconda o ennesima colonna, la funzione Inserisci apparentemente non è efficace. Quindi, come puoi completare rapidamente l'attività? In questo tutorial parleremo di due semplici metodi per risolvere il problema.

Inserisci il numero specifico di colonne vuote nell'intervallo di dati a intervalli fissi con il codice VBA

Inserisci un numero specifico di colonne vuote nell'intervallo di dati a intervalli fissi con una funzionalità straordinaria


Inserisci il numero specifico di colonne vuote nell'intervallo di dati a intervalli fissi con il codice VBA

Possiamo usare quanto segue Codice VBA per inserire un numero specifico di colonne vuote dopo ogni ennesima colonna. Si prega di fare come segue.

1. premi il Alt + F11 chiavi in ​​Excel e apre il file Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Moduli e incolla la seguente macro nel file Moduli Finestra.

Codice VBA: inserisci un numero specifico di colonne nei dati a intervalli fissi

Sub InsertColumnsAtIntervals()
'Updateby Extendoffice
Dim Rng As Range
Dim xInterval As Integer
Dim xColumns As Integer
Dim xColumnsCount As Integer
Dim xNum1 As Integer
Dim xNum2 As Integer
Dim WorkRng As Range
Dim xWs As Worksheet
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xColumnsCount = WorkRng.Columns.Count
xInterval = Application.InputBox("Enter column interval. ", xTitleId, 1, Type:=1)
xColumns = Application.InputBox("How many columns to insert at each interval? ", xTitleId, 1, Type:=1)
xNum1 = WorkRng.Column + xInterval
xNum2 = xColumns + xInterval
Set xWs = WorkRng.Parent
For i = 1 To Int(xColumnsCount / xInterval)
    xWs.Range(xWs.Cells(WorkRng.Row, xNum1), xWs.Cells(WorkRng.Row, xNum1 + xColumns - 1)).Select
   Application.Selection.EntireColumn.Insert
    xNum1 = xNum1 + xNum2
Next
End Sub

3. premi il F5 chiave per eseguire questo codice. Viene visualizzata una finestra di messaggio per ricordarti di selezionare il intervallo di dati in cui vuoi inserire colonne vuote.
doc inserire-colonne-a-intervalli 1

4. Fare clic sul OK pulsante. Viene visualizzata un'altra finestra di messaggio, per favore inserisci il numero di intervalli di colonne nel Immettere l'intervallo di colonna scatola.
doc inserire-colonne-a-intervalli 2

5. Continuare a fare clic su OK pulsante. Viene visualizzata la terza finestra di richiesta, specificare il numero di colonne che vuoi inserire ad ogni intervallo nella scatola.
doc inserire-colonne-a-intervalli 3

6. Fare clic sul OK pulsante per ottenere il risultato.
doc inserire-colonne-a-intervalli 4


Inserisci un numero specifico di colonne vuote nell'intervallo di dati a intervalli fissi con una funzionalità straordinaria

Se non si desidera utilizzare il metodo del codice VBA, il Inserisci righe e colonne vuote caratteristica di Kutools for Excel è la soluzione perfetta per te. Con questa funzione, puoi inserire il numero specifico di colonne nell'intervallo di dati a intervalli fissi in pochi clic.

Prima di applicare Kutools for Excel, scaricalo e installalo prima.

1. Selezionare prima l'intervallo di dati esistente. Quindi fare clic Kutools > inserire > Inserisci righe e colonne vuote.
doc inserire-colonne-a-intervalli 5

2. il Inserisci righe e colonne vuote si apre la finestra di dialogo. È possibile visualizzare l'intervallo di dati selezionato nel passaggio 1 nella casella Intervallo. Scegli il Colonne vuote opzione nel Inserisci tipo sezione. E specificare il numero di intervalli di colonne ed colonne che vuoi inserire ad ogni intervallo. Qui inserisco 1 e 3 separatamente.
doc inserire-colonne-a-intervalli 6

3. Fare clic sul OK per terminare l'impostazione e ottenere il risultato.
doc inserire-colonne-a-intervalli 7

Note:: Se desideri avere una prova gratuita (30 giorni) di questa utilità, fai clic per scaricarla, quindi vai ad applicare l'operazione secondo i passaggi precedenti.


Altre operazioni (articoli)

Come inserire rapidamente una riga in base alla data corrente in Excel?
Supponendo che ci sia un foglio contenente una riga con le date, e ora voglio inserire una riga fino alla data corrente che cambierà automaticamente durante l'apertura della cartella di lavoro ogni giorno. C'è un trucco per risolverlo in Excel?

Come inserire sempre una riga vuota sotto anziché sopra in Excel?
Come tutti sappiamo, quando si inserisce una riga vuota in un foglio di lavoro, la riga vuota verrà sempre inserita sopra la riga o la cella selezionata. Ma, a volte, potrebbe essere necessario inserire la riga sotto la cella o la riga selezionata. Come hai potuto risolvere questo lavoro in Excel?

Come inserire automaticamente una nuova riga vuota tramite il pulsante di comando in Excel?
In molti casi, potrebbe essere necessario inserire una nuova riga vuota in una posizione specificata del foglio di lavoro. In questo articolo, ti mostreremo come inserire automaticamente una nuova riga vuota facendo clic su un pulsante di comando in Excel.

Come inserire una riga vuota dopo un testo specifico in Excel?
Se desideri inserire righe vuote dopo un testo specifico come mostrato nella seguente schermata, come gestirle rapidamente e facilmente senza inserirle manualmente una per una?


  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne e conservazione dei dati; Contenuto delle celle divise; Combina righe duplicate e somma / media... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Formule preferite e di inserimento rapido, Intervalli, grafici e immagini; Crittografa celle con password; Crea mailing list e invia email ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Raggruppamento tabelle pivot per numero della settimana, giorno della settimana e altro ... Mostra celle sbloccate e bloccate da diversi colori; Evidenzia le celle che hanno formula / nome...
scheda kte 201905
  • 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!
fondo officetab
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