Seuraavalla käskyllä saan pikasuodatuksen toimimaan suojatussa taulukossa (solut lukittu), mutta onnistuuko lajittelu suojattuun taulukkoon?
ActiveWorkbook.Worksheets(2).EnableAutoFilter = True
Tietenkin jos teen oman napin ja vähän enemmän koodia, mutta pystyykö tuon sorttausnapin aktivoimaan samaan tapaan kuin pikasuodatuksen?
Koodia kehiin
Pasi
6
455
Vastaukset 6
siinä missä laitat suojauksen koodissa lisäät vaan seuraavan
UserInterfaceOnly:=True eli esim.
Worksheets("Sheet1").Protect Password:="kunde", UserInterfaceOnly:=True
et tarvitse sitten enää tuota riviäkään... ActiveWorkbook.Worksheets(2).EnableAutoFilter = True- Pasi
Jostain syystä ei toimi, minulla on käytössä Excel 97, johtuisiko siitä? (Helpistäkään en löytänyt tuolla mitään).
En saanut toimimaan, ei kyllä tule virhettäkään tuosta koodista. Pikasuodatuskaan ei näyttäisi toimivan? Pasi kirjoitti:
Jostain syystä ei toimi, minulla on käytössä Excel 97, johtuisiko siitä? (Helpistäkään en löytänyt tuolla mitään).
En saanut toimimaan, ei kyllä tule virhettäkään tuosta koodista. Pikasuodatuskaan ei näyttäisi toimivan?ei toimi 97 versiossa. 2000 versiosta lähtien ton pitäs muistaakseni toimia ja uudemmissa versioissahan on noita lukituksen poistoja sitten lisäilty enemmänkin, joten sorry!
- Pasi
kunde kirjoitti:
ei toimi 97 versiossa. 2000 versiosta lähtien ton pitäs muistaakseni toimia ja uudemmissa versioissahan on noita lukituksen poistoja sitten lisäilty enemmänkin, joten sorry!
Eipä tuo niin vakavaa ole, jätän taulukon suojaamatta, siihen kun kuitenkin tiedot haetaan toisesta taulukosta ja tiedot on helppo hakea uudelleen jos joitakin tietoja katoaa.
Excel 2002 versiossa näyttää olevan pikasuodatuksen valintoina nousevasti ja laskevasti lajittelu joten tuo alkuperäinenkin koodi siinä varmaa saa aikaan halutun toiminnon mutta tuo kertomasi on tietenkin hyvä pistää korvan taakse, kiitos siitä! Pasi kirjoitti:
Eipä tuo niin vakavaa ole, jätän taulukon suojaamatta, siihen kun kuitenkin tiedot haetaan toisesta taulukosta ja tiedot on helppo hakea uudelleen jos joitakin tietoja katoaa.
Excel 2002 versiossa näyttää olevan pikasuodatuksen valintoina nousevasti ja laskevasti lajittelu joten tuo alkuperäinenkin koodi siinä varmaa saa aikaan halutun toiminnon mutta tuo kertomasi on tietenkin hyvä pistää korvan taakse, kiitos siitä!voithan koodilla poistaa suojauksen lajittelun ajaksi ja sitten suojata taulukon taas esim.
Worksheets("Sheet1").Unprotect Password:="kunde"
lajittelukoodi tähän
...
Worksheets("Sheet1").Protect Password:="kunde"- Pasi
kunde kirjoitti:
voithan koodilla poistaa suojauksen lajittelun ajaksi ja sitten suojata taulukon taas esim.
Worksheets("Sheet1").Unprotect Password:="kunde"
lajittelukoodi tähän
...
Worksheets("Sheet1").Protect Password:="kunde"Voisin kyllä tehdä noin ja eräässä toisessa sovelluksessa olen tehnytkin.
Nyt tekemässäni sovelluksessa Excel tekee kaikki makroilla suoritettavat temput Auto_Open proseduurissa ja tämän jälkeen käyttäjän tarvitsee käyttää vain pikasuodatusvalikoita ja lajittelua.
Tässä sovelluksessa taulukkoon haetaan päivitetyt tiedot aina kun taulukko avataan, joten taulukon suojausta tärkeämmäksi ominaisuudeksi nousee se ettei käyttäjän tarvitse käyttää muita kuin vanhoja tuttuja ja turvallisia Excelin oman työkalurivin painikkeita. Ymmärrät varmaan mitä tarkoitan ;)
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Olen nainen pahoillani, että tykkään sinusta niin paljon, että
Haluaisin panna sua. Tuntuu vaan siltä, että olet sen suhteen ihan haluton. Ei minulle riitä pelkkä ystävyyssuhde.811158Puukotus Kajaanissa
Kuka puukotti ja ketä? https://yle.fi/a/74-20247765 Vähemmän yllättäen päihteet mainittu27749- 11732
- 90695
Mieti oikeasti
Ollaan lähes tuntemattomia, mutta samalla on tämä erityinen vuosien tilanne takana, joka on ollut monella tapaa väärin.30687- 46658
kene ajoi "kolarin"?
"Punkaharjulla Luston ja Tuppuranmäen välillä sattui tiistaina aamupäivällä liikenneonnettomuus. Poliisin mukaan Savonl14655Pahin tapa satuttaa toista
On jättää toinen vaille mitään vastausta. Erityisen kipeää se tekee sillon jos toinen ghostaa.68639Minulla on joskus ikävä sinua ja ajattelen sinua joskus.. edelleen
Olin joskus niin rakastunut sinuun. Olin onnellinen, että kohdattiin ja kun vain tiesin sinun olevan olemassa. Täytit aj27607- 56600
- 60573
- 41571
Alkaa jotenkin nyt kuvio hahmottuu täällä
Sellainen vaikutelma tästä alkaa tulla, että täällä on joku pieni porukka, joka tuntee toisensa tai ainakin pelaa samaan82568Jos kaivattusi on
Varattu niin miksi et antaisi asian olla hänen suhteen. Miksi ylipäätään vielä jatkat?46540- 43534
Hyvä on sitten, jos et sitä s*ksiä halua kanssani.
Rakastetaan vaan toisiamme, voin käydä muualla tyydyttämässä fyysisenpuolen tarpeet. Puhumalla tämäkin olisi selvinnyt.129517Nainen, tässä olen kahden vaiheilla
Toinen pitäisi valita ja kummassakin on hyvät ja huonot puolensa. Toinen olisi sellainen pysyvä mutta työläs. Toinen taa52493Kylän tielle remonttia?
Mitäköhän kylän tielle ruvetaan tekemään ku laitettu tuommoset töpsät muutamien suojateitten kohille?13492Suloinen ja herkkä
Toiset huomioiva, räväkkä, yllättävä. Ei sellaisesta voi olla pitämättä.31465Miten vuosien jälkeenkin tunteet voivat olla niin voimakkaat?
Että pelkkä ajatus sinusta täyttää silmät kyynelistä.27457