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 ??
Piilotetut taulukot 1-10 näkyviin VBA:lla
Anonyymi
1
728
Vastaukset
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
Cynthia Woods
😋😍😋😍😋😍😋😍😋 💋 Nymfomaani -> https://x18.fun/girl04372247#CynthiaWoods 🔞💋❤️💋❤️💋🔞�113442- 1841784
- 771124
- 1131123
Nainen, millainen tilanne oli
kun huomasit ihastuneesi häneen oikein kunnolla. Missä tapahtui ja milloin641046Persut petti duunarit
Kyllä persujen kuuluu nyt mennä häpeämään kun äänestivät lakkolakien puolesta. Vielä muka kehutaan olevan työväenpuolue,194956Persuille kovaa kyytiä YLEn kannatusmittaus
https://yle.fi/a/74-20085866 Näin se menee persueliitti. Pettäjän tie on karu, persujen äänestäjät ovat nyt reagoineet182920Lindtman runnonut demarit huimaan nousukiitoon!
Palkansaajat – siis Suomen käynnissä pitävä kansanosa – ei näemmä arvosta EK/SY-sätkyakka Purran saksipelleilyä. Niin271886Mitä ajattelen sinusta
Että olit erilainen kuin muut ja jollakin kummalla tavalla samanlainen kanssani, vaikka ei tunnetukaan. Sinun kanssa tu35833- 86707