Miten Pivotmakro kun tiedostossa monta Pivottia

TarttisApua_1234

Jos tiedostossa on vain yhden pivotin makrotarve eli yksi pivot tehdään makrolla, toistot toimivat.

Mutta samassa tiedostossa on monta taulukkoa ja yhteenkin taulukkoon tulee monta pivottia.
Kaikkiin pitäisi saada makro.
Yksittäisen makron alkuvaihe:
Sheets("2014").Select
Range("B7").Select
Application.Goto Reference:="Taulukko_2014"
(taulukko_2014 on nimetty solualue)

ActiveWorkbook.Worksheets("Nimitäsmäys").PivotTables("Pivot-taulukko3"). _
PivotCache.CreatePivotTable TableDestination:="Pivot 2014 min ja hlöm!R12C1" _
, TableName:="Pivot-taulukko5", DefaultVersion:=xlPivotTableVersion10

Sitten tulee varsinaista toimintaa.....

Miten makrosta saa pois tarpeettoman viittauksen kuten "Nimitäsmäys" ja kohdan TableName:="Pivot-taulukko5" eli tuo numerointi sotkee

1

116

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • TarttisApua_1234

      Lisäys kysymykseen:
      Käsittääkseni kyse on siitä, miten pivotit saisi toisistaan riippumattomiksi. ???

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

    Luetuimmat keskustelut

    1. Tänään pyörit ajatuksissa enemmän, kun erehdyin lukemaan palstaa

      En saisi, silti toivon että sinä vielä palaat ja otetaan oikeasti selvää, hioituuko särmät ja sulaudummeko yhteen. Vuod
      Ikävä
      22
      5234
    2. Huomenta ihana

      Kauniskasvoinen ihanuus 😘 saan sut vielä
      Ikävä
      25
      4398
    3. Hei rakas...

      Miten on työpäivä sujunut? Rakastan sinua 💗
      Ikävä
      28
      2541
    4. Edelleen sitä on vaikea uskoa

      Että olisit oikeasti rakastunut muhun
      Ikävä
      34
      2264
    5. Toiveikas vai toivoton

      torstai? Ajatuksia?
      Ikävä
      37
      2008
    6. Vitsi mihin menit. Heti takasin.

      Mä näin sut tuu takasin! Oli kiire, niin en ehtiny sin perään!
      Ikävä
      15
      1928
    7. En ole koskaan kokenut

      Ennen mitään tällaista rakastumista. Tiedän että kaipaan sinua varmaan loppu elämän. Toivottavasti ei tarvitsisi vain ka
      Ikävä
      19
      1617
    8. Mukavaa päivää

      Mun rakkauden kohteelle ❤️ toivottavasti olet onnellinen
      Ikävä
      12
      1541
    9. Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...

      Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons
      Suomalaiset julkkikset
      21
      1277
    10. Kerranki asiat oikein

      Ilkka ja muut pienpuolueeet...teitte hyvän työn kun valitsitte pätevän henkilön virkaan eikä kepulle passelia!! Jatkakaa
      Haapavesi
      10
      1194
    Aihe