Ștergeți rândurile din diferite foi prin VBA

Dacă doriți o modalitate de a șterge toate numerele de rânduri similare, atunci acest articol este pentru dvs.

În acest articol vom afla cum putem scăpa de același rând în mai multe foi de lucru prin macrocomenzi.

Întrebare): Vreau să șterg același rând din mai multe foi de lucru folosind codul VBA. Ceea ce vreau este codul pentru a șterge toate rândurile din registrul de lucru, indiferent de câte foi sunt prezente în fișierul curent; Vreau să șterg numărul rândului selectat din toate cele 5 foi.

Mai întâi de toate, să introducem datele similare în toate foile de lucru din aceeași locație

Trebuie să urmăm pașii de mai jos:

Faceți clic pe fila Dezvoltator
Din grupul de coduri, selectați Visual Basic

Introduceți următorul cod în modulul standard: -

Sub DeleteRows ()

Dim shtArr, i As Long, xx As Long

shtArr = Array ("Sheet1", "Sheet2", "Sheet3", "Sheet4", "Sheet5")

xx = Selecție.Rând

Pentru i = LBound (shtArr) To UBound (shtArr)

Foi de calcul (shtArr (i)). Rânduri (xx). Întreg rând. Ștergeți

Apoi eu

Sfârșitul Sub

Acum plasați cursorul pe orice celulă A1 și pe Sheet1.
presa ALT + F8 pentru a rula macro; veți găsi numărul de rând selectat va fi șters în toate foile.
Următorul instantaneu prezintă datele din foaia 1 și foaia 2 ca exemplu; când rulați acest exercițiu, veți găsi o soluție similară în toate foile respective.