Vba&Excel&Kansio

Konna2

Hei
Yhdessä kansiossa tuhat Excel tiedostoa. Tiedostot tuotettu mallipohjan avulla. Rakenteeltaan tiedostot yhteneviä. Tiedostot suojattu salasanalla ja vba puoli suojattu salasanalla.
Nyt tarve pystyä kirjoittamaan kaikkiin tiedostoihin samalla nimellä nimettyyn sivuun, samaan soluun joka sivulla sama teksti. Nimetty sivu xlsheet veryhidden
Ideoita?

2

224

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Tämmöinen

      Tämä käy läpi kansiosta hakuehdon täyttävät tiedostot ja kirjoittaa jokaisessa samaan tiettyyn soluun uuden arvon. Makrojen suojauksesta ei tarvitse välittää, eikä siitä että ronkittavat sivut on piilotettu.
      https://pastebin.com/EXJD1tmB

    • Kundepuu

      Referensssi ADO 2.8 lisättävä.
      Kirjoittaa suljettuun tiedostoon avaamatta sitä.
      Kokeilin 1000 tiedostolla jalähes 2 x nopeempi kuin Tämmöisen koodi
      54 s vs 1;44 min

      https://pastebin.com/8JL4P45E

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

    Luetuimmat keskustelut

    1. Mitä hyvää rikkaiden hyysääminen Suomelle tuonut?

      Minäpä vastaan: ei yhtikäs mitään, vaan pelkkää vahinkoa. Demareiden ansiosta Suomen valtio oli käytännössä vielä 1980-
      Maailman menoa
      18
      5858
    2. Grahn-Laasonen: "Kansalainen joutuu pettymään, jos demareita äänestää"

      Ministeri viittaa tuoreeseen Helsingin Sanomien juttuun, jossa demarijohtajan keinoja Suomen suunnan muuttamiseksi esite
      Maailman menoa
      84
      5472
    3. Mitä haluaisit sanoa tänään hänelle?

      Rakastamallesi ihmiselle.
      Ikävä
      125
      3494
    4. Tytti Tuppurainen häpäisi Suomen epäisänmaallisella lausunnollaan USA:n ulkoministerille Rubiolle.

      https://www.is.fi/politiikka/art-2000011816267.html Miksi Tytti Tuppurainen päästetään antamaan typeriä lausuntoja noin
      Maailman menoa
      93
      3462
    5. Pystyisitkö olla

      Kanssani kaiken sotkun jälkeen? Ainakaan tunteet ei ole loppuneet
      Ikävä
      121
      1231
    6. Paras muistosi

      kaivatustasi?
      Ikävä
      57
      1177
    7. Miksi miehen on hankala ymmärtää

      Että hänen on tehtävä aloite. Niin sen kuuluu mennä luonnollisesti.
      Ikävä
      130
      1112
    8. Hei kuule nainen

      Seuraavan kerran kun nähdään, puhu minulle jooko! Näin toivoo mies
      Ikävä
      38
      909
    9. Mitä puuhailet nyt ystävänpäivänä

      nainen, kun et ole mun kanssa?
      Ikävä
      45
      903
    10. Mitä sä musta oikein haluat?!

      Anna olla jo.
      Ikävä
      25
      859
    Aihe