Přejít k hlavnímu obsahu

Jak vybrat každý n-tý sloupec v aplikaci Excel?

Například máte velký list se stovkami sloupců dat. A teď musíte zkopírovat všechna data ve 3. sloupci a vložit je do jiného nového listu. Bude časově náročné vybírat každý n-tý sloupec jeden po druhém, a existuje nějaký snadný způsob, jak to udělat?

Vyberte každý n-tý sloupec pomocí VBA

Vyberte každý n-tý sloupec pomocí Kutools pro Excel


šipka modrá pravá bublina Vyberte každý n-tý sloupec pomocí VBA

Zdá se, že neexistuje žádný jednoduchý způsob, kromě kódu VBA, jak tento problém vyřešit. Postupujte podle následujících kroků:

1. Zvýrazněte rozsah, který chcete vybrat, každý n-tý sloupec.

2.Click Vývojka > Visual Basic nebo stiskněte tlačítko Alt + F11, nový Microsoft Visual Basic pro aplikace Zobrazí se okno, klikněte na Vložit > Modul pro vložení následujícího kódu do modulu:

 

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. Pak klikněte na tlačítko  tlačítko ke spuštění kódu a vyskočí okno s výzvou, které vám připomene, abyste vybrali rozsah, se kterým chcete pracovat. Viz snímek obrazovky:

 

4. cvaknutí OKa poté zadejte počet intervalů v dalším vyskakovacím dialogovém okně. V takovém případě zadejte do pole 3. Viz snímek obrazovky:

5. cvaknutí OK. Nyní vybere každý 3. sloupec ve výběru. Viz snímek obrazovky:

Poznámka: Můžete zadat číslo ve vteřině Kutools pro Excel dialogové okno podle vašich potřeb.

Někdy však musíte vybrat dva sloupce se dvěma intervaly. Výše uvedený kód nemůže fungovat, jak byste měli postupovat?


Vyberte každý n-tý sloupec pomocí Kutools pro Excel

Kutools pro Excel: s více než 300 praktickými doplňky aplikace Excel, můžete vyzkoušet bez omezení do 30 dnů. Získejte to hned.

S Kutools pro Excel, můžete vybrat konkrétní počet sloupců v určitých intervalech. Postupujte podle následujících kroků:

1.Click Kutools > Vyberte Nástroje > Vyberte intervalové řádky / sloupce, viz screenshot:

2. Vyberte intervalové řádky / sloupce Zobrazí se dialogové okno. Poté klikněte vyberte požadovaný rozsah, zvolte Sloupce od Vyberte sekcia zadejte požadované číslo do souboru Interval a Sloupce rozevírací seznam, zde vybereme dva sloupce v každém sloupci 3td. Viz snímek obrazovky:

3.Click OK. Ve výběru vybere dva sloupce se dvěma intervaly. Viz snímek obrazovky:

Poznámka: Pokud zkontrolujete Vyberte celé sloupce v rozbalovacím dialogu vybere celé sloupce v listu. Viz snímek obrazovky:


Relativní články:

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

Popis


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!

 

Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I have one issue in excel, for example, in a row first five sells are numbered as 1,2,3, 4,5. in the second row also numbered as 1,2,3,4,5 in each sell. then to the third row need to paste the values of above two rows alternatively. means i need answer in each sells in third row 1,1,2,2,3,3,4,4,5,5. how can I do easily in excel? I am waiting for your response because I need to complete big datasheet.
This comment was minimized by the moderator on the site
i need to copy from f18 to h19, then f21 to h22, and it goes on till 500 values and before the value in h column need to add text also

like f18 = 345

in h19 I should get = tdg 345

for 500 values in h column.

please help me someone
This comment was minimized by the moderator on the site
This macro sucks dont waste your time
This comment was minimized by the moderator on the site
For some reason this does not work if only one row is selected.
This comment was minimized by the moderator on the site
Excel 2010 - Select interval column command does not work. There is no any raction after clicking - ok
This comment was minimized by the moderator on the site
I always get an error: invalid procedure... How can I solve it. I want to select every 4th column in my dataset
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations