Excel - VBA kod za brisanje podataka u retku tijekom čuvanja formula

Problem

Radim na proračunskoj tablici gdje moram kopirati podatke na novi list. Nakon kopiranja podataka želim izbrisati podatke u retku iz izvornog lista, bez gubitka formula. Kako se to može implementirati u VBA?

Riješenje

Nakon što implementirate donji kôd, odaberite ćeliju iz retka u kojoj želite zadržati formulu i pokrenite kôd.

 Sub KeepFormulas () Dim sRow, lCol As Integer sRow = ActiveCell.Row lCol = Ćelije (sRow, Columns.Count). )) Ako je cell.HasFormula = False onda cell.ClearContents Sljedeća stanica End Sub 

Zahvaljujući MSL-u za ovaj savjet.