Koodia kehiin

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?
6456
Äänestä

Muut lukivat myös

Vastaukset 6

Vanhimmat

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

Äänestä
  • 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?

    Äänestä

  • 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!

    Äänestä

  • 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ä!

    Äänestä

  • 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"

    Äänestä

  • 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 ;)

    Äänestä

Kommentoi aloitusta


Pasi kirjoitti:

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?

Anonyymi
5000

Ilmoita asiaton sisältö

  • Sisältää materiaalia, joka on loukkaavaa, herjaavaa, rasistista, uhkailevaa tai ahdistelevaa.

  • Materiaali sisältää nimiä, yhteystietoja tai muita henkilökohtaisia tietoja. Julkisuuden henkilöistä, julkisissa viroissa toimivista ihmisistä sekä yritysten vastuuhenkilöistä saa keskustella työhön liittyen. Myös yksityiselämään liittyvistä asioista voi keskustella siltä osin, kuin niistä on julkisesti kerrottu.

  • Sisältää lapsille haitallista tai heiltä kiellettyä materiaalia. Seksuaalinen sisältö on sallittua aiheeseen tarkoitetuilla palstoilla, joiden ikäraja on 18 vuotta.

  • Lainvastaista sisältöä voi olla mm. yksityiselämää loukkaavan tiedon levitys, kiihottaminen kansanryhmää vastaan, laiton uhkaaminen, alaikäisiin liittyvä seksuaalinen sisältö/grooming, petokset, identiteettivarkaudet, kunnianloukkaukset ja tekijänoikeusrikkomukset.

  • Sisältö ei liity palstan tai keskusteluketjun aiheeseen.

  • Viesti ei ole suomea tai ruotsia (pl. International Forums), se sisältää mainontaa, se sisältää tekijänoikeuksin suojattua materiaalia, se on massapostitus tai jokin muu syy.

Jaa keskustelu