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

• #2462 Delila_1 veterán Stavi #2457

  Új Válasz 2007-09-13 10:46:33 #2462

  Ú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 Stavi #2457 üzenetére

  Másold be ezt a makrót. Feltételezi, hogy az eredeti adataid az ''Adatok'' lapon vannak. Az ID-k A2-től le akármeddig, a hozzájuk tartozó adatok B2-től le. Az első sorban feltehetően címeket adtál az oszlopoknak.
  
  A keresendő ID-t E1-be kell írni. Ha máshova kéred, az ID = Cells(1,5).Value sort írd át.
  A ''Kigyűjtés'' lapra gyűjti a megfelelő adatokat.
  
  Sub ID_kereső()
  'Az előző keresésnél kigyűjtött adatok törlése az 1000. sorig
  Sheets(''Kigyűjtés'').Select
  Range(Cells(2, 1), Cells(1000, 2)).Select
  Selection.ClearContents
  
  Sheets(''Adatok'').Select
  'Ez kikeresi az alsó sorodat
  Range(''A2'').Select
  Selection.End(xlDown).Select
  alsó = Selection.Row
  
  ID = Cells(1, 5).Value
  sor_k = 2 'Kigyűjtés lap sor-számlálója
  For sor = 2 To alsó
  If Cells(sor, 1).Value = ID Then
  adat = Cells(sor, 2).Value
  Sheets(''Kigyűjtés'').Select
  Cells(sor_k, 1).Value = ID
  Cells(sor_k, 2).Value = adat
  sor_k = sor_k + 1
  Sheets(''Adatok'').Select
  End If
  Next
  Sheets(''Kigyűjtés'').Select
  Cells(sor_k - 1, 1).Select
  End Sub
  
  Ha gond van, elküldöm e-mail-ben a file-t.
  
  [Szerkesztve]

• #1691 Gh0sT addikt Stavi #1690

  Új Válasz 2006-10-30 09:49:54 #1691

  Ú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

  

  Gh0sT

  addikt

  válasz Stavi #1690 üzenetére

  Sajna nincs nálam a tábla, de valahogy így kell:
  
  Van ugye a táblázatod végén a szumma oszlopod. Megfogod az A oszlopban lévő sorszámokat és mögé másolod őket. Tehát ha a szumma oszlop a P, akkor a Q-ba bemásolod a sorszámokat.
  
  Ezután a képlet:
  
  =FKERES(14;P2:Q8003;2;HAMIS)
  
  A P2:Q8003 nem biztos hogy jó, mert nincs nálam a táblád és csak fejből idéztem fel az értékeket. A lényeg, hogy a két oszlopot kell magába foglalja a tartomány.
  
  A lottónál a 14 helyett 5-re javítsd az első paramétert!

• #1684 lapa veterán Stavi #1673

  Új Válasz 2006-10-29 09:18:12 #1684

  Ú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

  

  lapa

  veterán

  válasz Stavi #1673 üzenetére

  nekem nem műx a link
  
  ''a session id-je nincs jóváhagyva és az anti-leach aktiválva van'' vagy mit ír...

• #1675 Gh0sT addikt Stavi #1673

  Új Válasz 2006-10-28 23:45:25 #1675

  Ú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

  

  Gh0sT

  addikt

  válasz Stavi #1673 üzenetére

  Adok egy ötletet, egy kaptafa mindkettő:
  
  A Totó tábla mellé jobbra csinálsz egy újabb táblázatot. Pont akkorát, mint az eredeti tábla. Egy HA függvénnyel fogod vizsgálni az elemeket. Először megnézed, hogy az B2 egyenlő-e a B8003-mal. Ha igen, akkor a HA függvény visszatérési értéke 1 lesz, egyébként pedig 0.
  
  Valahogy így: =HA(B2=$B$8003;1;0)
  
  Most ugye lesz egy táblád, ami csupa 0-ból és 1-ből fog állni. Ha összeadod az egyes sorokat, akkor pontosan megkapod, hogy az adott szelvény hány találatos volt.
  
  Ezután a DARABTELI függvénnyel megvizsgálod ezt a kapott halmazt, hogy hány 14, 13, 12, 11 stb találatos szelvény volt összesen.
  
  A sorszám kiíratására az FKERES függvény lenne a legalkalmasabb, bár több azonos találat esetére nem ideális.

• #1674 Benmartin senior tag Stavi #1673

  Új Válasz 2006-10-28 23:43:18 #1674

  Ú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

  

  Benmartin

  senior tag

  válasz Stavi #1673 üzenetére

  darabteli()
  max()

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