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

• #40843 Delila_1 veterán oke #40789

  Új Válasz 2019-04-18 16:01:12 #40843

  Ú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

  

  Delila_1

  veterán

  válasz oke #40789 üzenetére

  Kipróbáltam a rögzítést. Két értékre lehet szűrni 1-1 oszlopban, a makróban hozzá írtam egy harmadikat. Zokszó nélkül lefutott, de csak az első kettőre szűrt.

• #40842 ny.janos tag oke #40789

  Új Válasz 2019-04-18 13:28:00 #40842

  Ú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

  

  ny.janos

  tag

  válasz oke #40789 üzenetére

  Makró helyett próbálkozhatsz a speciális szűréssel (korábbi verziókban irányított szűrés). Ha állandó az a tömböd, melyeket adatokat nem szeretnél a szűrt állományban látni, akkor a feltételtartományod egyszer kell kialakítanod. Ha ez folyamatosan változó, akkor a feltételtartomány karbantartására kell valami egyszerűsítő módszert kitalálni.

  2013-as verziótól használhatod a szeletelőket már tartományon belül is (nem csak pivot táblában). Bár a 300 lehetőség nem túl kevés, de ha ezekből nem túl sok az, amely értékeket ki akarod venni az eredményből, akkor nem olyan vészes az a pár kattintás.

• #40841 oke senior tag oke #40789

  Új Válasz 2019-04-18 12:37:45 #40841

  Ú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

  

  oke

  senior tag

  válasz oke #40789 üzenetére

  Erre valaki esetleg?

• #40806 oke senior tag oke #40789

  Új Válasz 2019-04-16 12:42:13 #40806

  Ú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

  

  oke

  senior tag

  válasz oke #40789 üzenetére

  Ehhez a táblázathoz kapcsolódóan lenne még egy dolog, amire nem tudom a megoldást:
  Van egy leszűrt rész, amit át szeretnék másolni a "mappa" fülre. Ez jelenleg meg is van, a 2. sortól illeszti be. Viszont úgy kellene átalakítanom, hogy a "mappa" fül utolsó szabad sorától másolja be:

  Set Athelyez = Intersect(Cells(1, 3).CurrentRegion, Cells(1, 3).CurrentRegion.Offset(1, 0).Columns(3)).SpecialCells(xlCellTypeVisible).EntireRow
'Athelyez.Copy Destination:=Worksheets("mappa").Range("2:2")

  Próbálkoztam ezzel, de nem tudom, hogy a változót hogyan rakjam be a fenti részbe:

  Dim sormeghat As Long
sormeghat = Range("a1").End(xlDown).Row

  Illetve hogyan kellene úgy "megcímezni/meghatározni" az utolsó sort, ha másolás előtt nem "lépek" át a "mappa" fülre.

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