Stránka 1 z 1

spuštění makra  Vyřešeno

Napsal: 10 črc 2012 14:52
od Sirka
zdravim, mám problem s makrem jsem začatečník :X

makro filtruje tabulku a je na spuštění na tlačidlo ale pokud zamknu list tak i když mam povolený automatický filtr > ručně vyfiltruju tak přez makro nikoli a píše to error

run time error 1004

tento příkaz nelze použít v zamknutém listu, chceteli tento příkaz použít musíte jeje odemknout.

Sub but_1()
'
' but_1 Makro
' dluh <>0
'

'
ActiveSheet.ListObjects("Tabulka4").Range.AutoFilter Field:=5
ActiveSheet.ListObjects("Tabulka4").Range.AutoFilter Field:=6
ActiveSheet.ListObjects("Tabulka4").Range.AutoFilter Field:=5, Criteria1:= _
"<>0", Operator:=xlAnd



takhle je makro :)

> sloupec 5 a 6 zruší filtry a pak na 5 udělá filtr různý od 0

předem díky za pomoc :)

Re: spuštění makra

Napsal: 10 črc 2012 15:52
od mmmartin
Postupuj přesně podle návodu v popisu chyby:
tento příkaz nelze použít v zamknutém listu, chceteli tento příkaz použít musíte jeje odemknout
Jinak řečeno: prvním příkazem v makru musí být odemknutí listu, pak aplikace filtru a nakonec zase zamknutí listu.

Re: spuštění makra

Napsal: 10 črc 2012 15:55
od Sirka
no ale já potřebuju mít ten list stále zamknutý aby ti co s tim budou pracovat tam neudělali zmetky > aby měli možnot psát jen tam kam jsem jim povolil

> pomohl by jsi mi s příkazem na zamknutí a odemknutí?

--- Doplnění předchozího příspěvku (10 Črc 2012 16:06) ---

ActiveSheet.Protect Password:="123"
pro zamčení listu a fráze
ActiveSheet.Unprotect Password:="123"
pro odemčení

kdyby někdo hledal taky :)