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

• #16729 Mutt senior tag Kobe #16725

  Új Válasz 2013-02-14 23:03:04 #16729

  Ú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

  

  Mutt

  senior tag

  válasz Kobe #16725 üzenetére

  Hello,

  Ennek kellene ott lennie:
  "Munka1!R1C1" & LR & "C3"

  Azonban javaslom, hogy hozz létre adattáblát (Beszúrás -> Táblázat) és azt add meg a pivot forrásának (SourceData:="Táblázat1"), mivel ez dinamikusan tud nőni/csökkenni.

  üdv.

• #16727 Excelbarat tag Kobe #16725

  Új Válasz 2013-02-14 22:35:37 #16727

  Ú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

  

  Excelbarat

  tag

  válasz Kobe #16725 üzenetére

  Jól sejted csak a forrást kell átírnod így:
  így kezdődjön:
  Range("A3").Select
  Range(Selection, Selection.End(xlToRight)).Select
  Range(Selection, Selection.End(xlDown)).Select
  ujforras = Sheets("Munka1").[A6].CurrentRegion.Address(ReferenceStyle:=xlR1C1)

  Majd a forrásnál így hivatkozz:
  SourceData:= "Munka1!" & ujforras

  A makró végére pedig be kell írni ezt:
  Sheets("Munka4").PivotTables(1).RefreshTable

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