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

• #35180 attilalr2 csendes tag attilalr2 #35171

  Új Válasz 2017-05-12 18:56:43 #35180

  Ú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

  

  attilalr2

  csendes tag

  válasz attilalr2 #35171 üzenetére

  Köszönöm mindenkinek, mindegyik megoldás segített, Fferi50 viszont zseniális megoldással állt elő. Köszönöm még 1X.

• #35175 attilalr2 csendes tag attilalr2 #35171

  Új Válasz 2017-05-12 13:54:23 #35175

  Ú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

  

  attilalr2

  csendes tag

  válasz attilalr2 #35171 üzenetére

  Köszönöm a tippeket, este lesz időm próbálkozni vele, írok, hogy mire jutottam

• #35173 Fferi50 Topikgazda attilalr2 #35171

  Új Válasz 2017-05-12 11:21:34 #35173

  Ú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 attilalr2 #35171 üzenetére

  Szia!

  Az alábbi felhasználói függvénnyel megoldható:

  Function bevizsgal(ByRef hol As Range, ByRef mit As Range)
Dim sr As Range, van As Integer, mr As Range
van = 0
For Each sr In hol.Rows
van = van + (Application.CountIf(sr, mit.Cells(1)) > 0 And Application.CountIf(sr, mit.Cells(2)) > 0) * -1
Next
bevizsgal = van
End Function

  A függvényt egy modullapra kell beírni. (Alt F11, menüben insert - module, majd bemásolod)
  Ugyanúgy kell használni mint egy beépített függvényt. Ha húzni szeretnéd a képletet, akkor az első paramétert $ jelekkel kiegészítve kell megadnod.

  A füzetet makróbarátként kell elmentened, ha meg akarod tartani a függvényt.

  Üdv.

• #35172 Pakliman tag attilalr2 #35171

  Új Válasz 2017-05-12 10:43:30 #35172

  Ú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

  

  Pakliman

  tag

  válasz attilalr2 #35171 üzenetére

  Szia!

  Ezt a DARABTELI függvénnyel meg tudod oldani.
  Segédoszlopot célszerű alkalmazni, amiben 1 vagy 0 értéket ad a függvény attól függően, hogy az adott sorban a 2 szám együtt szerepel-e:

  =HA(ÉS(DARABTELI(A1:E1;1)=0;DARABTELI(A1:E1;2)=0);1;0)
Esetleg 2 cellát is használhatsz, amibe a keresendőket írod, így bármikor változtathatod.
Ekkor pl::
=HA(ÉS(DARABTELI(A1:E1;$G$1)=0;DARABTELI(A1:E1;$H$1)=0);1;0)

  A SZUM()-al összesítheted.

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