Izdzēsiet visas tukšās šūnas

Anonim

Kā noņemt visas tukšās šūnas

Vai vēlaties dzēst visas tukšās aktīvās tabulas šūnas? Tā nav problēma ar makro. Šis makro dzēš visas tukšās šūnas aktīvajā tabulā:

Sub EmptyDelete ()

ActiveSheet.UsedRange.SpecialCells (xlCellTypeBlanks). Atlasiet

Atlase. Dzēst Shift: = xlUp

Beigt apakš

Makro automātiski meklē visas tukšās šūnas aktīvās tabulas lietotāja apgabalā un izdzēš šīs šūnas. Šūnas zem tā tiek pārvietotas uz augšu. Tātad jūs saņemat ļoti saspiestu galdu.