Aby to šlo pochopit přidávám soubor, kde bych potřeboval zkopírovat data ze sloupce C do sloupce B. Ale jen ve vyfiltrovaných řádcích.
Příloha: 
4190_kopirovani_filtru.zip (10kB, staženo 32x)
4190_kopirovani_filtru.zip (10kB, staženo 32x)
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Tipy a triky pro Excel a makra VBA
< návrat zpět
Téma: Kopírovaní z filtru
MS Excel
Téma: Kopírovaní z filtru 
Zaslal/a 23.2.2011 7:54
Zdravím,
chtěl jsem se zeptat, jestli by mi někdo nedokázal ulěhčit postup. Často pracuji s rozsáhlou tabulkou o cca 13000 řádcích. Přiřadím správné hodnoty pomocí funkce svyhledat do nového sloupce. A teď bych potřeboval tyto hodnoty ze sloupce např. Z dát do sloupce B, ale jen ve vyfiltrovaných řádcích.
Kdybych normálně označil nové data, dal ctrl+c a ctrl+v, tak si data vložím do horních řádků. Ale já potřebuji, ať se např. data z řádku 12000 zkopírují do řádku 12000 a řádky které mám filtrem pryč zůstanou se stejnou hodnotou.
V současné době to dělám tak, že při zapnutém filtru dám do buňky např B4 vzorec =Z4. Ten natáhnu až dolů. Pak filtry vypnu, označím sloupec B a překopíruji ho pouze jako hodnoty.
V případě že jste pochopili co potřebuju, nevíte někdo elegantnější postup? :-)
Díky
Ahoj,
možnost bez použití makra by byla ošetření vzorce svyhledat, aby v případě že hodnotu nenajde doplnil hodnotu ze sloupce B, pak by se dal zkopírovat a vložit celý měsíc bez filtrování.
Pomocí makra by to šlo například takto:
Public Sub vypln()
For i = 2 To List1.UsedRange.Rows.Count
If Rows(i).EntireRow.Hidden = False Then
Cells(i, 2) = Cells(i, 3)
End If
Next
End Sub
M@
možnost bez použití makra by byla ošetření vzorce svyhledat, aby v případě že hodnotu nenajde doplnil hodnotu ze sloupce B, pak by se dal zkopírovat a vložit celý měsíc bez filtrování.
Pomocí makra by to šlo například takto:
Public Sub vypln()
For i = 2 To List1.UsedRange.Rows.Count
If Rows(i).EntireRow.Hidden = False Then
Cells(i, 2) = Cells(i, 3)
End If
Next
End Sub
M@
Tak Jeza byl rychlejsi, kazdopadne bych se primlouval za jeho reseni upraveni funkce SVYHLEDAT, protoze si myslim, ze bude rychlejsi kdyz zvazime rochazeni 13000 radku makrem.
Pokud vsak bude makro pohodlnejsi, prikladam svoji verzi...
Pokud vsak bude makro pohodlnejsi, prikladam svoji verzi...
Příloha: 4192_kopirovani_filtru.zip (14kB, staženo 56x)
4192_kopirovani_filtru.zip (14kB, staženo 56x)Moc Vám oběma děkuji :-)
Pro popsané účely se více hodí napsat upravený vzorec svyhledat.
Hledal jsem však tuto možnost i v souvislosti k jiným potřebám a tam se uplatní zase makro.
Myslel jsem, že přehlížím nějakou banalitu jak to lze zkopírovat jen do vyfiltrovaných řádků, ale asi to není tak častá potřeba, aby byla implementována.
Každopádně děkuji moc
Pro popsané účely se více hodí napsat upravený vzorec svyhledat.
Hledal jsem však tuto možnost i v souvislosti k jiným potřebám a tam se uplatní zase makro.
Myslel jsem, že přehlížím nějakou banalitu jak to lze zkopírovat jen do vyfiltrovaných řádků, ale asi to není tak častá potřeba, aby byla implementována.
Každopádně děkuji moc
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Helios iNuvio
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.
RSS nejnovější články