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

• #38106 Ptech addikt Delila_1 #38105

  Új Válasz 2018-05-26 13:48:15 #38106

  Ú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

  

  Ptech

  addikt

  válasz Delila_1 #38105 üzenetére

  Igen, ezt kifelejtettem

• #38104 Ptech addikt p5quser #38078

  Új Válasz 2018-05-25 18:23:45 #38104

  Ú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

  

  Ptech

  addikt

  válasz p5quser #38078 üzenetére

  Az is működne, hogy a már egyenlőségjel hozzáfűzése után replace-szel (CTRL+H) kicseréled az egyenlőségjelet az egyenlőségjelre. Így a copypaste-et megúszod :-)

• #35989 Ptech addikt Fferi50 #35988

  Új Válasz 2017-08-17 13:50:39 #35989

  Ú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

  

  Ptech

  addikt

  válasz Fferi50 #35988 üzenetére

  Igy már szuper lesz, köszi szépen a segitséget!

• #35981 Ptech addikt Fferi50 #35974

  Új Válasz 2017-08-16 13:09:31 #35981

  Ú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

  

  Ptech

  addikt

  válasz Fferi50 #35974 üzenetére

  Szia,

  Köszi szépen, az egyetlen baj, hogy nem minden pivotban 'Status' a PivotField neve, itt akadtam el igazából.

• #35970 Ptech addikt

  Új Válasz 2017-08-14 14:39:54 #35970

  Ú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

  

  Ptech

  addikt

  Sziasztok,

  Az alábbi kód kiveszi egy pivotból a blank mezőt.
  Viszont több pivot van is van a lapon (illetve várható hogy több is kerül még bele), hogy irható át a kód úgy, hogy minden pivotból vegye ki a blank mezőket, ne csak a PivotTable1-ből?

  Dim PT As PivotTable
Dim PvI As PivotItem

Set PT = Worksheets("Summary").PivotTables("PivotTable1")
With PT.PivotFields("Status")
For Each PvI In .PivotItems
Select Case PvI.Name
Case "(blank)"
PvI.Visible = False
Case Else
PvI.Visible = True
End Select
Next
End With

• #35151 Ptech addikt

  Új Válasz 2017-05-10 15:02:27 #35151

  Ú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

  

  Ptech

  addikt

  Sziasztok,

  Egy makróval szenvedek, ami a következőket csinálná:
  Adott jópár közös mailbox, amikből bizonyos almappákból kiexportálja az összes email mezőit:

  To
  From
  Subject
  Categories
  Importance

  Valaki csinált már hasonlót? Próbáltam összeollózni kódot, de sehogyan sem birom működésre birni.

  (Excel 2007, Outlook 2007)

  Ezek után van egy csomó kalkuláció és mailboxonként, kategóriánként, high importance flag szerinti számolás, de az a része működik a makrómnak, viszont ezt a kiexportálós dolgot nem vágom egyáltalán.

• #35141 Ptech addikt Fferi50 #35137

  Új Válasz 2017-05-09 11:32:19 #35141

  Ú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

  

  Ptech

  addikt

  válasz Fferi50 #35137 üzenetére

  Hopp, tényleg, igazad van

• #35136 Ptech addikt Fferi50 #35133

  Új Válasz 2017-05-09 11:11:29 #35136

  Ú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

  

  Ptech

  addikt

  válasz Fferi50 #35133 üzenetére

  Nekem a vlookup is működik, de az index + match sokszor tényleg jobb

• #35132 Ptech addikt kopogo #35131

  Új Válasz 2017-05-09 10:57:33 #35132

  Ú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

  

  Ptech

  addikt

  válasz kopogo #35131 üzenetére

  Egy sima fkeres pont jó erre

  D2 cellába:
  =FKERES(B2;A:C;3;0)

  Kicsit szebb, ha nem találja meg az értéket, akkor üres lesz a cella, mint a scrrenshotodon, nem hibaüzenetet ad vissza:
  =HAHIBA(FKERES(B2;A:C;3;0);"")

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