Tämä opetusohjelma osoittaa, kuinka VBA: n avulla lisätään rivejä ja sarakkeita Exceliin.
Rivien tai sarakkeiden lisäämiseen käytämme Lisää menetelmä.
Lisää yksi rivi tai sarake
Lisää uusi rivi
Voit lisätä yhden rivin Rows -objektilla:
| 1 | Rivit (4) |
Tai voit käyttää alueobjektia yhdessä EntireRow'n kanssa:
| 1 | Alue ("b4"). EntireRow.Insert |
Lisää uusi sarake
Rivien lisäämisen tapaan voimme lisätä sarakkeen Sarakkeet -objektin avulla:
| 1 | Sarakkeet (4) |
Tai etäisyysobjekti ja koko sarake:
| 1 | Alue ("b4"). Koko sarake |
Lisää useita rivejä tai sarakkeita
Lisää useita rivejä
Kun lisäät useita rivejä Rows -objektin kanssa, sinun on annettava rivit lainausmerkeissä:
| 1 | Rivit ("4: 6") |
Useiden rivien lisääminen alueobjektin kanssa toimii samalla tavalla kuin yhden rivin kanssa:
| 1 | Alue ("b4: b6"). EntireRow.Insert |
Lisää useita sarakkeita
Kun lisäät useita sarakkeita Sarakkeet -objektiin, kirjoita sarake kirjaimet lainauksissa:
| 1 | Sarakkeet ("B: D") |
Useiden sarakkeiden lisääminen alueobjektin kanssa toimii samalla tavalla kuin yhden sarakkeen kanssa:
| 1 | Alue ("b4: d4"). Koko sarake |
Lisää - Vaihto ja Kopioi Alkuperä
The Lisää menetelmä sisältää kaksi valinnaista argumenttia:
- Siirtää - Mihin suuntaan soluja siirretään?
- CopyOrigin - Mitkä solun muotoilut kopioidaan (yllä, alla, vasemmalla tai oikealla)
Vaihto -argumentilla ei ole merkitystä, kun lisätään kokonaisia rivejä tai sarakkeita. Sen avulla voit vain osoittaa siirtymisen alas tai oikealle:
- xlShiftDown - Siirrä solut alas
- xlShiftToRight - Siirrä solut oikealle
Kuten huomaat, et voi siirtyä ylös tai oikealle.
The CopyOrigin argumentilla on kaksi mahdollista syöttöä:
- xlFormatFromLeftorAbove - (0) Äskettäin lisätyt solut muotoillaan ylä- tai vasemmanpuoleisista soluista
- xlFormatFromRightorBelow (1) Äskettäin lisätyt solut muotoillaan alla tai oikealla olevista soluista.
Katsotaanpa joitain esimerkkejä CopyOrigin Perustelu. Tässä meidän alustavat tiedot:
Tässä esimerkissä lisätään rivi ottaen huomioon edellä olevan rivin muotoilu.
| 1 | Rivit (5) .Lisää, xlFormatFromLeftOrAbove |
Tämä esimerkki lisää rivin alla olevan rivin muotoilun mukaan.
| 1 | Rivit (5)., Lisää xlFormatFromRightOrBelow |
Muita lisäesimerkkejä
Lisää kopioidut rivit tai sarakkeet
Jos haluat lisätä kopioidun rivin, käytä seuraavaa koodia:
| 12 | Alue ("1: 1"). KopioiAlue ("5: 5") |
Tässä kopioimme rivin 1 ja lisäämme sen riville 5.
Lisää rivejä solun arvon perusteella
Tämä kiertää alueen läpi lisäämällä rivejä soluarvojen perusteella:
| 1234567891011 | Sub InsertRowswithSpecificValue ()Himmennä solu alueenaJokaiselle alueen solulle ("b2: b20")Jos cell.Value = "insert" Sittencell.EntireRow.InsertLoppu JosSeuraava soluEnd Sub |
Poista rivit tai sarakkeet
Voit poistaa rivejä tai sarakkeita käyttämällä Poistaa menetelmä.
| 1234567 | Rivit (1) PoistaAlue ("a1") .EtireRow.DeleteSarakkeet (1) PoistaAlue ("a1"). Koko sarake.Poista |
