Tento tutoriál ukáže, ako používať VBA na vkladanie riadkov a stĺpcov v programe Excel.
Na vloženie riadkov alebo stĺpcov použijeme Metóda vloženia.
Vložte jeden riadok alebo stĺpec
Vložte nový riadok
Ak chcete vložiť jeden riadok, môžete použiť objekt Riadky:
| 1 | Riadky (4). Vložiť |
Alebo môžete použiť objekt Range spolu s EntireRow:
| 1 | Rozsah („b4“). EntireRow.Insert |
Vložiť nový stĺpec
Podobne ako pri vkladaní riadkov môžeme na vloženie stĺpca použiť objekt stĺpcov:
| 1 | Stĺpce (4). Vložiť |
Alebo objekt rozsahu spolu s EntireColumn:
| 1 | Rozsah („b4“). EntireColumn.Insert |
Vložiť viac riadkov alebo stĺpcov
Vložiť viac riadkov
Pri vkladaní viacerých riadkov s objektom Riadky musíte zadať riadky v úvodzovkách:
| 1 | Riadky („4: 6“). Vložiť |
Vkladanie viacerých riadkov do objektu Range funguje rovnako ako do jedného riadka:
| 1 | Rozsah („b4: b6“). EntireRow.Insert |
Vložiť viac stĺpcov
Pri vkladaní viacerých stĺpcov s objektom Stĺpce zadajte stĺpec písmená v úvodzovkách:
| 1 | Stĺpce („B: D“). Vložiť |
Vloženie viacerých stĺpcov s objektom rozsahu funguje rovnako ako do jedného stĺpca:
| 1 | Rozsah ("b4: d4"). EntireColumn.Insert |
Vložiť - Shift & CopyPôvod
The Metóda vloženia má dva voliteľné argumenty:
- Smena - Akým smerom posunúť bunky
- Kopírovať pôvod - Ktoré formátovanie bunky chcete skopírovať (nad, pod, vľavo alebo vpravo)
Argument Shift je pri vkladaní celých riadkov alebo stĺpcov irelevantný. Umožňuje vám iba označiť zaradenie nižšie alebo doprava:
- xlShiftDown - Posuňte bunky nadol
- xlShiftToRight - Posuňte bunky doprava
Ako vidíte, nemôžete preradiť nahor ani doprava.
The Kopírovať pôvod Argument má dva potenciálne vstupy:
- xlFormatFromLeftorAbove - (0) Novo vložené bunky preberajú formátovanie z buniek nad alebo vľavo
- xlFormatFromRightor Nižšie (1) Novo vložené bunky preberajú formátovanie z buniek nižšie alebo vpravo.
Pozrime sa na niekoľko príkladov Kopírovať pôvod argument. Tu sú naše počiatočné údaje:
Tento príklad vloží riadok s formátovaním z vyššie uvedeného riadka.
| 1 | Riadky (5). Vložiť, xlFormatFromLeftOrAbove |
V tomto prípade sa vloží riadok s formátovaním z nižšie uvedeného riadku.
| 1 | Riadky (5). Vložiť, xlFormatFromRightOrBelow |
Ďalšie príklady vloženia
Vložte skopírované riadky alebo stĺpce
Ak by ste chceli vložiť skopírovaný riadok, použili by ste kód takto:
| 12 | Rozsah („1: 1“). SkopírujteRozsah („5: 5“). Vložiť |
Tu skopírujeme riadok 1 a vložíme ho do riadku 5.
Vložiť riadky podľa hodnoty bunky
Tým sa bude prechádzať rozsahom a vložia sa riadky na základe hodnôt buniek:
| 1234567891011 | Sub InsertRowswithSpecificValue ()Dim bunka ako rozsahPre každú bunku v rozsahu („b2: b20“)Ak cell.Value = "vložte" Potombunka. Celý rad. VložiťKoniec AkĎalšia bunkaKoniec pod |
Odstráňte riadky alebo stĺpce
Ak chcete odstrániť riadky alebo stĺpce, jednoducho použite príponu Vymazať metóda.
| 1234567 | Riadky (1). OdstrániťRozsah („a1“). EntireRow.DeleteStĺpce (1). OdstrániťRozsah („a1“). EntireColumn.Delete |
