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

• #924 Thyb senior tag Thyb #923

  Új Válasz 2006-02-10 10:33:11 #924

  Ú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

  

  Thyb

  senior tag

  válasz Thyb #923 üzenetére

  Szeintem próbálkozz ezzel a Macroval.
  Nagyjából beleirtam mit csinál, és ez a legjobb megoldás, bár ha külön oldalon akarod mindenképp látni az adatokat, akkor más a helyzet.
  
  Sub Searchfor()
  '
  ' Macro1 Macro
  ' Macro edited 2006.02.10 by tkiss
  '
  
  'Te adhatod meg, a 7-ik sorban, hogy mely területet akarod vizsgálni,
  'ez a módszer segit abban, ha több azonos adat van az A oszlopban, akkor mindet megjelenitse
  '
  'Ezt az egésszet lehet ugy is bonyolitani, hogy két inputboxot dobsz fel,
  'és két oszlopban csinálsz szürést
  
  
  Dim mydata, Message, Title, default
  Message = ''Irja be a keresett értéket'' ' Set üzenet.
  Title = ''Érték keresés'' ' Set Fejléc.
  default = ''x'' ' Set alapérték.
  ' Megjelenited a beviteli mezőt, cimet, alapértéket
  mydata = InputBox(Message, Title, default)
  Range(''A160000'').AdvancedFilter Action:=xlFilterInPlace, Unique:=False
  Range(''A1'').Select
  Selection.AutoFilter
  Selection.AutoFilter Field:=1, Criteria1:=mydata
  End Sub
  
  Sub ShowAll()
  '
  ' Macro3 Macro
  ' Macro edited 2006.02.10 by tkiss
  '
  
  '
  Selection.AutoFilter 'torli az autofiltert
  End Sub

• #923 Thyb senior tag Lamair #921

  Új Válasz 2006-02-10 10:04:28 #923

  Ú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

  

  Thyb

  senior tag

  válasz Lamair #921 üzenetére

  de azzal remélem tisztában vagy, hogy ez csak akkor működhet jól, ha az A oszlopodban minden érték egyszer szerepel, vagy máskülönben mindig csak az első értéket fogja megtalálni.

• #920 Thyb senior tag alyby #919

  Új Válasz 2006-02-08 16:15:26 #920

  Ú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

  

  Thyb

  senior tag

  válasz alyby #919 üzenetére

  nincs mit, örülök, ha segithettem

• #917 Thyb senior tag 5teve #912

  Új Válasz 2006-02-08 14:40:51 #917

  Ú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

  

  Thyb

  senior tag

  válasz 5teve #912 üzenetére

  Ennél van egy kicsit ésszerűbb, és szebb megoldás is, ahol nem kell állandóan a függvénnyel bajkolódni. Itt az a gond, hogy be kell vezetned 1 oszlopot a nevek mellé, ami default 1-es minden név mellett.
  Azt kellene még tudnom, hogy angol vagy magyar excel-t használsz-e?
  A megoldás egyébként a Pivottable lesz.

• #916 Thyb senior tag alyby #915

  Új Válasz 2006-02-08 14:04:39 #916

  Ú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

  

  Thyb

  senior tag

  válasz alyby #915 üzenetére

  HA számsorod van akkor én ezt javaslom: =VALUE(MID(TEXT(A1;0);1;1))+VALUE(MID(TEXT(A1;0);2;1))+VALUE(MID(TEXT(A1;0);3;1))+VALUE(MID(TEXT(A1;0);4;1))+VALUE(MID(TEXT(A1;0);5;1))+VALUE(MID(TEXT(A1;0);6;1))+VALUE(MID(TEXT(A1;0);7;1))+VALUE(MID(TEXT(A1;0);8;1))
  A1-ben van a számsorod. Kicsit bugyita, de erre scriptet irni elég durva lenne. Amugy lehet Scriptet is irni átteszed stringbe, megszámolod a hosszt, és utánna ciklust futtatsz rá.

• #388 Thyb senior tag Hale Bopp #379

  Új Válasz 2005-05-19 11:01:02 #388

  Ú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

  

  Thyb

  senior tag

  válasz Hale Bopp #379 üzenetére

  Az irányitott szürésnél arra gondolsz hogy auto filter?? Ahoz értek. Miben segithetek???

• #387 Thyb senior tag Hale Bopp #368

  Új Válasz 2005-05-19 10:59:36 #387

  Ú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

  

  Thyb

  senior tag

  válasz Hale Bopp #368 üzenetére

  Hi, simán a CountIF függvényt tudod használni, egy feltétel megadással. Naddon naddon eccerű. Az ilyen feladatokra az a függvény van kitalálva. Ha azokat a mezőket be akarod szinezni akkor pedig a Conditional Formatingot tudod használni. Igy nem csak meg lesznek számolva, de azon cellák formátumát is meg tudod változtatni. Ha nem tiszta akkor küld el a filet és megcsinálom.
  
  tkiss1972@yahoo.co.uk -cimre

• #353 Thyb senior tag Gh0sT #350

  Új Válasz 2005-05-05 13:31:19 #353

  Ú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

  

  Thyb

  senior tag

  válasz Gh0sT #350 üzenetére

  Ezt egyébként ha IF-el akarod megoldani akkor egy AND(,), ÉS(,)?? függvénnyel tudnád beégetni. Itt két feltételt tudsz megszabni és a két függvény határozza meg at, hogy mi kerül majd be a cellába.

• #201 Thyb senior tag CuKoR #192

  Új Válasz 2005-03-09 13:44:11 #201

  Ú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

  

  Thyb

  senior tag

  válasz CuKoR #192 üzenetére

  CountIF(itt 1 függvény 1 adatot tud összeszámolni), de ha egyszerre akarod kilistáztatni akkor tényleg pivotra van szükséged.

• #191 Thyb senior tag snowflake #187

  Új Válasz 2005-02-11 12:31:06 #191

  Ú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

  

  Thyb

  senior tag

  válasz snowflake #187 üzenetére

  Akkor egyszerő lenne, de nekem a leirás alapján ugy tünik, hogy a file védett. Ha munkalapot védesz, akkor kapásból nem kér passwordot, csakha arra külön script van beiktatva. Na meg akkor nem jelentene problémát, ujragenerálni a file-t.

• #186 Thyb senior tag PEPE85 #184

  Új Válasz 2005-02-11 11:19:22 #186

  Ú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

  

  Thyb

  senior tag

  válasz PEPE85 #184 üzenetére

  Szerintem nem fog menni. Én próbáltam már feltörni és nem ment. Próbáld meg megkeresni az illetőt aki csinálta a filet, vagy küld át és megnézem, ki lehet-e valahogy menteni a cuccost belőle más néven

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