Come dividere una colonna ogni altra riga in Excel?
Ad esempio, ho un lungo elenco di dati e ora voglio dividere la colonna in due elenchi equamente ogni altra riga come mostrato nella seguente schermata. Esistono buoni modi per gestire questa attività in Excel?
Dividi una colonna ogni due righe con le formule
Dividi una colonna ogni due righe con le formule
Le seguenti formule possono aiutarti a dividere rapidamente una colonna in due colonne ogni altra riga, per favore fai come segue:
1. Inserisci questa formula in una cella vuota, C2, ad esempio, =INDEX($A$2:$A$13,ROWS(C$1:C1)*2-1), vedi screenshot ：
2. Quindi trascina il quadratino di riempimento verso il basso finché gli errori non vengono visualizzati nelle celle, vedi screenshot:
3. Quindi inserisci un'altra formula nella cella D2, =INDEX($A$2:$A$13,ROWS(D$1:D1)*2)e trascina il quadratino di riempimento verso il basso sulle celle finché non vengono visualizzati i valori di errore ei valori delle colonne sono stati divisi in due colonne ogni due righe, vedi screenshot:
Dividi una colonna ogni altra riga con il codice VBA
Se sei interessato al codice VBA, qui posso parlare di un codice per te per risolvere questo problema.
1. Tieni premuto il ALT + F11 chiavi in Excel e apre il file Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Modulie incolla il codice seguente nel file Moduli Finestra.
Codice VBA: dividi una colonna in due colonne ogni due righe
Sub SplitEveryOther()
'Updateby Extendoffice
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
Dim index As Integer
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
num1 = 1
num2 = 1
For index = 1 To InputRng.Rows.Count
If index Mod 2 = 1 Then
OutRng.Cells(num1, 1).Value = InputRng.Cells(index, 1)
num1 = num1 + 1
Else
OutRng.Cells(num2, 2).Value = InputRng.Cells(index, 1)
num2 = num2 + 1
End If
Next
End Sub
3. Quindi premere F5 chiave per eseguire questo codice e verrà visualizzata una finestra di messaggio per ricordarti di selezionare l'intervallo di dati che desideri dividere, vedi screenshot:
4. E fare clic su OK, viene visualizzata un'altra finestra di messaggio per consentire di selezionare una cella per inserire il risultato, vedi screenshot:
5. Quindi fare clic OKe la colonna è stata suddivisa in due colonne ogni due righe. Vedi screenshot:
Dividi una colonna ogni altra riga con Kutools per Excel
Se vuoi imparare più cose nuove, posso consigliarti uno strumento potente:Kutools for Excel, Con la sua Trasforma intervallo utility, puoi convertire rapidamente una singola riga o colonna in un intervallo di celle e viceversa.
| Kutools for Excel : con oltre 300 utili componenti aggiuntivi di Excel, da provare gratuitamente senza limitazioni in 30 giorni. |
Dopo l'installazione Kutools for Excel, per favore fai come segue :( Scarica subito Kutools per Excel gratuitamente )
1. Seleziona i dati della colonna che desideri suddividere in due colonne ogni due righe.
2. Quindi fare clic Kutools > Escursione > Trasforma intervallo, vedi screenshot:
3. Nel Trasforma intervallo finestra di dialogo, selezionare Singola colonna nell'intervallo sotto il Tipo di trasformazione, Quindi scegliere Valore fisso ed entra 2 nella casella in Righe per record sezione, vedi screenshot:
4. Quindi fare clic Ok pulsante e verrà visualizzata una finestra di messaggio per ricordarti di selezionare una cella in cui desideri visualizzare il risultato, vedi screenshot:
5. Clic OK, i dati dell'elenco sono stati suddivisi in due colonne ogni due righe.
Fare clic per saperne di più su questa utility Transform Range.
Scarica subito Kutools per Excel gratuitamente
I migliori strumenti per la produttività in ufficio
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...
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!
