KutoolsforOffice — Un'unica soluzione, cinque potenti strumenti.Ottenere di più con meno sforzo.

Come selezionare ogni ennesima colonna in Excel?

AutoreXiaoyang Data di modifica

Ad esempio, hai un foglio di lavoro molto ampio con centinaia di colonne di dati e devi copiare i dati di ogni terza colonna per incollarli in un nuovo foglio di lavoro. Selezionare manualmente ogni ennesima colonna sarebbe estremamente dispendioso in termini di tempo: esiste un modo più semplice per farlo?

Seleziona ogni ennesima colonna con VBA

Seleziona ogni ennesima colonna con Kutools per Excel


Seleziona ogni ennesima colonna con VBA

Non esiste un metodo semplice per risolvere questo problema, a meno di non ricorrere al codice VBA. Procedi come segue:

1. Evidenzia l'intervallo da cui vuoi selezionare ogni ennesima colonna.

2.Fai clic su Sviluppo>Visual Basicoppure premi Alt+F11, si aprirà una nuova finestra di Microsoft Visual Basic, Applications Edition; fai clic su Inserisci>Moduloper inserire il seguente codice nel modulo:

Sub EveryOtherColumn()
'Updateby20140314
Dim rng As Range
Dim InputRng As Range
Dim OutRng As Range
Dim xInterval As Integer
xTitleId = «KutoolsforExcel»
Set InputRng = Application.Selection
Set InputRng = Application.InputBox(«Range :», xTitleId, InputRng.Address, Type:=8)
xInterval = Application.InputBox(«Enter column interval», xTitleId, Type:=1)
For i = 1 To InputRng.Columns.Count Step xInterval + 1
    Set rng = InputRng.Cells(1, i)
    If OutRng Is Nothing Then
        Set OutRng = rng
    Else
        Set OutRng = Application.Union(OutRng, rng)
    End If
Next
OutRng.EntireColumn.Select
End Sub

3. Fai quindi clic sul pulsante uno screenshot della selezione di ogni n-esima colonna con il pulsante Esegui VBA per eseguire il codice: apparirà una finestra di dialogo che ti chiederà di selezionare un intervallo su cui lavorare. Vedi screenshot:

uno screenshot della selezione di ogni n-esima colonna con la finestra di dialogo selezionata VBA

4. Fai clic su OK, quindi inserisci il numero di intervalli nella finestra di dialogo successiva. In questo caso, digita 3 nella casella. Vedi screenshot:

uno screenshot della selezione di ogni n-esima colonna con l'inserimento dell'intervallo numerico VBA

5. Fai clic su OK. Verrà ora selezionata ogni 3ª colonna nell’intervallo scelto. Vedi screenshot:

uno screenshot del risultato della selezione di ogni n-esima colonna con VBA

Nota: puoi specificare il numero desiderato nella seconda finestra di dialogo di Kutools for Excel in base alle tue esigenze.

A volte, tuttavia, potresti dover selezionare due colonne con un intervallo di due colonne tra loro. Il codice precedente non riesce a gestire questa situazione: cosa puoi fare?


Seleziona ogni ennesima colonna con Kutools per Excel

Kutools per Excel: oltre 300 pratici componenti aggiuntivi per Excel, disponibili gratuitamente per 30 giorni senza limitazioni.Scaricalo ora.

Con Kutools per Excel, puoi selezionare un numero specifico di colonne a intervalli regolari. Ecco come fare:

1. Fai clic su Kutools > Seleziona > Seleziona Intervallo righe/Colonne.

2. Verrà visualizzata la finestra di dialogo Seleziona Intervallo righe/Colonne. Fai clic sul pulsante uno screenshot della selezione di ogni n-esima colonna con il pulsante di selezione Kutools for Excel VBA per selezionare l’intervallo desiderato, scegli Colonne nella sezione Seleziona e specifica il numero desiderato nei campi Intervallo di e Colonne nell’elenco a discesa; in questo esempio, selezioniamo due colonne ogni tre colonne. Vedi screenshot:

uno screenshot della selezione di ogni n-esima colonna con la finestra di dialogo Kutools for Excel

3. Fai clic su OK. Verranno selezionate due colonne con un intervallo di due colonne all’interno dell’intervallo scelto. Vedi screenshot:

uno screenshot del risultato della selezione di ogni n-esima colonna con Kutools for Excel

Nota: se selezioni l’opzione Seleziona Intera Colonna nella finestra di dialogo visualizzata, verranno selezionate le intere colonne presenti nel foglio. Vedi screenshot:

uno screenshot del risultato 2 della selezione di ogni n-esima colonna con Kutools for Excel


Articoli correlati:

Migliori Strumenti per la Produttività in Office

🤖KUTOOLS AI Assistente: Rivoluziona Analisi dei dati in base a:Esecuzione Intelligente   |  Genera Codice|  Crea formule personalizzate  |  Analizza Dati e Genera Grafici|  Richiama Funzioni avanzate
Funzionalità Popolari:Trova, Evidenzia o Contrassegna Duplicati   |  Elimina righe vuote   |  Combinare Colonne o Celle senza Perdere Dati   |   Arrotondamento senza usare la formula...
Super RICERCA.VERT:VLookup con Criteri Multipli  |  VLookup con Valori Multipli  |   VLookup tra Fogli Multipli   |   Corrispondenza approssimativa....
Elenco a discesa avanzato:Crea Rapidamente un Elenco a Discesa   |  Elenco a Discesa Dipendente   |  Elenco a Discesa con Selezione Multipla....
Gestione Colonne:Aggiungi un Numero Specifico di Colonne|Sposta Colonne|Attiva/Disattiva lo Stato di Visibilità delle Colonne Nascoste|Confronta Intervalli e Colonne...
Funzionalità in Evidenza:Attenzione della griglia   |  Visualizzazione Design   |Barra delle formule avanzata   | Gestione Cartelle di Lavoro e Fogli   |  Biblioteca di risorse(Testo Automatico)|  Selettore di Date   |  Unisci fogli di lavoro  |  Crittografa/Decrittografa celle   | Invia Email da Lista   |  Super Filtri   |   Filtro speciale(Filtra celle con testo in grassetto/corsivo/barrato...) ...
Principali Set di Strumenti 15:12 Strumentiper il Testo(Aggiungi testo,Elimina Caratteri Specifici, ...)|   50+Tipidi Grafico(Diagramma di Gantt, ...)|   40+ Formule Pratiche(Calcola l'età in base alla data di nascita, ...)|   19 Strumentidi Inserimento(Inserisci Codice QR,Inserisci Immagine dal Percorso, ...)|   12 Strumentidi Conversione(Converti in parole,Conversione del tasso di cambio, ...)|   7 StrumentiUnisci e Dividi(Unione avanzata righe,Dividi celle, ...)|... e molto altro
Usa Kutools nella tua lingua preferita – supporta inglese, spagnolo, tedesco, francese, cinese e 40+ altre!

Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...


Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice

  • 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 all’interno della stessa finestra, invece che in finestre separate.
  • Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!

Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.

Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.

ExcelWordOutlookTabsPowerPoint
  • Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
  • Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
  • Funziona meglio insieme— produttività ottimizzata tra le app di Office
  • Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
  • Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi