MS Excel

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ěď >

veny(11.12.2018 9:46)#042062

třeba

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

a použít záznamník makercitovat

O.B(11.12.2018 10:30)#042063

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

veny(11.12.2018 11:21)#042064

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

citovat

O.B(11.12.2018 20:58)#042068

PODĚLÍM SE O NÁLEZ NA NETU - - - FUNGUJE TO SKVĚLE, TAK JAK POTŘEBUJI:)

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

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

Uživatelské menu

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Aktivní diskuse

Čas od do

Čas od do

Čas od do

Čas od do

Makro smyčka

Makro smyčka

Makro smyčka