< návrat zpět

MS Excel


Téma: MAKRO pro vymazání prázdných řádků v Tabulce rss

Zaslal/a 11.12.2018 9:38

Dobrý den všem,

mám Tabulku, v prvním sloupci je datum, v druhém sloupci jsou kusy. Mezi jednotlivými řádky, které obsahují hodnoty mám řádky, které jsou prázdné.
Může mi prosím někdo poslat jednoduché makro,které najde a vymaže prázdné řádky?

Děkuji.

OB

Zaslat odpověď >

#042062
avatar
třeba

https://www.poradte.cz/pocitace-a-prislusenstvi/42676-excel-mazani-prazdnych-radku.html

a použít záznamník makercitovat
#042063
avatar
Chci použít Makro, protože každý den vkládám data a ty se mi posunují směrem dolů a prázdná místa potřebuji odstranit ,vždy ve stejném sloupci, ale jiném řádku.citovat
#042064
avatar
právě proto jsem psal o použití návodu a záznamníku makra
tzn. zapnout záznamník, použít návod, vypnout záznamník, pojmenovat makro a event. přiřadit kl. zkratku

pak už stačí jen spouštět makro v případě potřeby 10citovat
#042068
avatar
PODĚLÍM SE O NÁLEZ NA NETU - - - FUNGUJE TO SKVĚLE, TAK JAK POTŘEBUJI:) 5 Jinak děkuji za rady. O.B.

Sub odstranit_prazdne_radky()
ActiveSheet.UsedRange.Select
Dim i As Long
'Vypneme prepocitovani, aby se makro zbytecne nezpomalovalo
With Application
.Calculation = xlCalculationManual
.ScreenUpdating = False
'Prochazime rakdy a odstranujeme
For i = Selection.Rows.Count To 1 Step -1
If WorksheetFunction.counta(Selection.Rows(i)) = 0 Then
Selection.Rows(i).EntireRow.Delete
End If
Next i
'Zase zapneme prepocitavani
.Calculation = xlCalculationAutomatic
.ScreenUpdating = True
End With
End Subcitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

odskok v makru jinam

PavDD • 13.5. 9:03

odskok v makru jinam

Barth • 13.5. 7:25

číslování

Kalous • 12.5. 20:50

odskok v makru jinam

marjankaj • 12.5. 20:43

číslování

r13 • 12.5. 20:23

číslování

r13 • 12.5. 20:19

číslování

Kalous • 12.5. 19:46