Come selezionare ogni ennesima colonna in Excel?

Ad esempio, hai un grande foglio di lavoro con centinaia di colonne di dati. E ora, devi copiare ogni terza colonna di dati e incollarli in un altro nuovo foglio di lavoro. Sarà dispendioso in termini di tempo selezionare ogni ennesima colonna una per una, e c'è un modo semplice per farlo?

Seleziona ogni ennesima colonna con VBA

Seleziona ogni ennesima colonna con Kutools per Excel

Seleziona ogni ennesima colonna con VBA

Non sembra un modo semplice tranne il codice VBA per risolvere questo problema. Si prega di fare come i seguenti passaggi:

1. Evidenziare l'intervallo che si desidera selezionare ogni ennesima colonna.

2.Click Costruttori > Visual Basic oppure premere Alt + F11, un nuovo Microsoft Visual Basic per le applicazioni verrà visualizzata la finestra, fare clic su inserire > Moduli per inserire il codice seguente 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. Quindi fare clic  per eseguire il codice e verrà visualizzata una finestra di messaggio per ricordarti di selezionare un intervallo con cui lavorare. Vedi screenshot:

4. Clic OK, quindi inserisci il numero di intervalli nell'altra finestra di dialogo a comparsa. In questo caso, inserisci 3 nella casella. Vedi screenshot:

5. Clic OK. Ora seleziona ogni terza colonna nella selezione. Vedi screenshot:

Note:: È possibile specificare il numero nel secondo Kutools per Excel dialogo per soddisfare le tue esigenze.

Ma a volte, è necessario selezionare due colonne con due intervalli. Il codice sopra non può funzionare, come dovresti fare?

Seleziona ogni ennesima colonna con Kutools per Excel

Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 30 giorni. Scaricalo ora.

Con Kutools for Excel, è possibile selezionare un numero specifico di colonne a intervalli specifici. Si prega di fare come i seguenti passaggi:

1.Click Kutools > Seleziona > Seleziona Intervallo righe / colonne.

2. Il Seleziona Intervallo righe / colonne apparirà la finestra di dialogo. Quindi fare clic su per selezionare l'intervallo di cui hai bisogno, scegli colonne da Seleziona sezionee specificare il numero desiderato nel file Intervallo di esterni colonne elenco a discesa, qui selezioniamo due colonne in ogni colonna 3td. Vedi screenshot:

3.Click OK. Selezionerà due colonne con due intervalli nella selezione. Vedi screenshot:

Note:: Se controlli Seleziona intere colonne nella finestra di dialogo popup, selezionerà le intere colonne nel foglio. Vedi screenshot:

Articoli relativi:

• Seleziona ogni altra o ennesima riga in Excel
• Copia ogni altra riga
• Elimina ogni altra riga
• Nascondi ogni altra riga