Új hozzászólás Aktív témák

• #33446 Fferi50 Topikgazda szőröscica #33445

  Új Válasz 2016-12-14 22:42:00 #33446

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Fferi50

  Topikgazda

  válasz szőröscica #33445 üzenetére

  Szia!

  Az egyik lehetőség, hogy hibakezelést építesz be: On Error Resume Next sorral.
  Ha tudod, hogy csak ez lehet a hiba, akkor semmit nem is kell tenned, csak a programszekció végén visszaadni a hibakezelést a VBA-nak: On Error Goto 0
  Ez azért szerintem kissé kockázatos, bár természetesen minden sor után meg lehet nézni, milyen hiba keletkezett (If ERR= x akkor mi legyen - a hibaszámokat megtalálod a helpben).

  Másik megoldás, hogy végigmész a tételeken:
  Dim pvti as PivotItem
For Each pvti in ,PivotItems
If pvti.Name = "Level 2" Or pvti.Name = "Level 1" Or pvti.Name = "Level 3" Then pvti.Visible = True
Next

  Nekem ez utóbbi jobban tetszik.

  Üdv.

Új hozzászólás Aktív témák