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

• #39889 Mutt senior tag kvoaksz #39884

  Új Válasz 2019-01-03 21:13:38 #39889

  Ú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

  

  Mutt

  senior tag

  válasz kvoaksz #39884 üzenetére

  Szia,

  Ha feltételezzük, hogy szám után mindig szóközzel elválasztva van az előtag jele akkor az alábbi lépések segítenek:

  1. Az első szóközig lévő szöveget (az alapszámot) az alábbi képlet megadja
  BAL(A2;SZÖVEG.TALÁL(" ";A2))

  1b. Ha magyar Exceled van, akkor pl. a 0.7-ben lévő tizedesponttal gondban lesz, de egy cserével megoldható ez. HELYETTE(BAL(A2;SZÖVEG.TALÁL(" ";A2));".";",")

  1c. Ha van a számban ezres elválasztó is (pl. 1,620), akkor pedig két cserét javaslok.
  HELYETTE(HELYETTE(BAL(A2;SZÖVEG.TALÁL(" ";A2));",";"");".";",")

  2. Opcionális lépés. Ha lehet más szabványos előtag is, vagyis nem csak "k" lehet, akkor kell ez a segédtábla, ami megadja hogy az alapszámot mennyivel kell majd szorozni. Nekem ez a segédtábla z F:G oszlopban van.

  3a. Ha csak "k" lehet a szövegben, akkor a végső képlet ennyi (az első lépésben kapott számot szorozzuk 1000-el és a végére csapjuk a "users" szöveget).
  =BAL(A2;SZÖVEG.TALÁL(" ";A2)*1000&" users"

  3b. Ha más előtag is lehet a szám után, akkor előbb ki kell keresni az előtagot és utána ahhoz megkeresni a szorzót.
  Az előtag az első szóköz utáni 2 karakter lehet (a deka-nak 2 karakteres a jelölése).
  KIMETSZ(KÖZÉP(A2;SZÖVEG.TALÁL(" ";A2);3)))

  Ezek után ehhez kell megkeresnünk a szorzót, ami egy FKERES/VLOOKUP lenne, csak az a gond hogy itt számít a kisbetű/nagybetű is a mega-milli, peta-pico stb miatt. Tömbfüggvénnyel tudjuk megoldani a helyes keresést, ha SZORZATÖSSZEG-be tesszük akkor nem kell CSE. .
  SZORZATÖSSZEG(AZONOS($F$2:$F$22;KIMETSZ(KÖZÉP(A2;SZÖVEG.TALÁL(" ";A2);3)))*$G$2:$G$22)
  Már csak össze kell rakni a fent említett részeket:
  =BAL(A2;SZÖVEG.TALÁL(" ";A2))*SZORZATÖSSZEG(AZONOS($F$2:$F$22;KIMETSZ(KÖZÉP(A2;SZÖVEG.TALÁL(" ";A2);3)))*$G$2:$G$22)&" users"

  üdv

• #39888 föccer nagyúr kvoaksz #39887

  Új Válasz 2019-01-03 20:34:46 #39888

  Ú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

  

  föccer

  nagyúr

  válasz kvoaksz #39887 üzenetére

  A lényeg, hogy működik. Nyilván az összes adatot/karakterláncot le kell valahogy kezelni.

  üdv, föccer

• #39886 föccer nagyúr kvoaksz #39884

  Új Válasz 2019-01-03 20:27:57 #39886

  Ú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

  

  föccer

  nagyúr

  válasz kvoaksz #39884 üzenetére

  ha a " k users" fix, akkor olvasd ki szövegként

  BAL(A1;HOSSZ(A1)-8)

  függvénnyel. Ezt kell beágyazni az ÉRTÉK() függvénybe, ami a szöveget számmá alakítja és ezt be kell szoroznod 1000-el.

  Így a függvényed az alábbi lesz:

  =ÉRTÉK(BAL(A1;HOSSZ(A1)-8))*1000

• #36151 Delila_1 veterán kvoaksz #36150

  Új Válasz 2017-09-19 11:52:04 #36151

  Ú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 kvoaksz #36150 üzenetére

  Másik verzióban nálam ez nem jött össze, pedig ezzel kezdtem a próbát.

• #36149 Delila_1 veterán kvoaksz #36148

  Új Válasz 2017-09-19 11:43:48 #36149

  Ú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 kvoaksz #36148 üzenetére

  Nincs mit .

