Excel - Kopírovanie riadkov na základe podmienky

Softvér Microsoft Office je dodávaný s aplikáciou Excel, ktorá sa stala celosvetovo používanou tabuľkovou aplikáciou vďaka svojmu užívateľsky príjemnému systému triedenia dát. Aplikácia Excel Office Software umožňuje kopírovať údaje obsiahnuté v jednom riadku do iného riadka a kopírovať rovnaké údaje z jedného riadka do viacerých riadkov pomocou vlastnosti Vyplniť. To vám ušetrí od nutnosti prepísať informácie. Je tiež možné kopírovať riadky z jedného pracovného hárka, ktorý má záhlavia v riadku 1 a údaje začínajúce od riadka 2 do iného pracovného hárka, kde stĺpec obsahuje výrazy. Ste povinní napísať jednoduchý kód na kopírovanie riadkov z hárka na iný pracovný hárok.

Problém

Ako môžem mať Excel skopírovať celý riadok údajov z pracovného hárka s názvom Zamestnanecký inventár na iný pracovný hárok nazvaný EEs, ak stĺpec Q obsahuje TERM. Skúsil som skoro všetko, ale nič nefunguje. Prosím pomôžte!

Riešenie

Predpoklady pre tento kód:

1. Zoznam zamestnancov má v prvom riadku položky, takže začne kontrolovať údaje v riadku 2.

2. Stĺpec Q nemá žiadne prázdne bunky.

3. List EEs bude mať v riadku 1 záhlavia, takže údaje sa začnú kopírovať v riadku 2.

 Set i = Sheets ("Employee Inventory") Nastavte e = Sheets ("EEs") Dim d Dim jd = 1 j = 2 Do Uveďte IsEmpty (i.Range ("Q" a j)) Ak i.Range ("Q "& j) =" TERM "Potom d = d + 1 e.Rows (d) .Value = i.Rows (j) .Value End Ak j = j + 1 Loop