Excel - VBA cod pentru ștergerea datelor în rând, păstrând în același timp formule

Problema

Lucrez la o foaie de calcul unde trebuie să copiez datele pe o foaie nouă. Odată ce datele sunt copiate, vreau să șterg datele de pe rând din foaia originală, fără a pierde formulele. Cum poate fi implementat acest lucru în VBA?

Soluţie

Odată ce ați implementat codul de mai jos, selectați o celulă din rândul pe care doriți să păstrați formulele din și executați codul.

 () () () () () (), Pentru fiecare celulă din gama (celule (sRow, 1), celule (sRow, lCol )) Dacă cell.HasFormula = False Apoi cell.ClearContents Următoarea celulă End Sub 

Mulțumită MSL pentru acest sfat.