Ištrinkite visas tuščias ląsteles

Turinys

Kaip pašalinti visas tuščias ląsteles

Norite ištrinti visas tuščias aktyvios lentelės langelius? Tai nėra makrokomandos problema. Ši makrokomanda ištrina visas tuščias aktyvios lentelės ląsteles:

Sub EmptyDelete ()

ActiveSheet.UsedRange.SpecialCells (xlCellTypeBlanks). Pasirinkite

Pasirinkimas. Ištrinti Shift: = xlUp

Pabaiga Sub

Makrokomanda automatiškai ieško visų tuščių langelių aktyvios lentelės vartotojo srityje ir ištrina šiuos langelius. Žemiau esančios ląstelės pasislenka į viršų. Taigi gausite labai suspaustą stalą.

Padėsite svetainės plėtrą, dalintis puslapį su draugais

wave wave wave wave wave