Piilotetut taulukot 1-10 näkyviin VBA:lla

Anonyymi

Hei.
Minulla on excelissä 50 taulukkoa piilossa Taul(1)...Taul(50)
Yritän tehdä painiketta jolla saan näkyviin haluamani taulukot esim. Taul(1)...Taul(10)
Eli:
Painiketta klikkaamalla "syöttölaatikko" johon kirjoitetaan luku jollainen määrä taulukoita halutaan näkyviin, esim. 10

Sub näytä_laskentataulukot()
Dim x As Integer

x = InputBox("taulukoiden määrä")
For numtimes = 1 To x
'Loop by using x as the index number to make x number copies.


Miten sen jälkeen ??

1

929

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Helpoin ja ehkä fiksuin tapa on
      lukea kaikki taulukoiden nimet esim. A -sarakkeeseen
      B-sarakkeesen fontiksi Marlet ja kirjain a Ok merkiksi valintaan
      valinta taulukon näytölle tehdään tuplaklikkaamalla B- sarakkeessa halutun taulukon kohdalla B-sarakkeessa ja piilotus vastaavasti tuplaklikkaamalla
      Koodi esim. Worksheet_BeforeDoubleClick tapahtumaan ja tutkitaan sitten onko a -kirjain vaiko tyhäja sen mukaan näytetään/piilotetaan taulukko

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Persut ja Tall poppy -syndrooma

      Persut ovat uhranneet käytännössä koko elämänsä lannistaakseen tai sabotoidakseen yksilöitä, jotka erottuvat joukosta ky
      Maailman menoa
      5
      4708
    2. Oot mahtava tyyppi

      En tiedä luetko palstaa. Koitan siitä huolimatta. Oot mun mielestä tosi erityinen tyyppi. Nopeesti taisin ihastua. Jot
      Ikävä
      43
      4568
    3. Orpo: Seuraavalla hallituksella ei ole yhtään enempää rahaa

      Valtiovarainministeriön virka-arvion mukaan julkisen talouden sopeutuksen tarve on noin kymmenen miljardia euroa ensi va
      Maailman menoa
      155
      3663
    4. Miksi vihereät ja vasemmisto haluavat tuhota tämän maan?

      He halusivat, että kannabis tulisi lailliseksi? - eikö kylliksi nuoria tuhota jo nyt huumeilla? - kannabis tuhosi minun
      Maailman menoa
      106
      3476
    5. Suomen kieli hiipuu vähitellen Vantaalla

      nykytahdilla jo joka kolmas vantaalainen on vieraskielinen 2030-luvun alussa. Maahanmuutto, suomalaisten alhainen synty
      Maailman menoa
      31
      3470
    6. Sofia servasi Pikku-Villen suvereenisti

      – Ihanko tosissaan tuleva sosiaali- ja terveysministeri hyökkää oppositiopuolueen puheenjohtajaa vastaan siksi, että täm
      Maailman menoa
      45
      2946
    7. Ikävän karkoitukseen klassikkokysymys

      Mikä biisi saa hymyn huulille ja ajatukset mukavasti siihen yhteen ja ainoaan? 🤩 Laita biisin sanat, älä linkkiä. Alo
      Ikävä
      12
      1070
    8. Pahimman luokan hasardi

      sellainen sinä olet. Sut pitäis peitellä varoituskolmioilla ja vilkkuvaloilla, rajata lippusiimalla ja varustaa silmälap
      Ikävä
      78
      907
    9. Elämäni rakkaus

      Sitä sinä olet minulle ollut. Siksi tämä on kai niin vaikeaa. Jos sinä luopuisit niin ehkä se tulisi luonnostaan sitten
      Ikävä
      63
      809
    10. Millainen mulle

      Sitten sopisi?
      Ikävä
      93
      762
    Aihe