Rozšírený filter ???citovat
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: Zmazanie riadku na základe podmienky
MS Excel
Téma: Zmazanie riadku na základe podmienky 
Zaslal/a m6692 20.5.2016 23:20
Dobrý večer, potreboval by som zmazať riadky v tabuľke ktoré majú v stĺpci B hodnotu 0. Príklad je v prílohe. Pôvodná tabuľka je na hárku1 a tabuľka akú potrebujem je na hárku2. Ide to nejakým spôsobom urobiť?
Ďakujem
Příloha: 
31583_skuska.rar (7kB, staženo 23x)
31583_skuska.rar (7kB, staženo 23x)Pomocí VBA:
Sub Redukce()
Dim Zdroj As Range, Cil As Range
Dim i As Long, j As Long
Application.ScreenUpdating = False
Set Zdroj = Cells(2, 2).CurrentRegion
Set Cil = Sheets("Hárok2").Range(Zdroj.Address)
For i = 1 To Zdroj.Rows.Count
If Zdroj.Cells(i, 1) <> 0 Then
j = j + 1
Cil.Rows(j) = Zdroj.Rows(i).Value
End If
Next i
End Sub
citovat
Sub Redukce()
Dim Zdroj As Range, Cil As Range
Dim i As Long, j As Long
Application.ScreenUpdating = False
Set Zdroj = Cells(2, 2).CurrentRegion
Set Cil = Sheets("Hárok2").Range(Zdroj.Address)
For i = 1 To Zdroj.Rows.Count
If Zdroj.Cells(i, 1) <> 0 Then
j = j + 1
Cil.Rows(j) = Zdroj.Rows(i).Value
End If
Next i
End Sub
citovat
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
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
Řazení podle času v kategoriích
veny • 16.7. 11:34
špatný výpočet ze zisku - příčina?
Anonym • 12.7. 22:56
špatný výpočet ze zisku - příčina?
Jakoby • 12.7. 12:35
Řazení podle času v kategoriích
Marekh • 12.7. 9:55
Porovnávací Tabulka
Jess • 8.7. 20:49
Vzorec pro zkopírování obsahu buňky.
veny • 6.7. 8:28
Vzorec pro zkopírování obsahu buňky.
Tonda_Hu • 5.7. 21:17
RSS nejnovější články