• #36147 Delila_1 veterán kvoaksz #36146

  Új Válasz 2017-09-19 11:28:41 #36147

  Ú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 kvoaksz #36146 üzenetére

  Nálam szépen működött, csak a kipróbálása után küldtem el a folyamat leírását.

• #36145 Delila_1 veterán kvoaksz #36144

  Új Válasz 2017-09-19 11:08:45 #36145

  Ú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 kvoaksz #36144 üzenetére

  Kipróbáltad a 2. sor elejétől a visszafelé jelölést?

• #36143 Delila_1 veterán kvoaksz #36142

  Új Válasz 2017-09-19 10:07:04 #36143

  Ú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 kvoaksz #36142 üzenetére

  Ráállsz egy cellára, amiben az Alt+Enteres sortörés van.

  A szerkesztőlécen a 2. sor elejére lépsz, majd Shift + balra nyíllal kijelölöd az elválasztó karaktert, másolás (Ctrl+C). Látszólag semmi nem történik, nem látszik a kijelölés.

  Belépsz a Csere funkcióba. A Keresett szövegnél Ctrl+V-vel beillesztetd azt a bizonyos elválasztó karaktert, a Csere erre rovatba meg adsz egy szóközt. Mehet Az összes cseréje.

• #35572 Delila_1 veterán kvoaksz #35571

  Új Válasz 2017-06-28 13:03:02 #35572

  Ú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 kvoaksz #35571 üzenetére

  Szívesen.

  Szerk.? Látom, rosszul írtam, nem az E1, hanem az E2 cellába kerül a képlet. Szerencsére kitaláltad.

• #35570 Delila_1 veterán kvoaksz #35569

  Új Válasz 2017-06-28 11:12:31 #35570

  Ú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 kvoaksz #35569 üzenetére

  Az E1 cella képlete

  =DARABHATÖBB($A:$A;$D2;$B:$B;E$1)

  Ezt másolhatod az E2:H5 tartományba:
  Az E1:H1 cellákban NE szerepeljen a (db), csakis az eszköz megnevezése.

• #18663 Mutt senior tag kvoaksz #18659

  Új Válasz 2013-07-29 21:42:36 #18663

  Ú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

  

  Mutt

  senior tag

  válasz kvoaksz #18659 üzenetére

  Hello,

  ...ha csoportosítok oszlopokat, de le szeretném védeni (lapvédelem) ..., akkor nem engedi használni a +, - jelet azaz a csoportosítás nem működik, van erre megoldás?

  Csak makróval tudod ezt megoldani:

  Private Sub Workbook_Open()
  With Worksheets("minta")
  .EnableOutlining = True
  .Protect Password:="t1T0k", UserInterfaceOnly:=True
  End With
  End Sub

  üdv

• #18272 Mutt senior tag kvoaksz #18243

  Új Válasz 2013-06-12 22:41:05 #18272

  Ú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

  

  Mutt

  senior tag

  válasz kvoaksz #18243 üzenetére

  Hello,

  Delila_1 megoldása mellett csak függvényeken alapuló megoldásomat innen tudod letölteni.

  

  A színes naptár valójában egy feltételes formázást tartalmazó táblázat. Az adott napokhoz vagy 0, vagy 1-et iratok ki attól függően hogy a név a vizsgált dátummal szerepel-e a beviteli listán vagy sem. Ha szerepel akkor 1 a függvény értéke és ekkor van pirossal kitöltve a cella. A függvény pedig egy sima DARABHATÖBB.
  A 0 és 1 értékeket elrejtettem egy egyedi számformátummal így nem látszanak, de az Excel tud számolni velük.

  Próbáltam interaktívvá tenni ezért van még pár plusz számítás is és formázás is, ezek főleg a számítás lapon vannak. Ezzel csak a beviteli lista első 1000 sorát figyelem és csak az első 25 nevet rakom ki a naptár oldalra.

  Egy igazán profi megoldást a http://chandoo.org/wp/2013/01/24/employee-vacations-tracker-dashboard/ oldalról tudsz letölteni.

  üdv.

• #18249 Delila_1 veterán kvoaksz #18248

  Új Válasz 2013-06-11 13:07:12 #18249

  Ú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 kvoaksz #18248 üzenetére

  Szívesen.
  Örülök, hogy tetszik.

