Díky moc za popostrčení. Skombinoval jsem obě varianty vzorců.
=SVYHLEDAT($C3;NEPŘÍMÝ.ODKAZ("'rozbor_"&F$2&"'!B:F");5;0)
Zdravím, nevíte někdo jak "zablokovat" název listu ve vzorci?
Mám vzorec, např: =SVYHLEDAT(C3;rozbor_9!B:F;5;0). Vzorec odkazuje na list, který se při aktualizaci vymaže a pod stejným názvem vytvoří. V té chvíli se ztratí odkaz ve vzorci. Potřebuji ho tam nechat. Nebo mě napadlo, jestli ten název listu nemít v nějaké jiné buňce a na ni se odkázat. Jenže na nic z toho nemůžu přijít. Napadá někoho nějaké řešení? Díky
Měl jsem pocit, že jsem už prošel všechno. Ale je vidět, že mě to pořád nedocházelo. Asi únava. Dík za postrčení.
Funguje Vám to krásně.
Pokusil jsem se to použít v jiném souboru a nechce mě to zpřístupnit tlačítka. Co jsem kde udělal špatně. Nic mě už nenapadá, ale někde mám zádrhel.
Plán - “tisk do PDF“, “složka PDF“, “Plán“
Data - “tisk do PDF“, “složka PDF“, “data“
doklad - “tisk do PDF“, “složka PDF“, “data“, “doklad“
díky
Tak to nevím, můžu se pokusit, jestli to pochopím.
Mám Office 2016, už se mě podařilo vše vyřešit s tím prvním makrem co jste sem dal. Pohrál jsem si se systémem, z kterého exportuji data a ořezal jsem počet řádků. Vše funguje. Díky
Žádné vzorce tam nejsou. Jen čistá data. Zkouším vymyslet jak je ořezat ještě před exportem do excelu. Už jsem se dostal ze 40.000 řádků na 4.000.
Je to opravdu pomalé. Tak jestli přidat to mazání po 1000. Ještě mám dotaz k sloupečku A. Mám ještě jeden soubor a tam zase potřebuji sloupeček B. Stejné podmínky, jen jiný sloupec. Pokoušel jsem se přijít na to, v kterém řádku mu říct, že chci tentokrát sloupec 2. Ale nedaří se. Díky
Makro mě řádky označilo, ale nesmazalo. Možná proto to při procházení 47.000 řádků trvalo dost dlouho.
Zdravím, může mě někdo poradit s makrem. Funguje krásně i při 4000 řádcích. Jen ho potřebuji upravit a nevím jak. Používám ho na mazání řádků kde je EN, jenže já ho potřebuji upravit o to aby mazal i kde je na začátku EN a za ním třeba číslo EN1234. Napsal jsem do makra EN*, ale maže zase jen řádky s EN*. Také bych ho potřeboval rozšířit o další podmínky Z*, S*, B*. To jsem sice dokázal, ale zase maže jen ty řádky kde je přesně Z* ....
Předem díky za radu.
Sub smazatEN()
Dim Firstrow As Long
Dim Lastrow As Long
Dim Lrow As Long
Dim CalcMode As Long
Dim ViewMode As Long
With Application
CalcMode = .Calculation
.Calculation = xlCalculationManual
End With
With ActiveSheet
.Select
ViewMode = ActiveWindow.View
ActiveWindow.View = xlNormalView
.DisplayPageBreaks = False
Firstrow = .UsedRange.Cells(1).Row
Lastrow = .UsedRange.Rows(.UsedRange.Rows.Count).Row
For Lrow = Lastrow To Firstrow Step -1
With .Cells(Lrow, "A") ' Sloupec s hledanými podmínkami
If Not IsError(.Value) Then
Select Case .Value
Case Is = "EN": .EntireRow.Delete 'podmínka v uvozovkách
End Select
End If
End With
Next Lrow
End With
ActiveWindow.View = ViewMode
With Application
.Calculation = CalcMode
End With
End Sub
Už to funguje. Díky
Budu požívat více listů, ale makro bude při aktualizaci používat vždy List1.
Anonym napsal/a:
List1 je .codename a ne .name. V tab vlastností listu je to hned nahoře "(Name)"
Něco dělám blbě. Pokouším se přijít na to co.
Když si v tom vašem souboru udělám kopii listu, vytvoří se list2. Pak jsem v makru změnil list1 na list2 a při spouštění souboru to vyhazuje chybu: Subscript out of range (Error 9)
Custom Properties neznám.
Soubor funguje přesně.
Díky
Jen se mě to nedaří aplikovat do mého souboru. Nemůžu přijít na to, kde je problém.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.