200 taulukkoa työkirjaan

datamonni

Miten saan tehtyä 200 taulukkoa samaan työkirjaan?

Lisäksi taulukot olisi saatava nimettyä tyyliin raportti1, raportti2, ..., raportti200

Onnistuuko excelin työkaluilla, vb:lla varmaan hoituu mutta ohjelmointitaitoa ei ole :(

2

222

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • mutta aikaa ja kahvia menee...
      nyt et kerkiä hörpätä edes kahvia kun jo valmis ;-)

      ei ole virhetarkasteluja eikä muitakaan "säätöjä", joten makro "kaatuu", jos on jo ennestään saman niminen taulukko (eli raporttixx).

      Sub LisääTaulukko()
      For i = 1 To 200
      Set taulukko = Worksheets.Add(after:=Worksheets(Worksheets.Count))
      taulukko.Name = "raportti" & i
      Set taulukko = Nothing
      Next i
      End Subub

      • datamonni

        Toimi hienosti,
        (tai ensin piti korjata se viimeinen sub)

        Kiitos!


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

    Luetuimmat keskustelut

    1. Eutanasia - miksi eläimelle sallitaan armokuolema, mutta ihmiselle ei?

      Olen pitkään ihmetellyt yhtä asiaa Suomessa. Kun koira kärsii parantumattomasta sairaudesta ja kovista kivuista, eläinlä
      Arvot ja etiikka
      26
      11481
    2. Veli Sofia teki urosmehiläisen työn

      Paljastaessaan kuinka TPS:ssä ei joukkuehenki toimi sooloilijoiden vuoksi, jonka takia koko seura ei pärjää kilpailussa
      Maailman menoa
      58
      4066
    3. Unisex-vessat

      Ahdistaa. Miksi kaikki pitää tasapäistää tasa-arvon nimissä? Tasa-arvo on sitä, että kunnioitetaan sukupuolien erilaisu
      Tunteet
      120
      3261
    4. Sosiaalidemokratia romahtanut kautta maailman

      nuoret eivät enää kannata järjetöntä aatetta, joten demarien täytyy hakea kannattajia mamuista. Ruotsin sos.demit jo kie
      Maailman menoa
      169
      2557
    5. Miksi Seta ja Sofia Virta ei vaadi muslimeita kunnioittamaan priden-arvoja?

      Kuten tiedetään niin islam ei hyväksy sitä mitä pride edustaa. Seta-pomo Mikkonen nosti hirveän äläkän kun yksi tepsin
      Maailman menoa
      108
      2306
    6. Vastuun ottaminen omasta hyvinvoinnista

      Olen huomannut tuttavapiirissäni ihmisiä, joilla on mt-diagnooseja. Sen sijaan, että millekään asialle yritettäisiin teh
      206
      1865
    7. Sofia Virralle täydet 12 pistettä!

      Kun ei jäänyt mukaan vähemmistöjen sortamista epäsuorasti tukevaan joukkueeseen. Urheilijoiden pitäisi olla esikuvia.
      Maailman menoa
      319
      1152
    8. Kuvaile kaivattusi

      ulkonäkö. Asiattomatkin kommentit saa laittaa. -🏚️
      Ikävä
      67
      953
    9. Miksi Hotelli Kainuuta dissataan?

      Ihmetyttää tämä jatkuva yhden yrityksen arvosteleminen. Ikäänkuin mikään ei olisi hyvin. Kuitenkin yritys työllistää, ta
      Kuhmo
      20
      917
    10. Missä milloin

      Missä milloin nähdään?
      Ikävä
      65
      818
    Aihe