• #18246 Delila_1 veterán kvoaksz #18245

  Új Válasz 2013-06-11 12:41:56 #18246

  Ú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 kvoaksz #18245 üzenetére

  Miért nem tudod kipróbálni? Én is hasraütős adatokkal készítettem.

• #18244 Delila_1 veterán kvoaksz #18243

  Új Válasz 2013-06-11 12:28:59 #18244

  Ú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 kvoaksz #18243 üzenetére

  Írtam rá egy makrót.
  Az A oszlop adataiból az egyedi értékeket kigyűjti az E oszlopba, és ezek mellett színez, ahogy írtad.
  Az F1:AJ1 tartományban dátumok vannak – ezeket írd be –, a cellaformátumuk nn.

  

  Sub Szinezes()
  Dim sor As Long, usor As Long, sor1 As Long, oszlop As Integer
  Dim elsodat As Date, ucsodat As Date, nev$
  
  'Irányított szűrés az E oszlopba
  Range("A:A").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range( _
  "E1"), Unique:=True
  
  'Előző napok hátterének festése fehérre
  Range("F1:AJ1000").Interior.ColorIndex = 2
  
  'Színezés
  usor = Range("A" & Rows.Count).End(xlUp).Row
  For sor = 2 To usor
  nev$ = Cells(sor, "A")
  elsodat = Cells(sor, "B")
  ucsodat = Cells(sor, "C")
  sor1 = Application.WorksheetFunction.Match(nev$, Columns(5), 0)
  For oszlop = 6 To 36
  If Cells(1, oszlop) >= elsodat And Cells(1, oszlop) <= ucsodat Then
  Cells(sor1, oszlop).Interior.ColorIndex = 3
  End If
  Next
  Next
  End Sub

• #18242 Delila_1 veterán kvoaksz #18241

  Új Válasz 2013-06-11 11:45:17 #18242

  Ú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 kvoaksz #18241 üzenetére

  Ez rendben van, de mit akarsz kihozni az adatokból? Azt ábrázold!

  Szerk.: olyan nagy volt az ábra, hogy nem fért el a monitoromon.

• #18240 Delila_1 veterán kvoaksz #18239

  Új Válasz 2013-06-11 11:06:59 #18240

  Ú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 kvoaksz #18239 üzenetére

  Ezt nem értem. Tegyél már ki egy képet!

• #18238 Delila_1 veterán kvoaksz #18230

  Új Válasz 2013-06-11 10:36:52 #18238

  Ú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 kvoaksz #18230 üzenetére

  Itt egy megoldás.

  

  Képletek

  D2 -> {=MIN(HA($A$2:$A$10=$A2;B$2:B$10))}
  E2 -> {=MAX(HA($A$2:$A$10=$A2;C$2:C$10;0))}
  Mindkettő tömbfüggvény, Shift+Ctrl+Enter-rel kell bevinni, akkor kapja meg az elején és a végén a kapcsos zárójeleket. Ezeket másold le a 10. sorig.

  F2 -> =HA(VAGY($D2>=DÁTUM(ÉV($D2);HÓNAP($D2);NAP(F$1))+1;$E2<=DÁTUM(ÉV($E2);HÓNAP($E2);NAP(F$1))-1);"";1)
  Ezt másold az F2:AI10 tartományba. A tartományra adj feltételes formázást. Ahol a cella értéke 1, ott legyen a kitöltés és a betű színe piros, és kapjon a cella fehér keretet.

• #18237 kvoaksz csendes tag kvoaksz #18230

  Új Válasz 2013-06-11 08:38:17 #18237

  Ú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

  

  kvoaksz

  csendes tag

  válasz kvoaksz #18230 üzenetére

  név ;kezd ;vég; tartam
  Alma 2013.06.03 2013.06.04 2
  Alma 2013.06.10 2013.06.14 5
  Barack 2013.06.11 2013.06.15 5
  Körte 2013.06.12 2013.06.12 1
  Körte 2013.06.13 2013.06.14 2

  másik

  név;2013.06.01; 2013.06.02; 2013.06.03; 2013.06.04
  Alma
  Barack
  Körte
  

  =HA(FKERES($A:$A;Munka1!$A$1:$D$6;2;0)=B$1;"x";"")

  Hogy jutok el a következő Almához?
  És hogy írom ki az x-et a következő dátum alá?
  

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