MS Excel

Téma: umístění kurzoru na určenou buňku

Zaslal/a pepča 2.10.2018 15:39

Ahojky.
Vytvořil jsem si makro,které odkrývá vždyn ásledující řádek pomocí filtru.Nemohu však přijít na to , aby po vyfitrování se kurzor umístil na buňku kterou jsem vyplnil a tím spustil makro:
Sub Skryj()
Range("S4:S104").Select
Selection.AutoFilter
ActiveSheet.Range("$S$4:$S$400").AutoFilter Field:=1
ActiveSheet.Range("$S$4:$S$400").AutoFilter Field:=1, Criteria1:="Zobraz"
ActiveSheet.Range("B5").End(xlDown).Select

End Sub
Nevím jak opravit toto:
ActiveSheet.Range("B5").End(xlDown).Select.
Kkyž Vyplním buňku např. B221. tak aby proběhlo makro s filtrem a kurzor se umístil na buňku B221.Používán Ekcel 2007.
Dškuji za odpověď.
Pepča

Příloha: zip

41604_pozadavky.zip (40kB, staženo 22x)

Zaslat odpověď >

Pavlus(2.10.2018 18:48)#041605

Například takto:
ActiveSheet.Range("B400").End(xlUp).SelectPříkaz přidej na konec makra "Skryj".
P.citovat

elninoslov(2.10.2018 18:57)#041606

Netreba toľko stĺpcov. Procedúru by som volal s parametrom. Pr.

Příloha: zip

41606_pozadavky.zip (42kB, staženo 30x)

citovat

pepča(2.10.2018 19:26)#041607

Děkuji za bleskovou pomoc. Je to opravdu to co potřebuji. Budu používat obě varianty. Toto je jen část z celého sešitu. Ještě jednou moc Díky.

Pepčacitovat

Uživatelské menu

Nejste přihlášen(a)

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.