Selviytymistiedot Jos sinulla on paljon rivejä ja haluat kopioida ne toiselle arkille joidenkin kriteerien perusteella, se voi olla melko työlästä ja aikaa vievää. Mutta Microsoftin Microsoft Visual Basic -sovellus (VBA) voit luoda makroja, joiden avulla voit helposti kopioida tietoja arkilta toiselle eri kriteerien perusteella. Tässä artikkelissa näytän sinulle, miten miten voit kopioida rivejä toiseen laskentataulukkoon, joka perustuu 2 erityyppiseen kriteeriin Excel VBA:n avulla. .

Oletetaan, että sinulla on seuraava tietokokonaisuus taulukkolomakkeessa nimeltä " Tiedot ", jossa on eri myyjien myynti ja myyntialueet. Nyt haluat kopioida tietyt rivit joidenkin kriteerien perusteella toiselle arkille.

Lataa harjoituskirja

2 tapaa kopioida rivit toiseen laskentataulukkoon Excel VBA: n kriteerien perusteella

1. Rivien kopioiminen toiseen laskentataulukkoon tekstikriteerien perusteella

Tässä esittelyssä näytän, miten voit kopioida rivejä yhdestä laskentataulukosta toiseen tekstikriteerien perusteella. Oletetaan, että haluat kopioida tiedot myyjistä, jotka myyvät osoitteessa Virginia työarkissa nimeltä Alueen myynti käyttämällä Exceliä VBA . Ensin on tehtävä se,

➤ Lehdistö ALT+F11 avataksesi VBA ikkuna.

Vuonna VBA ikkuna,

➤ Napsauta Lisää välilehti ja valitse Moduuli .

Se avaa Moduuli(koodi) ikkunaan. Nyt,

➤ Lisää seuraava koodi tiedostoon Moduuli(koodi) ikkuna,

 Sub Copy_Criteria_Text() Application.ScreenUpdating = False With ActiveSheet .AutoFilterMode = False With Range("C1", Range("C" & Rows.Count).End(xlUp)) .AutoFilter 1, "Virginia" On Error Resume Next .Offset(1).EntireRow.Copy Sheet3.Range("A" & Rows.Count).End(xlUp).Offset(1) End With .AutoFilterMode = False End With Application.ScreenUpdating = TrueSheet3.Select End Sub 

Koodi luo makron nimeltä Copy_Criteria_Text joka etsii Virginiaa sarakkeesta C nykyisen työarkin ja palauttaa ne rivit, jotka sisältävät Virginian työarkin nimellä Alueen myynti (Sheet3).

Sen jälkeen,

➤ Sulje tai minimoi VBA ikkuna.

➤ Lehdistö ALT+F8

Se avaa Makro ikkuna.

➤ Valitse Copy_Criteria_Text vuonna Makron nimi laatikko ja napsauta Suorita .

Tämän seurauksena rivit, joilla on Virginia, kopioidaan taulukkoon nimeltä Alueen myynti

Lue lisää: Kuinka kopioida rivit automaattisesti Excelissä toiseen arkistoon (4 menetelmää)

2. Rivien kopioiminen toiseen laskentataulukkoon numerokriteerien perusteella

Nyt näytän, miten voit kopioida rivejä yhdestä taulukkolaskentataulukosta toiseen taulukkolaskentataulukkoon numerokriteerien perusteella. Oletetaan, että haluat kopioida tiedot myynnistä, joka on suurempi kuin 100000 dollaria, taulukkolaskentataulukkoon nimeltä Huippumyynti . Ensin on tehtävä se,

➤ Lehdistö ALT+F11 avataksesi VBA ikkuna.

Vuonna VBA ikkuna,

➤ Napsauta Lisää välilehti ja valitse Moduuli .

Se avaa Moduuli(koodi) ikkunaan. Nyt,

➤ Lisää seuraava koodi tiedostoon Moduuli(koodi) ikkuna,

 Sub Copy_Criteria_Number() Application.ScreenUpdating = False With ActiveSheet .AutoFilterMode = False With Range("D1", Range("D" & Rows.Count).End(xlUp)) .AutoFilter 1, ">100000" On Error Resume Next .Offset(1).EntireRow.Copy Sheet4.Range("A" & Rows.Count).End(xlUp).Offset(1) End With .AutoFilterMode = False End With Application.ScreenUpdating =True Sheet4.Select End Sub 

Koodi luo makron nimeltä Copy_Criteria_Number joka etsii yli 100000 arvoja sarakkeesta D nimisen laskentataulukon Tiedot ja palauttaa rivit, jotka sisältävät yli 100000 dollarin myyntiarvoja, taulukkoon nimeltä Huippumyynti (Sheet4).

Sen jälkeen,

➤ Sulje tai minimoi VBA ikkuna.

➤ Lehdistö ALT+F8

Se avaa Makro ikkuna.

➤ Valitse Copy_Criteria_Number vuonna Makron nimi laatikko ja napsauta Suorita .

Tämän seurauksena rivit, jotka sisältävät yli 100000 dollarin myyntiarvoja, kopioidaan kohtaan "Myynti". Huippumyynti työlehti.

Lue lisää: Kuinka kopioida useita rivejä Excelissä käyttämällä makroa (4 esimerkkiä)

Päätelmä

Tämän artikkelin kahdella menetelmällä voit kopioida rivejä yhdestä laskentataulukosta toiseen laskentataulukkoon eri kriteerien perusteella Excel VBA: n avulla. Voit käyttää ensimmäistä menetelmää tekstikriteereille ja toista menetelmää numerokriteereille. Jos sinulla on epäselvyyksiä jostakin menetelmästä, voit jättää kommentin.