Keresés

Részletes keresés

Gaben16 Creative Commons License 2023.11.23 0 0 37714

Hogyan lehet egy, a munkahelyem lokális hálózati meghajtóján lévő Excel táblázatot közös használatra megosztani? Az Excel korábbi verzióiban ez működött, de most egységesen az Excel 365 verzió lett telepítve. Ebben már nem jön fel csak a megosztás megosztásának a megszüntetése. Csak Onedrive meghajtón engedélyezné, de az nem lenne a legjobb. Van valami megoldás?

kiki71 Creative Commons License 2023.11.14 0 0 37713

Hamis helyére egyszerűen csak B. Egyenlőség az elmondásod szerint kizárva, tehát felesleges az újabb ha függvény.

Előzmény: Fferenc50 (37712)
Fferenc50 Creative Commons License 2023.11.14 0 0 37712

 

Előzmény: Fferenc50 (37711)
Fferenc50 Creative Commons License 2023.11.14 0 0 37711

Szia!

Mit értesz azon, hogy nem működik? Helytelen adatot ír ki vagy hiba az eredmény?

Milyen Excel verziót használsz?

Magyarban magyar függvénynevet (HA) használj.

A határolójel lehet, hogy nem vessző, hanem pontosvessző.

Stb... 

Magyarban ez =HA(G1>H1;"A";HA(H1>G1;"B")) működik.

Még egy kis segítség:

Ha a szerkesztősorban az fx-re kattintasz, akkor megmutatja a függvény állapotát és beírhatod a jó értékeket:

Üdv.

Előzmény: MM10 (37710)
MM10 Creative Commons License 2023.11.14 0 0 37710

Sziasztok.

 

Egy egyszerű if képletről lenne szó amivel problémába ütköztem.
Először is azt szeretném kérdezni,ez így miért nem műkődik? =IF(g1>h1,"A",IF(h1>g1,"B"))

 

illetve ha ezt így nem tudom megoldani,akkor hogyan tudnám? g1 és h1 semmilyen esetben nem lehet egyenlő,így annak a beépítésére nincs szükségem a képletben

 

előre is köszönöm a segítséget

 

Tutti a Frutti Creative Commons License 2023.11.12 -1 0 37709

Hát, vannak fenntartásaim, programozók állandóan azt bizonygatják, hogy mit nem lehet megoldani adatbázissal, de ha meggyőzöl, nézzük meg, mire jutunk. :-))

 

Irj egy rövid példát, hogy te hogyan gondolod a gyakorlatban, vagy Te írtál egy nagyon "lebutított" vázlatot, vagy én bonyolítom túl a végtelenségig.

 

Igen, csak szöveges adatról van szó, csak az embereknél kellenek kapcsolódó adatok, mint elérhetőség (jellemzően mél cím, vagy mobiltelefon), illetve a munkaköre. Valamint az egyéb adatok, hogy adott feladattal megbízott személy, vagy adott főnök rokona, vagy más cégnél lévő üzleti kapcsolata, de azok talán első körben nagyon bonyolultak lennének.

 

Az jutott még eszembe, hogy a "jegyzőkönyv" két részből áll, az egyik, amit írtam, kezdettől zárásig leírás, hogy mi történt és kik szóltak, hozzá, valamint az is benne van, hogy a gyűlés közben mely fontos személy jött, vagy ment el. Mellette van egy jelenléti ív, amit mindenki aláír, aki ott volt, de a leírásban látható, ha az illető csak pl. tíz percre ugrott be, mert egy kérdésben szükség volt rá, a többi nem érdekelte.

Előzmény: Garashan (37696)
Andyyy42 Creative Commons License 2023.11.12 0 0 37708

Szia,

az átméretezés rendben működik, köszönöm szépen! :)

A szűrök viszont nem frissülnek vmiért, nem követik le a táblázat adatait. :-(

 

Ellenben ha minden táblázat átméretezés után, makróval feldobálom a szűrőket, akkor az úgy igazából rendben működik, kivéve azt a kis optikai problémát, hogy így lehetnek nagy szűrőkben egy-egy gombok csak, de az alapjuk viszont megmarad nagynak. De ezt a részét el tudom igazából most már engedni :-) Mégsem annyira néz ki rosszul, mint azt elsőre gondoltam.

 

Szóval köszönöm szépen! 
Így már elboldogulok szerintem:-)

 

Mindenkinek köszönöm még1x! :-)

 

Szép vasárnapot!

Előzmény: Fferenc50 (37706)
Fferenc50 Creative Commons License 2023.11.11 0 0 37707

Szívesen.

Előzmény: Ketele69 (37705)
Fferenc50 Creative Commons License 2023.11.11 0 0 37706

Szia!

A szűrés újrafuttatása előtt nem kell szerintem törölni a Rendszerezett Adat munkalapon levő táblázatot

Ezt a makrót futtasd a szűrés után:

Sub modos()
With Munka2.ListObjects("Táblázat1")
If Munka2.Cells(Rows.Count, 1).End(xlUp).Value <> "" Then
.Resize Range(.Range.Cells(1, 1), Munka2.Cells(Munka2.Cells(Rows.Count, 1).End(xlUp).Row, _ .Range.Columns.Count))
Else
.Resize Range(.Range.Cells(1, 1), .Range.Cells(1, 1).End(xlToRight).End(xlDown))
End If
End With
ActiveWorkbook.SlicerCaches("Szeletelő_Eladó_Megye").RequireManualUpdate = False
End Sub

Az első rész hozzáigazítja a táblázatot az újra szűrt adatokhoz. Az utolsó sor pedig frissíti a Slicereket.

Megjegyzések:

1. Munka2 = a Rendszerezett Adat munkalap programozási neve (Codename), használható a Sheets("név") helyett.

2. A "With --- End With között részben a With sorban levő objektumra hivatkozhatunk a . (pont)-tal. Rövidebb és gyorsabb is a programirás és futás.

3. A Resize változtatja meg a táblázat méretét 

Remélem sikerül, amit szeretnél.

Ha kérdésed lenne, írj bátran.

Üdv.

Előzmény: Andyyy42 (37704)
Ketele69 Creative Commons License 2023.11.11 0 0 37705

Köszönöm szépen, remekül működik!

 

Előzmény: Fferenc50 (37695)
Andyyy42 Creative Commons License 2023.11.11 0 0 37704

Szia,

 

Itt egy példa, gyorsan netről szedtem le egy adatokkal lévő excelt.
(Fórum példa)

Szóval az "Alap Adat" fülre töltjük be a rendszerből kiimportáld adatokat, excelbe tölti le, értékként. (AlapAdat 5000 sor + 57 oszlop)
Ez a példában 57 oszlopból áll.

A "Rendszerezett Adat" fülön már történt egy irányított szűrés, hogy csak azokat hozza át amiben "Tehermentes" és "Légzsák" "IGAZ", de csak az 57 oszlopból nekem elég 8 oszlop adatsora, a többi felesleges. (Így  a Rendszerezett Adat 1229 sor + 8 oszlop) 

Az így kapott "letisztított adatsorban" kell különböző szeletelőket használnom, példában 3-at. (Eladó Megye + Beadás Nap Neve + Beadás Hónapja)

És ezeket használva szűrünk ki adatokat. 
Ezek a szeletelős megoldás azért kell, hogy aki nem ért az excelhez, az is tudja a szeletelőkkel szűrni az adatokat. (Az alapadatot VBA - makróval töltetem be - szóval az egy gombnyomás nekik + az irányított szűrést is makrógombbal oldom meg, az a második gombnyomás nekik)

 

Ahhoz, hogy szeletelőim legyenek, az irányított szűréssel megkapott adatsort táblázattá kell alakítanom előtte.


Na ez így rendben is van eddig.

 

De ha holnap új adatsort töltök be az Alap adat fülre, akkor borul minden.
(Fórum példa2)
AlapAdat 50 sor + 57 oszlop
Rendszerezett Adat az irányított szűrést követően 11 sor + 8 oszlop

 

És így ekkor a szeletelelőkben megjelent az "üres" adatra szűrés opció, mivel a táblázat megtartotta az eredetei méreteit, amit a szeletelők továbbra is kezelnek.
És ezekre nem lenne szükségem. Ez történik, ha korábban nagyobb adat volt benne és az új adatbetöltésnél kevesebb adatsor szerepel.

És küldök egy harmadik verziót is (Fórum példa3), amikor korábban kevesebb adat szerepelt benne, de aztán több adatsor került betöltésre.
Itt sem működnek jól a szeletelők, mert csak az eredeti táblázat méretében lévő adatokat szűrik, holott most több adatot hozott az irányított szűrés.


https://data.hu/get/13947523/Forumra_pelda.xlsx
https://data.hu/get/13947524/Forumra_pelda2.xlsx
https://data.hu/get/13947525/Forumra_pelda3.xlsx

 

Előzmény: Fferenc50 (37699)
Fferenc50 Creative Commons License 2023.11.11 0 0 37703

Szia!

Nekem úgy tűnik, hogy a Slicernek nincs automatikus méretezése sajnos.

Így minden Slicert nekünk kell méretezni.

Üdv.

Előzmény: Andyyy42 (37702)
Andyyy42 Creative Commons License 2023.11.11 0 0 37702

"Alapvetően nekem az kellene, hogy a 2-es munkalapon lévő adat (ami táblázat formátumban van) lekövesse a forrásadat változásait (1-es munkalap), mind tartalomban, mind méretben"
- azzal kiegészítve, hogy ugye nem kell minden oszlop a 1-es munkalap adataiból, csak egy része (erre használom az irányított szűrőt)

Előzmény: Andyyy42 (37701)
Andyyy42 Creative Commons License 2023.11.11 0 0 37701

Alapvetően nekem az kellene, hogy a 2-es munkalapon lévő adat (ami táblázat formátumban van) lekövesse a forrásadat változásait (1-es munkalap), mind tartalomban, mind méretben

 

Szóval valahogyan összekapcsolni őket.

 

Egyébként úgy megcsináltam, hogy a 2-es munkalapon sima Fkeresel bekerestem az 1-es tábla adatait, de így ugye kénytelen voltam a 2-es tábla függvényeit oszloponként nagyon sok celláig lemásolni, mivel nem ismerem előre, hogy az 1-es munkalapban mekkora adat lesz

így viszont a 2-es munkalap rengeteg üres cellát hoz eredményül, amit optikailag el tudok tüntetni, hogy ne látszódjon, de a slicer viszont érzékeli őket, mint üres cella = üres adat és beteszi opciónak, mint szűrőfeltétel és az is hülyén néz ki

Előzmény: Andyyy42 (37700)
Andyyy42 Creative Commons License 2023.11.11 0 0 37700

erre én is gondoltam már és ez lesz akkor, ha mást nem tudok/tudunk kitalálni
Csak ezzel azért nem tökéletes mert a slicer-ben lévő szűrési "gombok" száma, függ attól, hogy a szűrendő adatban mennyi féle különböző adat van
(például 1-12-ig is lehet, ha csak a hónapokat vesszük).

És ugye makróval nem tudom a slicer méretét a benne lévő gombok darabszámohoz igazaítani, csak egy fix méretre tudom elkészíteni őket a makróval, így viszont minden slicert mindig a lehető legtöbb opcióhoz kell méreteznem, mert nem tudhatom előre mennyi "gomb" lesz majd benne.

 

Így alakulhat olyan szitu, h nem fog jól kinézni, mert egy baromi nagy slicerben lesz 2 gomb.

 

De alapvetően ez lesz egyébként, ha máshogy nem megy.
(csak szeretném, ha igényesen is nézne ki, a funkció mellett :-) )

Előzmény: _Nyuszi (37698)
Fferenc50 Creative Commons License 2023.11.11 0 0 37699

Szia!

"Az egyik munkalapon rendszerből lekért adatsor van (nem táblázatos formában), különböző adatokkal."

Ez milyen módon kerül a munkalapra, milyen lekérdezéssel? 

A lekérdezett adatok mindegyikére szükség van a későbbiekben?

Irányított szűrés helyett nem lenne jobb egy kimutatás létrehozása, amit a forrás változása esetén csak frissíteni kell? A kimutatáshoz ugyanúgy lehet slicereket létrehozni.

Esetleg egy mintafájlt adhatnál - természetesen nem éles adatokkal - , amivel esetleg jobban tudnánk gondolkodni.

Üdv.

Előzmény: Andyyy42 (37697)
_Nyuszi Creative Commons License 2023.11.11 0 0 37698

Hülye ötlet, de...

Mi lenne, ha a makró futtatásakor a slicereket törlöd és újra létrehozod? Nem a slicer lesz dinamikus, de így le tudod követni a változásokat.

Az ötlet elméleti, sosem használtam őket (sőt, az angol nevét sem, rá kellett keressek, hogy miről van szó), de ez működhetne, nem?

Előzmény: Andyyy42 (37697)
Andyyy42 Creative Commons License 2023.11.11 0 0 37697

Sziasztok,

 

A lentiekre lenne vkinek  megoldása?

 

Van egy excel munkafüzet, két munkalappal
Az egyik munkalapon rendszerből lekért adatsor van (nem táblázatos formában), különböző adatokkal.
Ez az adatmennyiség minden egyes lekérésnél módosul.
(Ezen a munkalapon van még hozzáadott oszlop, ami a bekért adatokból nyer ki további infókat.)


A másik munkalapon már csak azokat az adatokat jelenítem meg, ami nekünk kell, ezt irányított szűrővel teszem meg (makrósítva).
Aztán a leszűrt adatmennyiséget táblázattá alakítva 4-5 hozzáadott slicer-rel használjuk.

Szóval a második munkalapon, már az eredeti adat egy leszűkített változata szerepel, amiben slicer-rekkel "kedvünkre" tudunk további szűréseket végezni.

 

És itt jön a probléma:
Amennyiben változik az alap adatmennyiség az első munkalapon (ez lehet több is vagy kevesebb is, szóval nem folyamatosan nő), a második munkalapon lévő makrósított irányított szűrő nem tudja lekövetni, hiszen a slicerek miatt azt az adatsor táblázattá kellett alakítani.

Amennyiben nem alakítom táblázattá, akkor ugye le tudom követni az irányított szűrést a makróval, de akkor meg nincsenek meg a  slicer-ek, hiszen azok táblázathoz kapcsolódnak.

Illetve fontos kritérium a második munkalapon ne maradjanak üres sorok, hogy a slicerek ne hozzanak üres mezőre történő szűrési opciót.
azaz, ha az irányított szűrés után a leszűrt adatom 10 soros, akkor a slicerek azt lekövessék, ha 100 soros, akkor a slicerek, azt kövessék le.

És mindezt automatizálva kellene megoldani, hogy az excel az első munkalapra befrissített adat után, a második munkalapon a már irányított szűréssel leszűrt adatokat mutassa, és az ehhez tartozó slicerek is módosuljanak (például, ha hónapban csak két hónap van akkor csak azt a két hónapot hozza fel a sliceren belül, ha 12 hónap van, akkor meg mind a 12 hónapot)

 

 

Szóval az kellene, hogy az első munkalapra betöltött változó adatmennyiséget a második munkalap mindig lekövesse, de táblázat formában, hogy a slicerek is dinamikusak maradjanak.

Ez megoldható?

 

 

Garashan Creative Commons License 2023.11.10 0 0 37696

Szeretem a kihívásokat!

Ha gondolod és pontosítunk, hogy mit is szeretnétek pontosan, akkor Excelben megpróbálom megoldani a problémátokat.

Van gyakorlatilag kész makróm, amivel Access adatbázist tudok manipulálnia. Kiolvasni, hozzáírni.
Ha megbeszéljük, hogy pontosan mihez, milyen adatokat szeretnétek elmenteni kereshetően, akkor nem olyan nagyon bonyolult a dolog. A lényeg, hogy jól legyen felépítve az adatbázis szerkezete.

 

Ha jól értem, akkor egy gyűlésnél több bejegyzés is születik. Mindegyik kap egy az adott gyűlésre jellemző címkét.

Úgymond a fő bejegyzés kb. a mikor, hol és kik voltak jelen valamint a napirendi pontok felsorolásából áll.

Utána napirendi pontonként külön bejegyzések jönnek. Ez már két címkét kap. Az egyik a gyűlés címkéje, a másik az adott napirendi pontra jellemző címke.

Ezzel le is zártuk úgymond az első körös adatrögzítést.

Majd pl. amikor jön egy e-mail Józsi bácsitól az elektromos kapu javításával kapcsolatban, akkor az rögzítésre kerül a saját címkéjével. Ami már létezik, mert a gyűlésen szó volt róla, hogy meg kell javítani.

A címkékre tudunk szűrni adatbázisban, mert akkor azok egyediek lennének. A szűrés eredményeit pedig ki tudjuk írni egy sima TXT fájlba. Így ha a közgyűlés "jegyzőkönyve" kell, akkor a gyűlés címkéjére keresünk rá és akkor gyakorlatilag a bevezetőt és a napi rendi pontokat is kiírná a fájlba. De ha az elektromos kapu javításának a folyamata érdekes számunkra, akkor annak a címkéjére keresünk rá. Ekkor csak a közgyűlés adott napirendi pontja kerülne a fájlba írásra, ahol erről volt szó, valamint Józsi bácsi árajánlata. Ha pedig már kivitelezésre is került és ez rögzítésre is került az adatbázisban, akkor természetesen az is bele lenne írva. Utána azt a fájlt ki tudnátok nyomtatni.

Az egyszerűség jegyében csak szövegszerű tartalmakat tudna kezelni. Amennyiben fontos lenne, hogy pl. képeket is tudjon kezelni, akkor lehet, hogy az is megoldható, de az már bonyolítja a helyzetet, mert akkor már nem elég sima txt fájlba kiírni a keresés eredményeit.

Előzmény: Tutti a Frutti (37692)
Fferenc50 Creative Commons License 2023.11.10 0 0 37695

Szia!

Egy segédoszlopot feltöltesz egyesekkel (1). Nálam ez az AC oszlop, a sorszám az AD oszlopban van.

Ezután a sorszám oszlopban a képlet:

=RÉSZÖSSZEG(109;$AC$1:$AC2)

Ezután bekapcsolod a szűrőt, (itt a dátum 2021) az eredmény:

A RÉSZÖSSZEG függvény 109-es paramétere ugyanis csak a szűrt tartományra érvényesíti az összesítést.

A segédoszlop természetesen a táblázattól függetlenül és elrejtve is működik, arra vigyázz, hogy a szűrés érvényesüljön rá.

Üdv.

Előzmény: Ketele69 (37694)
Ketele69 Creative Commons License 2023.11.10 0 0 37694

Sziasztok!

 

Van egy adatbázisszerűen felépülő táblám, az oszlopfejlécekben autószűrővel. Az első oszlop sorszám. Ha leszűröm az adatokat a sorszám persze elállítódik. Létezik megoldás arra, hogy a sorszámozás mindig  frissüljön a szűrésnek megfelelően?

 

Köszönöm,

 

local75 Creative Commons License 2023.11.10 0 0 37693

Bármelyik rendszer is volt az, a titkárnőn nagyon sok múlott.

Amit felsoroltál, azt mind meg lehet csinálni Excelben, vagy például a Trelló segítségével.

A felhasználón múlik hogy mit hoz ki a rendszerből, és mennyire alapos.

 

Előzmény: Tutti a Frutti (37692)
Tutti a Frutti Creative Commons License 2023.11.10 0 0 37692

Megnyugodtam, hogy nem bennem van a hiba, mert látom a későbbi hozzászólásokból is, hogy egészen másmiről írnak.

 

Biztos, hogy nem adatbázis volt, Access-t többször, mysql-t egyszer láttam, azt csak programozó tudja kezelni, aki nagyon utálja az egyedi feladatokat.

 

Leírtam, hogy mit láttam, de álljon itt újra, hátha segít:

 

Először nekiült és begépelte az aznapi gyűlést, hogy mikor és hol volt és kik voltak jelen, mik voltak a tervezett napirendi pontok, majd napirendi pontonként az egyes résztvevők beszámolóit, majd a kérdéseket és válaszokat.

 

Ezt szövegfájlként kinyomtatva eltette.

 

Majd, amikor valamit kérdeztek tőle, hogy pl. fél éve volt valami feladat, és az hogyan áll, akkor matatott valamit, majd kinyomtatott egy olyan szövegfájlt, amiben már az szerepelt, hogy pl. fél éve egy gyűlésen döntés volt valamiről, majd egy héttel később hasonló gyűlésen másik döntés volt a résztvevőkről és költségvetésről, stb. és még olyanok is voltak, hogy pl. Piftuka egy ismerőse telefonált valamikor, hogy megszerezte a kért dolgot és küldi postán Piftuka részére a céghez utánvétellel, stb.

 

Tehát az egész úgy nézett ki, mintha egy szövegfájl lenne, de minden bekezdés a különböző gyűlések bekezdéseiből és más, csak általa ismert dolgokból - pl. telefonüzenet, vagy postai küldemény - állt.

 

Biztos, hogy nem programozott semmit, csak a különböző szövegeket látta, ezért volt a tipp, hogy valami iktatórendszer lehetett - csakhát iktatórendszerbe csak postát és üzeneteket irnak, gyűlések jegyzőkönyveit nem.

Előzmény: Garashan (37681)
Fferenc50 Creative Commons License 2023.11.10 0 0 37691

Induló ablak

Eredmény:

Előzmény: Fferenc50 (37690)
Fferenc50 Creative Commons License 2023.11.10 0 0 37690

Szia!

Fejlesztőeszközök-Excel bővítmények - bepipálod a Solver bővítményt.

Ezután az Adatok menücsoportban megjelenik a Solver.

Előkészítés a Solver használatához:

1. Egy üres munkalap A oszlopába átmásolod az adott nyitott értékeket.

2. A munkalap B oszlopába kerülnek a súlyok - 0 vagy 1 lesz az értékük, most hagyd üresen.

3. A munkalap C1 cellájába kerül ez a képlet: =SZORZATÖSSZEG(A1:A5;B1:B5)

Rákattintva párbeszéd panelt kapsz, így néz ki a példámmal kitöltve:

 

Tehát a Solver a B oszlop celláit fogja 0 és 1 értékre állítani, annak érdekében, hogy a C1 cella értéke a megadott legyen.

A korlátozásokat a Hozzáad gombbal tudod bevinni, FONTOS hogy bináris legyen a korlátozás.

A megoldás gombra kattintva megmutatja az eredményt - vagy azt mondja, hogy nincs megoldás.

Ha van megoldás, ezt látod:

Remélem, sikerül megoldanod.

Üdv.

Nyáúkász Creative Commons License 2023.11.10 0 0 37689

Sziasztok!

Tudnátok segíteni, hogy hogy tudnám megtekinteni, hogy egy összeg milyen elemekből áll?
Egyik partnerünk kifizette néhány számláját, de csak a végösszeget látom, és szeretném tudni, hogy ez a végösszeg pontosan milyen elemekből tevődik össze?
Tehát van esetleg arra lehetőség, hogy lehívom a nyitott tételek listáját, és valahogy lekérem belőle azon összegek kombinációját, amik kiadják az utalt végösszeget?

 

Előre is köszönöm!

Eredő Vektor Creative Commons License 2023.11.07 0 0 37688

Ez adatérvényesítéssel lehetséges szerintem. Ugyanis az adatérvényesített celláknál be lehet "karikázni" az érvénytelen adatot tartalmazó cellákat.

Előzmény: Ketele69 (37686)
Fferenc50 Creative Commons License 2023.11.07 0 0 37687

Szia!

Szerintem ikonkészlettel csak egymáshoz viszonyított relatív értékeket/adat sávokat lehet feltételes formázással megjeleníteni, egy adatkörön belül, ugyanúgy, ahogyan színskálákkal is.

Képlet esetén ikon lehetőséget nem látok. 

Üdv.

Előzmény: Ketele69 (37686)
Ketele69 Creative Commons License 2023.11.06 0 0 37686

Sziasztok!

Feltételes formázás/ikonkészlet/képlettel témakörben kérnék tanácsot.

 

Az "A" oszlopban kizárólag azokat a cellákat szeretném megjelölni pl. egy piros körrel, melyek megfelelnek annak a kritériumnak, hogy =ÉS(B$1>0;A$1>B$1)

 

Tudom, hogy van más módszer, amivel kijelölhető/színezhető az egész cella, de most kifejezetten arra vagyok kíváncsi, hogy ez ikonkészlettel megoldható-e?

 

Köszönöm,

local75 Creative Commons License 2023.11.06 0 0 37685
local75 Creative Commons License 2023.11.06 0 0 37684

Nem tudom jól hámoztam-e ki a mondandódból, de azt gondolom a Trello a segítségetekre lehet.

 

Bár mostanában már nem igazán használom, helyette Figmát használok jegyzetelésre, és mindenre is.

Csapatmunkára a legjobb választás mindkettő.

Érdemes elmélyülni bennük. PC-re, iPadre, mobilra is elérhető mindkettő. A FigJam-ben pencillel is jegyzetelhettek, és valós időben láthatjátok egymás tevékenységét.

A printelés módját, és lehetőségét ellenőrizni kell, ha ez fontos.

Előzmény: Tutti a Frutti (37678)
hellsing Creative Commons License 2023.11.04 0 0 37683

Szerintem egy ticketing rendszer kell nektek. Alapból ügyfélszolgálatoknak találtak ki, de ezeket használják a szoftverek hibakövetésére is (pl. Bugzilla). Ezekbe bárki (jogosult) felvihet témákat, hozzárendelhet felhasználókat, akik kommentelhetik, vagy rögzíthetik a jegy státuszának változásait (pl. új hiba, személyhez rendelve, több infó kell, javítva, ellenőrizve stb.) vagy bármilyen más munkafolyamat lépéseit.

 

Ha van belső szerveretek, még külsős tárhelyet sem kell bérelni, mert alig kell erőforrás. Ha nincs, az sem  katasztrófa, kb. évi 10-20eFt-ból megvan. A szoftverek, amelyeken fut, mind ingyenesek (Apache webszerver, MySQL adatbázis). A fejlesztés tényleg sokba kerülhet, de ha nem akartok sok extra fícsört, akár nevetségesen olcsó is lehet (a CodeCanyon-on pl. 16$-tól vannak kész rendszerek). Már csak kell valaki, aki párszor ennyiért telepíti és beállítja.

Előzmény: Tutti a Frutti (37678)
_Nyuszi Creative Commons License 2023.10.31 0 1 37682

Neked válaszolok, hogy egyben maradjon a thread, de a vitaindítóhoz szól:

Webes fórum, mint pl. ez?

Egy ingyenes weboldal ingyenes fórummotorral, ahol tudsz tagelni (akár szögletes zárójellel, akár hashtaggel), és arra keresni.

Ezt egyszerre többen is tudjátok szerkeszteni, rendezhető, törölhető, kereshető.

Előzmény: Garashan (37681)
Garashan Creative Commons License 2023.10.30 0 0 37681

Az első bekezdésre reagálva, azért nem annyira drága a dolog. Lehet bérelni is tárhelyet.

 

Én elvesztettem a fonalat, hogy pontosan mit is szeretnétek. Szerintem ugyan arról beszélünk amúgy.

Maradva az adatbázisnál, vannak korlátai, de messzemenőleg nem olyan szűkek, mint azt gondolnád. Lehet bennük komplett szöveges dokumentumokat is tárolni. Adattípus szerint 65.000, 16.800.000 vagy 4.300.000.000 karakter tárolására van lehetőség. Ha csak feljegyzéseknek kell, akkor szerintem untig elég a 65.000 is.

Ezt megfelelő programmal pedig úgy jeleníted meg ahogy szeretnéd.

Tovabbá annyi témakört rendelsz hozzá, amennyit szeretnél.

 

Ha DOS-os volt az alap program, akkor szinte biztosan Windowson futott a "megbuherált" változata. A WIN98-ig, ha nem csal az emlékezetem, akkor futott szinte az összes ahhoz képest nem túl öreg dos-os program. Maga a WIN98 is DOS alapú volt még.

Előzmény: Tutti a Frutti (37680)
Tutti a Frutti Creative Commons License 2023.10.30 -1 0 37680

Köszönöm a választ.

Többször ki lettünk oktatva, hogy mi buta felhasználók vagyunk és hülyék az IT-hez, ilyet csak mérnökök tudnak megtervezni és rendszerterv kell hozzá jó sok pénzért és persze felhő meg webszerver, szóval, milliós az induló költség.

 

De az biztos, hogy nem adatbázis, mert ott meg vannak szabva, hogy milyen adatbázisban milyen adatokat lehet bevinni és milyen formában.

Olyat használják külön a pénzügyesek, van külön a könyvelőknek, meg a bérelszámolóknak és vannak, akik excelt használnak rengeteg munkafüzettel.

 

A szuper megoldás az olyan szöveges valami volt, amiben tetszőlegesen tudta összekapcsolni a különböző adatokat, és mindig gyorsan ki tudta deríteni, hogy mi mivel volt összefüggésben.

Ráadásul úgy, hogy egyben voltak a beírások, és mégis, amikor szükség volt rá, akkor a kapcsolatok révén úgy tudta kinyomtatni a különböző beírásokat, mintha egyetlen szövegfájl lett volna.

 

Próbáltunk szöveges fájlokat csinálni, de amikor ötven fölé mentünk, már nem tudtuk, hogy melyikben mi van, és nem lehetett őket összekötni, csak fizikailag másolni a tartalmak egy részét.

 

Félfüllel hallottam, hogy talán valami régi DOS-os, még az 1990-es években kötelezővé tett iktatóprogramnak volt valami megbuherált változata, de biztos, hogy windowsos vagy linuxos volt, nem DOS-os.

 

Hihetetlen dolgokat tudott vele pillanatok alatt kideríteni, csak néztünk.

 

Előzmény: Garashan (37679)
Garashan Creative Commons License 2023.10.28 0 0 37679

Van sejtésem róla, hogy mit is szeretnél. Hogy őszinte legyek nem tudok ilyen jellegű programról.

De el tudok képzelni egy webes programot, ami ezt tudja. Az én olvasatomban ez viszonylag primitív program.

Ha jól értem az kell, hogy legyen egy adatbázis, amiben rögzítésre kerül, hogy ki, mikor, mit és melyik témához ír hozzá. Aminek kell hogy legyen egy rögzítő lapja és egy lekérdező lapja.

Ezt meg lehet oldani PHP és SQL alapon netes felületen. Ennek előnye, hogy ha publikus szerveren van, akkor bárhonnan és bármikor írható/olvasható. Ha helyi hálón van, akkor viszont kell egy szerver, ami ezt kiszolgálja, de "csak cégen belül" lesz elérhető.

Netes alapon egyszerre több eszközön is mehet az adatbevitel és az olvasás is.

 

De egyszerű excel dokumentumban is nyilvántartható. Akkor viszont egyszerre csak egy ember tudja szerkeszteni. (Kivéve Office 365 esetében). Ha vállalati közös tárhelyre van mentve, akkor többen is hozzáférhetnek és többen is szerkeszthetik egy időben. Viszont ügyelni kell rá, hogy ne írják felül egymás adatait.

 

Vagy lehet kombinálni a kettőt. Van egy adatbázis fájl, ami céges szerveren van és az tartalmazza az adatokat. Ehhez hozzá lehet férni excelben írt makrókkal és lehet azokat írni/olvasni.

Előzmény: Tutti a Frutti (37678)
Tutti a Frutti Creative Commons License 2023.10.28 0 0 37678

Előre is elnézést kérek az off témáért, nem találtam megfelelő fórumot és a beírások tömegét olvasva úgy látom, itt az értelem uralkodik, ezért kérdezem:

 

Létezik "elektronikus titkárnő", vagy olyan program, amivel azonnal lehet mindenféle témához hozzáírni az aznapi fejleményeket, és ha kell, témánként látni, hogy csak abban a témában mikor mi történt?

 

Most abba a helyzetbe kerültünk, hogy elvesztettük a titkárnőt, akinek egyetlen jegyzetfüzete volt, abba írt mindent, de utána mégis mindig minden ügyről volt nyomtatott kimutatása, mikor mi történt.

 

Hasonló program kellene, az összejövetelen valaki beírja, hogy adott témákban mi történt, és később a beírásokat már a témákban lehet látni időrendi sorrendben.

 

 

Garashan Creative Commons License 2023.10.25 0 0 37677

Meg itt vagyunk mi is, legalább mi is gondolkodunk problémákon.

 

Igaz a végső megoldáshoz most nem járultam hozzá, mert még úton voltam hazafelé. De ez egy nagyon segítőkész közösség.

Előzmény: kiki71 (37676)
kiki71 Creative Commons License 2023.10.25 0 0 37676

Az előbb küldted már és le is mentettem ezt a linket. Nem  ismertem. :)

Előzmény: Fferenc50 (37675)
Fferenc50 Creative Commons License 2023.10.25 0 0 37675

Szia!

Excel Visual Basic for Applications (VBA) reference | Microsoft Learn

Itt találhatsz elég jó angol nyelvű anyagot a VBA-ról.

Sokat segít még a makró rögzítés is.

Üdv.

Előzmény: kiki71 (37673)
kiki71 Creative Commons License 2023.10.25 0 0 37674

Tökéletesen és gyorsan működik. KÖSZÖNÖM a segítséget.

Dim rng As Range
Set rng = ActiveSheet.UsedRange
With rng
.RemoveDuplicates Columns:=Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38), Header:=xlYes
End With

Előzmény: Fferenc50 (37672)
kiki71 Creative Commons License 2023.10.25 0 0 37673

Köszönöm. Kipróbálom és jelentkezem. Úgy szoktam meg openai-val :). Sajnos nem nagyon találok neten fellelhető okulási anyagot hozzá. Ezt dobta a gép.

Előzmény: Fferenc50 (37672)
Fferenc50 Creative Commons License 2023.10.25 0 0 37672

Szia!

Miért kell összefűzni, ez rengeteg időt követel. Az ismétlődések eltávolításánál felsorolhatod (akár) az összes oszlopot is:

ActiveSheet.Range("$A$1:$AL$7271").RemoveDuplicates Columns:=Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33 , 34, 35, 36, 37, 38), Header:=xlYes

Így csak azokat a sorokat törli, ahol minden cella tartalma egyezik.

Üdv.

Ps: Próbáld makrórögzítéssel megoldani amit csinálsz kézzel, abból sokat lehet tanulni.

Előzmény: kiki71 (37671)
kiki71 Creative Commons License 2023.10.25 0 0 37671

Nem tudom, hogy egyértelmű volt-e, hogy csak azok a sorok duplikációját kellene teljesen törölni, amelyik soroknál minden cella egyezést mutat egy másik sorral.

Előzmény: kiki71 (37670)
kiki71 Creative Commons License 2023.10.25 0 0 37670

Ezzel próbálkoztam. :)

Dim utolsoSor As Long

utolsoSor = Cells(Rows.Count, "A").End(xlUp).Row
Dim RangeToCheck As Range
Set RangeToCheck = Range("A1:AL" & LastRow)
Columns("AM:AM").formula = "=A1&B1&C1&D1&E1&F1&G1&H1&I1&J1&K1&L1&M1&N1&O1&P1&Q1&R1&S1&T1&U1&V1&W1&X1&Y1&Z1&AA1&AB1&AC1&AD1&AE1&AF1&AG1&AH1&AI1&AJ1&AK1&AL1"
RangeToCheck.RemoveDuplicates Columns:=Array(39), Header:=xlYes ' Az 39. oszlop tartalmazza az egyesített értékeket
Columns("AM:AM").ClearContents

Előzmény: Fferenc50 (37669)
Fferenc50 Creative Commons License 2023.10.25 0 0 37669

Szia!

A Range RemoveDuplicates tulajdonságát használhatod.

Range.RemoveDuplicates method (Excel) | Microsoft Learn

Üdv.

Előzmény: kiki71 (37667)
Garashan Creative Commons License 2023.10.25 0 0 37668

Akkor a kódot kell még optimalizálni.

Előzmény: kiki71 (37667)
kiki71 Creative Commons License 2023.10.25 0 0 37667

Köszönöm. Igen ezt próbáltam már, sokkal gyorsabb lett, mint nélküle, de így is jóval lassab, mint Menüből.

Előzmény: Garashan (37666)
Garashan Creative Commons License 2023.10.25 0 0 37666

A kódot nem ismerve én a következőt mondanám.

 

Rögtön a kód elejére: 

Application.ScreenUpdating = False

Application.Calculation = xlCalculateManual

 

A kód végére pedig:

Application.ScreenUpdating = True

Application.Calculation = xlCalculationAutomatic

 

Ezzel letíltod a képernyő frissítését és átállítod manuális frissítésre a függvényeket.

Majd a kód végén ismét engedélyezed a képernyő frissítését és visszaállítod automatikusra a függvények számolását.

Előzmény: kiki71 (37665)
kiki71 Creative Commons License 2023.10.25 0 0 37665

Jól sejtettem, hogy a dátummal van a gond és az általad átírt kóddal tökéletesen működik (az első változatot próbáltam ki, másik kettőt még meg kell értenem (tanulom a VBA-t)). Köszönöm mindenkinek a gyors segítséget, kb 1hónapja kűzdöttem vele.


Lenne még egy kérdésem esetleg hátha erre is tudtok megoldást:
Ismétlődések eltávolítása nagy adathalmazból.

Volt rá egy kódom amit kiokoskodtam, de nagyon lassú volt. Ugyan ennél az adathalmaznál a Menű -> Ismétlések eltávolítása pillanat alatt megoldotta. Ezt, hogyan lehetne lekódolni, hogy ilyen gyors legyen?

Előzmény: Fferenc50 (37662)
kiki71 Creative Commons License 2023.10.25 0 0 37664

Kipróbálom, Utánna jelentkezem. :)

Előzmény: Fferenc50 (37662)
kiki71 Creative Commons License 2023.10.25 0 0 37663

Ugyanezt a metódust használtam egy másik részen (igazából azt kopiztam le), de ott nem dátumot, hanem szöveget szűrtem és ott is A1-van és ott működik. ezért gondolom, hogy A1-el nincs gond.


Range("A1").Select
If ActiveSheet.AutoFilterMode Then
ActiveSheet.AutoFilterMode = False
End If
ActiveSheet.Range("A1").AutoFilter Field:=4, Criteria1:="*SZÖVEG*"
Dim adatTartomany As Range
Dim masolniTartomany As Range
Set adatTartomany = ActiveSheet.AutoFilter.Range
Set masolniTartomany = adatTartomany.SpecialCells(xlCellTypeVisible)

Előzmény: Eredő Vektor (37661)
Fferenc50 Creative Commons License 2023.10.25 0 0 37662

Szia!

Az alap probléma az, hogy a dátumot az Excel makróban az amerikai "stíl" (MM/DD/YYYYY") szerint kell megadni, bármilyen formátumban és nyelven van is az adott táblázatban. Ez sajnos némi trükközést - függvény többszörözést - igényel. Ráadásul a szűrőben szöveg formátumban használandó. Az általad mutatott feltétel így hozható létre makró által "ehetően":

Dim startDate As String
Dim endDate As String

startDate = Replace(Format(DateSerial(2022, 1, 1), "MM.DD.YYYY"), ".", "/")
endDate = Replace(Format(DateSerial(2023, 1, 1), "MM.DD.YYYY"), ".", "/")
ActiveSheet.Range("A1").AutoFilter Field:=1, Criteria1:=">=" & startDate, Operator:=xlAnd, Criteria2:="<" & endDate

DE létezik ennél egyszerűbb lehetőség is időszakok szűrésére. Ilyenkor a Criteria2 paramétert kell használni az alábbi formátumban:

Also used as single criteria on date fields filtering by date, month or year. Followed by an Array detailing the filtering Array(Level, Date). Where Level is 0-2 (year,month,date) and Date is one valid Date inside the filtering period.

Vagyis 2022 éves szűrés:

ActiveSheet.Range("$A$1").AutoFilter Field:=1, Operator:= xlFilterValues, Criteria2:=Array(0,  "12/31/2022")

Szűrés november-decemberre:

ActiveSheet.Range("$A$1").AutoFilter Field:=1, Operator:= xlFilterValues, Criteria2:=Array(1, "11/30/2022", 1, "12/31/2022")

A szűrendő tartományt természetesen nem árt megadni egzaktul, de az Excel képes "kitalálni", amennyiben pl. az A1 cella része a tartománynak, akkor az egész tartományt fogja szűrni.

Üdv.

Előzmény: kiki71 (37658)
Eredő Vektor Creative Commons License 2023.10.25 0 0 37661

Tehát az "A1" helyett egy teljes tartományt kell megadnod pl. "A1:H1000"

Kipróbálás nélkül, de úgy látom ez a gond.

Előzmény: Eredő Vektor (37659)
pimre Creative Commons License 2023.10.25 0 0 37660

Olvastad a többi észrevételt is?

Előzmény: kiki71 (37658)
Eredő Vektor Creative Commons License 2023.10.25 0 0 37659

Nincs Range, amely azt a tartományt képviseli, amelyre az autoszűrő vonatkozik.

Előzmény: kiki71 (37658)
kiki71 Creative Commons License 2023.10.25 0 0 37658

Erről lenne szó.

Van egy fejléces excel táblázat. 5.oszlop dátumokat tartalmaz. Feladat, szűrés makróval  2022-es dátumokra és szűrt adat sorok másolása. Az oszlop tartalmaz 2022es dátumokat.

Makró kód:
Application.Workbooks(2).Worksheets(5).Activate
Range("A1").Select
If ActiveSheet.AutoFilterMode Then
ActiveSheet.AutoFilterMode = False
End If
Dim startDate As Date
Dim endDate As Date
startDate = DateSerial(2022, 1, 1)
endDate = DateSerial(2023, 1, 1)
ActiveSheet.Range("A1").AutoFilter Field:=5, Criteria1:=">=" & startDate, Operator:=xlAnd, Criteria2:="<" & endDate

Ez egy másik próbálkozás, de ezzel is ua.:
'ActiveSheet.Range("A1").AutoFilter Field:=5, Criteria1:=">=2022.01.01", Operator:=xlAnd, Criteria2:="<2023.01.01"

 

Hiba jelenség leírása:

Szűrés a fejlécen bekapcsol, szűrés ikon az oszlopon ott van, szűrés ikonon megnézve a szűrést, tartalmazza a szűrés feltételt, de nincsenek szűrt adatok. Szűrt oszlop ikon jó helyen van. Szűrésbe belépve, rányomok egy OK-ot a szűrésre, megjelennek a szűrt adatok.Ugyanez a kódrészlet, ugyanebben a makróban egy másik helyen szöveges szűréssel működik. Dátum oszlop egyedi formátumban van, de átállítva dátum formátumra is fenn áll a hiba.
Csatoltam egy excelt amiben a kód lefutása utáni állapot van.

 

https://drive.google.com/file/d/1S_cn0ECEcla0DXUOs3gUhrh3axSnyga_/view?usp=drive_link

Előzmény: Garashan (37638)
Eredő Vektor Creative Commons License 2023.10.25 0 0 37657

szia, ezt egy egyszeru weblekerdezes excelben egy az egyben hozza. Csak reszlegesen tudtam visszalvasni, elnezest ha elmegyek valami mellett…

Előzmény: m54-b (37633)
Garashan Creative Commons License 2023.10.23 0 0 37656

u.i.: Csak letöltés után lesz működő képes. A drive-ban nem hiszem, hogy lefutnának a makrók :-)

Előzmény: Garashan (37655)
Garashan Creative Commons License 2023.10.23 0 0 37655

Szia!

Itt egy 0.9-es verzió. Még van benne egy-két hiba, de elvileg használható: https://drive.google.com/file/d/1F3Q2kVfxO3rSRw34mqc22ozPDkoQVtKd/view?usp=share_link

F10-el tudsz belépni a menübe és a működéséhez szükséges, hogy engedélyezd a makrókat a dokumentumban.

Illetve az F11 gomb alapértelmezett funkcióját is letiltottam, mert sokszor félre ütöttem és arra hibát dobott...

Előzmény: Garashan (37654)
Garashan Creative Commons License 2023.10.22 0 0 37654

Szia!

Ha még olvasod a fórumot, akkor elkezdtem írni hozzá egy makrót. Kicsit másképpen fog működni, mint ahogyan eredetileg szeretted volna, de szerintem így is jó lesz.

Előzmény: MM10 (37615)
Garashan Creative Commons License 2023.10.21 0 0 37653

Gépen rájöttem erre a trükkre ma, de most, hogy írtad telefonon is működik. Én az egyszerűség jegyében Chromeot használok telefonon és gépen is.

 

A Word körlevél készítőjét üzemorvosi beutaló készítésére használtam. Illetve én töltöttem ki a megfelelt papírokat is. Be volt víve egy adatbázisba a dolgozók összes lényeges adata és volt egy logikai mező, hogy ki az aktív dolgozó. Akkor egy kattintással lehetett nyomtatni a beutalókat és a megfelelt papírokat is. Az üzemorvos olyan lusta volt, hogy a megfelelt papírokat se szerette kitölteni... Mondjuk 3 alkalmazott volt velem együtt, plusz a főnök.

Előzmény: m54-b (37652)
m54-b Creative Commons License 2023.10.21 0 0 37652

"Sokszor nem látszódik a kurzor."

 

Valamelyik topikban azt olvastam, hogy a választerületen kívülre kattintva, majd vissza, akkor megjavul. Firefox alatt még nem tapasztaltam.

 

A Word körlevélkészítője szerintem egész jó.

Előzmény: Garashan (37649)
m54-b Creative Commons License 2023.10.21 0 0 37651

Boldog ember vagy. /Boldog ember vagy? :-)  /

Előzmény: XNC (37648)
m54-b Creative Commons License 2023.10.21 0 0 37650

Átlag Jánosnak persze nincs telepítve a Notepad++, így ezt az utat kell bejárnia. Ha a beillesztett számok nem csak mellékes adatok, hanem számolni is kell velük, akkor pedig természetes, hogy ez a módszer kell, mert nem mindegy milyen tizedesjelölő van a szövegben.

Előzmény: Fferenc50 (37646)
Garashan Creative Commons License 2023.10.21 0 0 37649

Írtam ide egy szép hosszú hozzászólást, de az index fórum nem szerette volna, hogy elküldjem... Valamiért kiléptetett és elment a fenébe az egész...

Illetve a napokban szórakozik számítógépen is és telefonon is. Sokszor nem látszódik a kurzor. Nem tudom, hogy mit csináltak vele.

 

Nagy vonalakban ez a makrónak egy részlete.

A Thunderbird parancssoros paraméterezése itt van: https://kb.mozillazine.org/Command_line_arguments_-_Thunderbird

Ami nekünk fontos az a leírás alapján az attachment paraméter. A szimpla macskakörmök közé kerülnek a csatolmányok, amiket vessző választ el kötelező jelleggel. Emiatt volt a hiba, mert a mappa nevében lévő vesszőt csatolmány elválasztónak vette. Ha jól emlékszem, akkor hibát írt ki felugró ablakban a Thunderbird és a body részt be se vette.
Végül a body rész sincs már használva, mert a message részben TXT fájlból van beolvasva maga az üzenet. Ott meg lehetett formázni HTML kódokkal azt. Van valahol egy sor, hogy if message<>"" then body="" End if. Ez nem okoz problémát neki.
A wait függvényre azért van szükség, mert kb. 3 secundom alatt töltődik be a Thunderbird új e-mail ablakja és utána kell, hogy "lenyomódjon" az enter a levél elküldéséhez.

A Wordre rátérve. Szerintem az első számítógépünkön is márt volt '98 vége felé. Jóformán sohasem használtam a nélkül, hogy ne látnám a rejtett karaktereket. Egyszerűen frusztrál, ha ki van kapcsolva. Amúgy az NP++-t azért szeretem, mert jóval gyorsabban megnyílik, mind a Word és rögtön eldobja az összes felesleges formázását a szövegnek. Így nem kell még pluszban mindent kijelölné, az egeret lökdösni, hanem rögtön mehet a CTRL+A&C és már a vágólapon van a szöveg eltüntetett formázással.
Ha a volt munkahelyemen valakinek magyaráztam számítógép kezelési alapokat, akkor törekedtem arra, hogy minél kevesebb lépésből és egyszerűbben legyen megoldható egy probléma. Már az feladta a leckét és 8 év alatt amíg ott voltam, nem tudtam megtanítani, hogy ALT+Enter az új sor cellán belül, nem pedig 999999 space. Szóval reménytelen volt kicsit is összetettebb dolgokat megtanítani.
Ezért próbáltam meg mindent makrókkal megoldani, amik elvégzi a felhasználó helyett a feladatokat, mert akkor csak a nyers adatokat kell bevinni és mindent elvégez a makró. De sajnos ez se jött össze minden esetben, pedig megpróbáltam a lehető leszájbarágósabban leírni minden lépést. De a számlázó programból való adatkinyerésnek is változott az oszlop sorrendje hébe-hóba és hiába írtam le, hogy mi legyen a sorrend és mi az ami egyáltalán nem kell, nem sikerült elmagyarázni. A vevők listájánál egy-két fontos oszlop volt nálunk: nyilván a neve, adószáma, vevőcsoportja és ha hivatkozni akartam rá Excelben, akkor a vevőkódja. (Mivel néha változtattak nevet, így egyszerűbb volt egy kód-név adatlapot csinálni, mint utólag módosítani mindenhol a régi nevet az újra). De akkor a fejlesztők egyszer csak gondoltak egyet és megjelenítettek számunkra teljesen felesleges oszlopokat is: levelezési cím, fax, weboldal, cégjegyzékszám, bankszámlaszám, hitelkeret, stb. Nagy részük ki sincs töltve, mert felesleges infók lennének vagy a kutyát se érdekli. De a fejlesztők gondolnak egyet és kirakják a listába plusz oszlopként, ahol összekuszálják a meglévő oszlopaink sorrendjét. De van rá lehetőség, hogy legalább elrejtsük.

Előzmény: m54-b (37636)
XNC Creative Commons License 2023.10.21 0 0 37648

"(nem is tudják mi az)"

.

Én tudom mi az, de nem használom.

Akkor most mi van?

.

:)

Előzmény: m54-b (37634)
m54-b Creative Commons License 2023.10.21 0 0 37647

Igen, ez igaz, de eredetileg van "10-4" formáról is szó, nem csak a tizedes jelölés a gond.

Előzmény: Fferenc50 (37646)
Fferenc50 Creative Commons License 2023.10.21 0 0 37646

Bizonyára félreérthető voltam az első hozzászólásban. Ott az általad megadott linken levő táblázat bemásolását próbáltam bemutatni az elválasztójel megváltoztatásával, azzal, hogy nem lett dátum egyetlen számból sem, hanem a tizedespontos szám került be.

Vagyis copy-paste történt.

Azt már nem mutattam be, ami a mostani hozzászólásban volt, hogy simán vissza lehet állítani a tizedesvesszőt és marad számként az érték, ezt most pótoltam. Még annyit kiegészítésül, hogy a módszer alkalmazható akkor is, ha ilyen tizedespontos számokat tömegesen szeretnénk kézzel bevinni.

Üdv.

Előzmény: m54-b (37644)
Fferenc50 Creative Commons License 2023.10.21 0 0 37645

Szia!

Szerintem pont nem kanyarodtunk el. Hiszen itt is copy-paste van. 

"időnként dátummá varázsol egyes számokat."

Nem időnként és nem csak a copy-paste, hanem minden olyan esetben, ahol általános cellaformátum van és dátumként értelmezhető adat kerül bele. Pl. ha 8.5-öt írsz be, akkor bizony dátum lesz a cellában.

Viszont a bemutatott esetben, amikor a módosított tizesjellel beolvassuk az értéket, utána visszaállíthatjuk a rendszer szerinti elválasztót és a pontok helyén megjelenik a tizedesvessző:


Tehát ez megoldás a copy -> paste problémára, nem kell Notepad++ vagy Word-be másolás!

Üdv.

 

Előzmény: m54-b (37644)
m54-b Creative Commons License 2023.10.21 0 0 37644

Természetesen lehet. Nagyon elkanyarodtunk az eredeti kérdéstől ;-) a copy-paste időnként dátummá varázsol egyes számokat.

 

Garashan Notepad++ megoldása lett a nyerő.

Előzmény: Fferenc50 (37643)
Fferenc50 Creative Commons License 2023.10.21 0 0 37643

Lemaradt a kép az előzóből:

Üdv.

Előzmény: Fferenc50 (37642)
Fferenc50 Creative Commons License 2023.10.21 0 0 37642

Szia!

Szerintem a 2007-es Office-ban is lehet módosítani a rendszerbeállítások szerinti elválasztókat. 

A négyzetből kiveszed a pipát, a tizedesvesszőt átállítod pontra:

Ezután az eredmény:

Üdv.

 

Előzmény: m54-b (37634)
m54-b Creative Commons License 2023.10.21 0 0 37641

Természetesen ahogy pimre mondja, az első sor törölve.

 

Előzmény: m54-b (37640)
m54-b Creative Commons License 2023.10.21 0 0 37640

ActiveSheet.Range("A1").AutoFilter Field:=1, _
   Criteria1:=">12/01/2022", Operator:=xlAnd, Criteria2:="<01/01/2023"

Nekem így működik (Office 2007, magyar nyelvű).

Előzmény: kiki71 (37637)
pimre Creative Commons License 2023.10.21 0 0 37639

Azért javaslom, hogy a makrót abban a környezetben mutasd be, ahol használod. Feltételezem, hogy a makrót nem abban a munkafüzetben indítod, ahol az adatok vannak, ezért az Excel VBA csoportban írt mintádban rögtön az első sor hibaüzenetet ad, ha azt a belinkelt munkafüzeteden belül próbálom indítani: 

 

Application.Workbooks(2).Worksheets(5).Activate

Természetesen a Workbooks(2) nélkül működik: Application.Worksheets(5).Activate

 

Az egyebeket majd, ha küldöd a teljes anyagot.

 

Előzmény: kiki71 (37637)
Garashan Creative Commons License 2023.10.21 0 0 37638

Szerintem többen is tudunk. Miről lenne szó?

Előzmény: kiki71 (37637)
kiki71 Creative Commons License 2023.10.21 0 0 37637

Sziasztok. Láttam, hogy van Excel VBA csoport is, de ott nem kaptam választ problémámra. Esetleg itt tud na valaki segíteni Excel VBA programozásban? Ha igen, akkor megírom miről lenne szó.

m54-b Creative Commons License 2023.10.20 0 0 37636

A Wordben, ha bekapcsolod a rejtett szimbólumok megjelenítését (¶) sok ilyen problémát kiküszöbölhetsz.

 

A Wordben is egyszerű az összes formázás törlése.

 

Makrókat abban is lehet írni. De tény, hogy nagyon másra vannak!

 

A parancssorban a fájlnév idézőjelek nélkül van? Érdekes. Windows Servert én már nem használok, a W10 parancssora elvárja az idézőjelbeni fájlneveket, és a Word makrók is, mert a szóköz is gondot okoz neki. Idézőjelek közt mehet a szóköz, és a vessző is.

 

Előzmény: Garashan (37635)
Garashan Creative Commons License 2023.10.20 0 0 37635

Nekem a Notepad++ az egyik első program amit telepítek. Nálam az egyik legalapabb a számítógépes munkavégzéshez. A Word-öt nem szeretem ilyen szinten, mert van benne csomó haszontalan funkció, miközben rengeteg hasznos nincs benne. Nyilván a kettő programot össze se lehet hasonlítani, mert teljesen másra van, hiába szövegszerkesztő mindkettő.

Ha kell egy gyors jegyzet, akkor azt is NP++-ba írom fel, el se kell menteni, mert csinál neki ideiglenes fájlt és a program bezárása, majd újranyitása után is ott van.

 

Apropó, ha már Word. Az előbb futottam bele egy problémába. Volt munkahelyemnek segítettem be EPR+KVTD bevallás elkészítésébe. A jó előbb sikerült a végére pontot tenni. A lényeg, hogy már nem rendelkezem a jogosult ügyfélkapus adatokkal, így megkértem volt kolléganőmet, hogy írja már bele egy dokumentumba az asztalra. Ő Wordbe írta bele. Én naivín kimásoltam, majd beillesztettem az ÁNYK-ba, de nem akarta elfogadni a jelszót. Egy kis telefonálgatás után kiderült, hogy a jelszónak jónak kell lennie. Mivel távoli asztalra voltam bejelentkezve és hogy biztosan átjön-e az éteren a CTRL+C, így beillesztettem az itthoni gépemre NP++-ba. Kb. nálam megszokás ilyen esetben az automatikus CTRL+A&C és úgy illesztettem be az ügyfélkapuba és el is fogadta. Visszalépve a távoli asztalra ott is bemásoltam NP++ba és ki is másoltam. Utána már ott is elfogadta. Én arra gondolok, hogy a Wordből való másolnál bekerül a sor végére egy felesleges CRL, LF karakter sor. Amit bevitt a jelszó mezőbe, amikor közvetlenül a Wordből másoltam. Az NP++ pedig nem teszi oda automatikusan, csak ha kijelölöd az új sor karaktert is.

 

Amúgy többek között ezért is szeretem, mert eldob minden felesleges formázást. És hozzá is készíthetők makrók.

Anno szintén a volt munkahelyemen csináltam árjegyzék kiküldő Excel táblázatot, mivel a Thunderbird levelező meghívható parancssorból így adta magát az automatizálás. A magyar karaktereket viszont nem igazán csipázta, így át kellett őket konvertálni html kóddá. Pl az á-ból lett "&aacute;". Minden magyar karakterhez csináltam egy kicserélő makrót az NP++-ban, így könnyű volt a szövegben minden karakter módosítani. Végül Excelesítettem azt a lépést is, sok-sok egymásba ágyazott helyette függvénnyel. 
Ami még feladta a leckét, az a mappa nevekben lévő vessző. A cégnél Windows Server fut és Windows 10 munkaállomások vannak. Viszont eszembe jutott (mert még volt szerencsém használni anno), hogy kompatibilitási okokból a régi windosokban benne maradt a DOS-os 8.3-as fájlnév formátum. Kis utána járással kiderült, hogy manapság ez már a MS Serveren le van tiltva, mert felesleges helyet és erőforrást foglalna ezek legenerálása. De ideiglenesen be lehetett kapcsolni a generálást, úgy hogy az ne automata legyen és annak az egy mappának adtam 8.3-as fájlnevet. A dolog érdekessége még, hogy nem kellett betartani az eredeti 8.3-as formátum generálási szabályait, hanem "szabadon" adhattam meg bármit. Ez alatt azt értem, hogy a "TextFile1.Mine.txt” a szabályok szerint "TEXTFI~1.TXT" lett volna, de én akár "alma.txt" nevet is adhattam neki. Csak nem fájlról volt szó, hanem mappáról, de a lényeg ugyan az. Majd kikapcsolva a generálást megmaradt az egy darab legenerált 8.3-as mappanév.
Erre csak egy dolog miatt volt szükség, túl sok hivatkozást kellett volna átírni, ha megváltoztatjuk a mappa nevét, viszont logikailag onnan kellett csatolni a csatolmányt. Viszont a parancssor a vesszőt paraméter elválasztó karakternek vette és nem tudta csatolni a vesszős nevű mappából a fájlokat. Próbálkoztam jó pár megoldással, hogy a vesszőt másként adjam meg, de vagy nem edte meg a parancssor vagy vesszőként értelmezte.

Előzmény: m54-b (37634)
m54-b Creative Commons License 2023.10.20 0 0 37634

Nekem nem így működik (2007-es Office).

 

Jelenleg ezen a keresésen kiadott táblázaton kísérletezek https://www.google.hu/search?q=%C3%A1tlag%C3%A9letkor+orsz%C3%A1gonk%C3%A9nt&sca_esv=575251062&ei=Kc8yZdrbK9eG9u8PgKi32AQ&oq=%C3%A1tlag%C3%A9letkor&gs_lp=Egxnd3Mtd2l6LXNlcnAiDsOhdGxhZ8OpbGV0a29yKgIIATIFEAAYgAQyBRAAGIAEMgUQABiABDIFEAAYgAQyBRAAGIAEMgUQABiABDIFEAAYgAQyBRAAGIAEMgUQABiABDIFEAAYgARI8kZQvwZYixtwAXgBkAEAmAFXoAGnBKoBATe4AQPIAQD4AQHCAgoQABhHGNYEGLADwgIKEAAYigUYsAMYQ-IDBBgAIEGIBgGQBgk&sclient=gws-wiz-serp

 

Ahogy már leírtam, próbáltam -szerintem- mindent, eddig a kerülő megoldás -a csere másra- jött be. De a Notepad++ jobbnak tűnik!

Azzal legfeljebb az a gond, hogy nincs mindenkinek feltelepítve (nem is tudják mi az).

Előzmény: Fferenc50 (37632)
m54-b Creative Commons License 2023.10.20 0 0 37633

Kákán is csomót keresés:

 

Webről letöltött táblázat, Notepad++ba

 

 

majd onnan a cellaformázott Excelbe

 

 

 

(Persze, kijelölöm az összeset, és egyiken a "Hiba mellőzése". Kevesebb munka, mint az eddigiek.)

 

Előzmény: m54-b (37631)
Fferenc50 Creative Commons License 2023.10.20 0 0 37632

Szia!

Szerintem ha a forrásformátum megőrzése opciót használod, akkor helyesen/esetleg szövegként fogja beimportálni a táblát. 

Üdv.

Előzmény: m54-b (37629)
m54-b Creative Commons License 2023.10.20 0 0 37631

"A nyers adatokat én Notepad++-ból nyertem."

 

Ez egy nagy ötlet! Köszönjük minden szenvedő nevében!

Előzmény: Garashan (37628)
Garashan Creative Commons License 2023.10.20 0 0 37630

Apósom volt a postása. Így volt szerencsém találkozni vele élőben három éve. Alá irattam a saját példányomat is, valamint édesapámét is. Így még nagyobb értéket képviselnek a szememben a könyvek.

Előzmény: Delila10 (37625)
m54-b Creative Commons License 2023.10.20 0 0 37629

Köszönöm!

(Nekem a copy-paste a gond. Találok a weben egy táblázatot, azt raknám be az Excelbe.)

Előzmény: Fferenc50 (37627)
Garashan Creative Commons License 2023.10.20 0 0 37628

Kipróbáltam. Jól emlékeztem, a módszer működik.

 

Előre beállítottam a B oszlopon a Cella formátumot szövegre. Majd beillesztettem a nyers adatokat. Minden maradt az eredetiben.

 

Az A oszlopban általános volt a cella formátum. Ott át is konvertálta a dátumszerű szövegeket dátummá.

 

A nyers adatokat én Notepad++-ból nyertem. Az megegyezik a csak szöveg beillesztési móddal.

 

Előzmény: m54-b (37626)
Fferenc50 Creative Commons License 2023.10.20 0 0 37627

Szia!

Egész sorokat egyben beolvasni, majd utána Adatok - szövegből oszlopok - 3 lépésben lehet állítani az adott oszlop formátumát.

Üdv.

Előzmény: m54-b (37626)
m54-b Creative Commons License 2023.10.20 0 0 37626

Kevés.

A tizedespontot tartalmazó, és dátumnak is nézhetőt dátumnak rakja be, a kötőjelest is.

Én azt szoktam, hogy Wordbe rakom, ott (ha nem zavaró a végeredményben) lecserélem a tizedespontot vesszőre, a "-"-t "_"-ra. Ha gond, akkor marad az átbogarászás, utólag.

 

Aposztrófot előre nem lehet berakni, majd copy-paste. (Vagy nem tudok róla.)

Előzmény: Garashan (37623)
Delila10 Creative Commons License 2023.10.20 0 0 37625

Helló!

 

Mindnyájan ezen nőttünk fel.

 

XNC Creative Commons License 2023.10.20 0 1 37624

 .... és igazad van!

.

cellaformázás-ig volt biztos a dolgomban.

De megoldás lehet az is ha egy ' jelet ír a rublika elejére.

.

Látszik, hogy nagyon régen használtam már Excelt.

Előzmény: Garashan (37623)
Garashan Creative Commons License 2023.10.20 0 0 37623

Ez nem biztos, hogy megoldja a problémát. Már beillesztéskor átkonvertálja dátummá és akkor számszerűleg más lesz.

 

Szerintem az egész oszlopnak a formátumát szövegre kell állítani még beillesztés előtt.

Előzmény: XNC (37622)
XNC Creative Commons License 2023.10.20 0 0 37622

Jobbklikk - cellaformázás:  ##-##

Most, a Te esetedben.

Előzmény: CsRob1 (37621)
CsRob1 Creative Commons License 2023.10.20 0 0 37621

Sziasztok! Bizonyos adatok Excelbe történő beillesztésekor vagy importálásakor az Excel a dátumnak vélt karaktersorokat dátumformátumban írja be. Pl. a 10-12 (telefonszám mellék) helyett dec. 10 -t jelenít meg dátumformátumban. Hogyan lehet ezt a funkciót kikapcsolni? Excel 2007

Eredő Vektor Creative Commons License 2023.10.20 0 0 37620

Szia,

Lapfülek színezgetésével és megfelelő elnevezésével közelíthető a téma max. szerintem.

Amúgy összerakhatsz egy munkalaphierarchiát egy külön munkalapon úgymond félmanuálisan. Több lehetőség van erre - de beépített opció nincs. A munkalapok között pedig egy-egy hivatkozásra kattintva lehet ugrálni. Megfelelő szintű excel tudással egész jól meg lehet egy ilyet csinálni.

Előzmény: MM10 (37607)
Garashan Creative Commons License 2023.10.20 0 0 37619

Tudtommal nincs rá lehwtőség. Az Excelhez léteznek addonok (amit ők addin nek neveznek...). Maximum ha ott létezik ilyen megoldás.

De mint azt m54-b is írta makróval lehet hasonlót csinálni. Egy külön munkalapra. Esetleg gombnyomásra felugró ablak.

Előzmény: MM10 (37615)
m54-b Creative Commons License 2023.10.20 0 0 37618

Egy munkalapon felsorolod a kívánt csoportokat, és klikkre, egy makróval elrejted a fölöslegeseket?

Előzmény: MM10 (37614)
pimre Creative Commons License 2023.10.20 0 0 37617

"Azt tudod tenni, hogy az xx... és az yy... munkalapokat külön-külön munkafüzetekben tartod." Amikor ezt írtam, nem láttam a pár perccel korábbi beírásodat, hogy pont ezt akarod elkerülni.

 

Előzmény: pimre (37616)
pimre Creative Commons License 2023.10.20 0 0 37616

"...azt szeretném,ha az "xx,xx stb" nevű munkalapjaim tudnám valamilyen módon egy mappában helyezni..."

 

A mappa a számítástechnikában azt jelenti, hogy bizonyos szempont szerint összetartozó fájlokat tudunk benne egy csoportba tenni, így egy kattintással láthatóvá tenni őket. Aztán mappákat is lehet csoportosítani, ilyenkor az ebben lévő mappákat almappának nevezzük.

 

Viszont az Excel munkafüzet egyetlen fájl, így a mappa fogalma nem értelmezhető ezen belül. A munkalapok nem csoportosíthatók az általad kívánt módon. Azt tudod tenni, hogy az xx... és az yy... munkalapokat külön-külön munkafüzetekben tartod.

 

Előzmény: MM10 (37607)
MM10 Creative Commons License 2023.10.20 0 0 37615

És ezt hol vagy hogyan tudom megcsinálni?

Előzmény: Garashan (37613)
MM10 Creative Commons License 2023.10.20 0 0 37614

Szia. Csoportosítani szeretném a munkalapjaimat. Azért lenne erre szükségem mert nem 7-8 munkalapról van szó egy fileon belül,és csoportosítás nélkül már néha nehézkes megtalálni amelyikben épp dolgozni szeretnék,de nem szeretném külön fileon menteni ezeket a munkalapokat. 

Amire szükségem lenne egy olyan csoportosítás ahol pl alul ahol a munkalapok vannak tudnék valamilyen csoportokat létrehozni,egy legördülő menüt akár, és ott felsorolja melyik munkalapok vannak az adott "csoportban" 

Előzmény: Fferenc50 (37612)
Garashan Creative Commons License 2023.10.20 0 0 37613

Én úgy értettem, hogy egy legördülő menüben csoportba foglalja a munkalapokat. Ilyen csoportból meg létrehoz többet.

Előzmény: Fferenc50 (37612)
Fferenc50 Creative Commons License 2023.10.19 0 0 37612

Szia!

Mit értesz egybehúzás alatt és miért lenne erre szükséged?

Üdv.

Előzmény: MM10 (37610)
Garashan Creative Commons License 2023.10.19 0 0 37611

Nem lehet őket csoportosítani legjobb tudomásom szerint. Maximum valami addonnal.

Előzmény: MM10 (37610)
MM10 Creative Commons License 2023.10.19 0 0 37610

Igen azt tudom,de így csak sorrendet állítok. Egybehúzni nem tudom ezek szerint a munkalapokat sehogysem?

Fferenc50 Creative Commons License 2023.10.19 0 0 37609

Szia!

Tudtommal fájlon/munkafüzeten belül nem lehet mappákat használni.  Viszont a munkafüzeten belül úgy csoportosítod a munkalapokat, ahogyan csak szeretnéd  - megfogod a lapfület és áthúzod oda, ahol szeretnéd ha lenne.

Üdv.

Előzmény: MM10 (37607)
MM10 Creative Commons License 2023.10.19 -1 0 37608

a képet nem mellékelte,így feltöltöttem,mégha talán annyira nem is mérvadó: https://imgur.com/a/fwR81st

MM10 Creative Commons License 2023.10.19 0 0 37607

Sziasztok. Azt szeretném kérdezni hogy tudom e valahogy külön csoportosítani a munkalapjaimat. Képen lévő példával élve azt szeretném,ha az "xx,xx stb" nevű munkalapjaim tudnám valamilyen módon egy mappában helyezni ugyan így az összes többi munkalapjaimmal eljárva csoportosítani egybe azokat. A legegyszerűbb megoldás az lenne ha a csoportosításokat egyszerűen több file-al oldanám meg,de egybe szeretném ha meglennének. Megoldható? 

Garashan Creative Commons License 2023.10.14 0 0 37606

Nagyon szívesen, örülök, hogy tudtam segíteni.

Előzmény: neofrix baszmacs (37605)
neofrix baszmacs Creative Commons License 2023.10.14 0 0 37605

Ezt könnyebb volt megérteni, mint az előzőt. :)  Kicicomáztam, az Összesítés lapra tettem egy kis korrekciós lehetőséget, ha mondjuk valaki ciklus közepén hagyja ott a szakkört, akkor ott le lehet nullázni. Itt van. Kipróbáljuk az osztályfőnökkel, remélem, szeretni fogja. Köszönöm a segítséget még egyszer!

https://docs.google.com/spreadsheets/d/1oJqiP_elKOHskD57CTo8HFBPkNWJYye7_vd71bh_VUw/edit?usp=sharing

Előzmény: Garashan (37603)
neofrix baszmacs Creative Commons License 2023.10.12 0 0 37604

Nagyon köszönöm, a hétvégén megpróbálom megérteni, és megírom, hogy sikerült-e. :) 

Előzmény: Garashan (37603)
Garashan Creative Commons License 2023.10.12 0 0 37603

Frissítettem a táblázatot. Ha bármi kérdésed van, vagy további segítségre van szükséged, akkor nyugodtan keress.

Előzmény: neofrix baszmacs (37602)
neofrix baszmacs Creative Commons License 2023.10.12 0 0 37602

Köszönöm még egyszer a szakkörnyilvántartó táblázatot. Működik, tudom formázgatni, fejlécezgetni, megvédeni a számolt cellákat, de van egy probléma, amivel nem tudok mit kezdeni.

A szakköröket elvileg valóban heti órarend szerint tartják, de ebbe folyton belerondít valami: ünnepek, iskolai kirándulás, a tanár betegsége stb., így gyakran elmarad egy-egy. Ezért a szakkörök megtartása nem egyszerűen az eltelt idő függvénye, hanem a tanár jelzi, hogy megvolt a négy szakkör, lehet fizetni a következő adagot. Ahogy az elején írtam:

"Ha megvolt a négy foglalkozás - akár ott volt a gyerek, akár nem - akkor az osztályfőnök jelzi, hogy most be kell fizetni az adott szakkör következő díját, és kezdődik az egész elölről."

Tehát valami olyan bemenet kéne, hogy "Szakkör1 - x alkalom fizetendő". Hogy mikor telt el az x alkalom, azt nem is kell nyilvántartani, majd a következő "Szakkör1 - x alkalom fizetendő" bemenet előírja a következő fizetést. Az x az nem mindig négy, például év végén lehet, hogy csak kettő.

Esélyem sincs, hogy ezt magam megcsináljam, de ha megcsinálnád, örömmel hozzájárulnék a közben elvesztegetett energiáid pótlásához. :)

 

Előzmény: Garashan (37586)
pimre Creative Commons License 2023.10.11 0 0 37601

Nincs mit, érdekelt a megoldás,szívesen foglalkoztam vele.

Előzmény: Param2121 (37600)
Param2121 Creative Commons License 2023.10.11 0 1 37600

Azért jöttem vissza, hogy beírjam, hogy rájöttem, hogy cellamásolásokkal megoldható a feladat, a megoldásod nagyon elegánsnak tűnik, gratulálok és nagyon köszönöm, hogy foglalkoztál vele!

 

 

Előzmény: pimre (37599)
pimre Creative Commons License 2023.10.11 0 0 37599

Nem is kell makró:

 

Feltételezve, hogy az 1. sor címsor, és a 2. sortól kezdődnek az adatok, akkor a következő a teendő:

 

A C2 oszlopba írd a következő függvényt: =INDIREKT("A" & (SOR()-2)*3+2)

A D2-be:                                                =INDIREKT("A" & (SOR()-2)*3+3)

Az E2-be:                                               =INDIREKT("A" & (SOR()-2)*3+4)

 

(A C, D és E helyett bármely másik 3 oszlop lehet a célterület, a lényeg, hogy egymást követő oszlopok legyenek)

 

Majd ezt a 3 oszlopot húzd le végig.

Előzmény: pimre (37598)
pimre Creative Commons License 2023.10.11 0 0 37598

"Van lehetőség csoportos transzponálásra?" Ilyen nincs.

 

De pontosítsunk. Ilyesmiről lenne szó?:

 

 

Ez makróval megoldható Excelben. 

 

Ha nem ilyen a munkafüzeted, akkor mutass legalább egy képet arról, amire gondolsz!

 

Előzmény: Param2121 (37596)
Garashan Creative Commons License 2023.10.11 0 0 37597

A libre office-t nem ismerem, de biztosan(?) lehet ahhoz is makrót írni.

Ha van benne makró rögzítő funkció, akkor 1 alkalommal meg kell csinálni a transzponálást, majd azt paraméterezve kell rá írni egy ciklust.

Előzmény: Param2121 (37596)
Param2121 Creative Commons License 2023.10.11 0 0 37596

Nem excel, libreoffice calc, de lehet excel fájl is, ha kell.;)

 

Van lehetőség csoportos transzponálásra?

Adott egy kb. 600 soros lista, hármasával kellene őket transzponálni, vagyis kb. 200 soron három oszlopba kell elrendezni őket.

Kétszázszor transzponálni három soronként kézzel elég macerás lenne.:-(

Garashan Creative Commons License 2023.10.10 0 0 37595

Funfact nálam MS Office Professional Plus 2021 verzió ketyeg, ha lehet hinni a névjegynek akkor 32 bites verzióban. (Bár emlékeim szerint 64 bites verziót vásároltam és telepítettem...)

Mindez MS Windows 10 64 bit alatt.

Előzmény: pimre (37593)
CsRob1 Creative Commons License 2023.10.10 0 0 37594

Ez okozhat problémákat a gyakorlatban, ha egy ilyen egyszerű esetben is van eltérés. Persze itt látom, hogy nincs hiba, noha az ellenőrző cella hibát jelez (értéke eltér 0-tól, ezért a feltételes formázás miatt színnel jelzi a hibát) 

Előzmény: pimre (37593)
pimre Creative Commons License 2023.10.10 0 0 37593

Bizony, a lebegőpontos számábrázolás okoz ilyeneket. Éppen 10 éve találkoztam ugyanezzel a jelenséggel, és ezt más is megerősítette. Például: https://forum.index.hu/Article/viewArticle?a=127906061&t=9009340

 

Előzmény: CsRob1 (37592)
CsRob1 Creative Commons License 2023.10.10 0 0 37592

Sziasztok! Ez hogy lehetséges? Excel 2007

2 db 30 tizedesig megegyező szám különbsége a 12. tizedesnél eltér 0-tól.

A B2 cella egy másik táblázatra hivatkozik, és az értéke egy másik munkalapon korábban beírt érték 1000-el való osztás, majd szorzás után. A zöld szám egy másik táblázatba beírt érték, ami értékbeillesztéssel került a D2 cellába. Az itt látható értékek formátuma szám.

 

 

local75 Creative Commons License 2023.10.10 0 0 37591

Ja, és nevezhető bérletrendszernek is hogy emészthető legyen. :)

bár én is kártyát írtam..

Előzmény: neofrix baszmacs (37589)
local75 Creative Commons License 2023.10.10 0 0 37590

Nem exceles megoldás, csak azért mertem javasolni, mert ilyen esetekben van létjogosultsága. :)

És ha jobban belegondolunk, néha jobb a dolgokat nem túlbonyolítani.

Magamból kiindulva, soha nincs olyan hogy egy táblázatom eléri a tökéletes végleges változatát, mindig elcseszem a csinosítgatással és a továbbfejlesztéssel az időt.

Előzmény: neofrix baszmacs (37589)
neofrix baszmacs Creative Commons License 2023.10.10 0 0 37589

A jó öreg kartotékrendszer! :) Kösz a tippet, az én szívemnek kedves, és lehetett volna így kezdeni. De ha már nagy pofával bemondtam az online megoldást, nem mehetek oda egy marék színes papírral. :)  

Előzmény: local75 (37588)
local75 Creative Commons License 2023.10.10 0 0 37588

Mi van ha a tanárnő készíttet kis kártyákat, mint egy teniszklubban?

4 alkalmas kártya, és a szakkörvezetőnek szignózni kell az alkalmakat, vagy készíttethet perforáltat, melyet leszakítanak. (kb. 100 Ft/bérlet)
Faék egyszerű, kevesebb feladat.

Előzmény: neofrix baszmacs (37585)
neofrix baszmacs Creative Commons License 2023.10.10 0 1 37587

Köszönöm szépen, úgy látom, a lényeget megcsináltad, azt hiszem, ebből már össze tudok hozni valamit amivel mindenki boldog lesz. Az adatvédelem tényleg problémás lehet, azt fogom a tanárnőnek javasolni, hogy csak ő használja, a nem fizető szülőket pedig nyektesse privátban. Még egyszer köszönöm, délután nekilátok, remélem bírok vele.

Előzmény: Garashan (37586)
Garashan Creative Commons License 2023.10.09 0 0 37586

Szia!

Szerintem ez megoldható Exelben.
Én valahogy így csinálnám meg: https://docs.google.com/spreadsheets/d/1unuB4vbkVliNr015j2Oupb_iwWV3mv9XzUnfSL2qvhU/edit?usp=sharing

 

Amit kezel a táblázat:

  • Egy szakkör lehet több alkalommal is hetente és alkalmanként számolja a díjat.
  • Egy tanuló több szakkörre is járhat
  • A szakkörök minden esetben szeptember elsejével indultak
  • A tanuló bármikor kiléphet egy szakkörből év közben is, de az addigi befizetéseit is kezeli a táblázat

Biztosan meglehet csinálni elegánsabban is, de hirtelen ennyit sikerült összehozni.

 

Én a tanárnő helyében nem osztanám meg a többi szülővel a táblázatot, mert az adatvédelmi okokból kifolyólag aggályos lenne.

Előzmény: neofrix baszmacs (37585)
neofrix baszmacs Creative Commons License 2023.10.09 0 0 37585


Tudnátok segíteni? Befutottam az erdőbe tátott szájjal....

A gyerek osztályfőnöke láthatóan nem tudja kezelni a tíz kölök szakkörbefizetéseit, én hülye meg azt mondtam hogy csinálok neki egy on-line táblázatot hozzá. Már bánom.

Először Google spreadsheet-ben akartam, de rájöttem, hogy itt több a dimenzió, mint kettő, ráadásul a Google spreadsheet-ben Pivot tábla sincs, csak a fizetősben. Néztem ingyenes on-line adatbáziskezelőket, pl. seatable.io, de nem tudok velük se egy rendes relációt, se egy használható űrlapot létrehozni. Nem is adatbáziskezelőnek néznek ki ezek, hanem felhízlalt Excel-tábláknak. Persze simán lehet, hogy csak én nem értek hozzá.

Van valakinek ötlete, miben, hogyan érdemes ezt megcsinálni?

Az osztályban van tíz tanuló, az iskolában tíz szakkör.
Minden tanuló választ magának szakkört, ahányat akar.
Minden szakköröknek van egy ára, ami négy foglalkozást fedez.
A tanulók befizetik, a tanárnő felírja.
Ha megvolt a négy foglalkozás - akár ott volt a gyerek, akár nem - akkor az osztályfőnök jelzi, hogy most be kell fizetni az adott szakkör következő díját, és kezdődik az egész elölről.

 

pimre Creative Commons License 2023.10.01 0 0 37584

Szia, ne vedd rossz néven, hogy vitázok, de leellenőriztem a saját javaslatomat, és nem találtam benne hibát.

 

Örülök, hogy elküldted az eredeti táblázatot, így a teljes adatbázist át tudtam vizsgálni. Itt tudod megnézni az eredményt: https://docs.google.com/spreadsheets/d/1g5227V3VSDAIKl3Z4DtpIoaELolBmRPC/edit?usp=sharing&ouid=113951927802309105103&rtpof=true&sd=true

 

Hogy ne kelljen a képleteket átírni az kapott fájlban lévő oszlopokra, hanem az eredeti mintában lévő oszlopok szerepeljenek, ezért a Bevitel munkalapból készítettem két másolatot. Külön a férjeknek, és külön a feleségeknek: Bevitel teszt férj és Bevitel teszt feleség néven. Így mindkettőben az E és F oszlopban vannak a vesszőhelyek, az A oszlopban a vesszővel elválasztott nevek, és a B, C, D oszlopban a szétszedett nevek. A Feri technikájával szétszedett nevek pedig a G, H és I oszlopban vannak. Végül a J oszlopba egy teszt függvényt írtam, ami üresen marad, ahol egyezik a két megoldás mindhárom oszlopa, eltérés esetén meg azt írja bele, hogy eltér.

 

Ezzel a megoldással a férjek esetén egyetlen eltérést nem találtam, a feleségeknél is csak a 190. soron lett egy nem túl lényeges eltérés:

 

 

Ettől függetlenül azt gondolom, hogy Feri megoldása elegánsabb, és könnyebben kezelhető. Ha nem közel egy időben írjuk, akkor nem is kezdtem volna bele. 

Előzmény: donikla (37583)
donikla Creative Commons License 2023.10.01 0 1 37583

Nagyon köszönöm a fáradozásotokat, hálás vagyok érte!

Delila10 és pimre  képleteinél bizonyos esetekben, ahogy észre vettem a nevek hosszának aránya a függvényében lett hibás a végeredmény (hol belekerület egy vessző, hol lemaradt valamelyik név eleje és/vagy vége). Igazából nem értem miért, hiszen ha a műveletet manuálisan elvégeztem akkor rendben volt. Én mindenféle "HA" művelettel és csillió segédoszloppal sem jutottam el idáig. :) 

Fferenc50 képlete viszont hozta a kívánt végeredmény. Néhágy új szabályt alakalmaznom kellett, mert üres cellánál és két vessző közti szóközzel fals volt az eredmény, de semmi ilyen eshetőségről nem szóltam az elején, de ezeket könnyedén orvosoltam.


Itt került alkalmazásra a képlet (Orosháza evangélikus anyakönyv, házassági index 1745-1786).

A függvények alakalmazása a BEVITEL munkalapon történt, a végeredményt jelentő INDEX munkalap pedig így reszponzív módon szépen megjeleníti a kívánt tartalmat. 


Előzmény: Delila10 (37582)
Delila10 Creative Commons License 2023.09.29 0 0 37582

Az én példámban is működtek a képletek az 1 és 2 keresztneveseknél, az 1 tagból álló nem valószínű.

Előzmény: pimre (37579)
pimre Creative Commons License 2023.09.29 0 0 37581

Hú, ez a villámkitöltés tényleg óriási. Nem ismertem, de az előző példámon kipróbáltam. Ez egy kis lépés az AI felé.

Az első nevet - nálam:  Kovács,péter,sándor a közvetlen mellette lévő 3 oszlopba (B, C, D) kimásoltam. Aztán az egyes kimásolt nevek közül az elsőre állok a B oszlopban, majd a Ctrl+E lenyomására végigmásolja. Aztán ugyanezt megteszem a C és D oszloppal. Azokat is másolja, és ha valamelyiknél nincs kitöltendő adat, akkor üresen hagyja. Egy feltétel van, az A oszlopban a neveknek folyamatosan kitöltve kell lenniük. Ha üres sor van, ott befejezi a munkát.

 

 

Előzmény: Delila10 (37574)
pimre Creative Commons License 2023.09.29 0 0 37580

" én egy segédoszlopos megoldást csináltam". Elegánsabb lett volna, ha azt írom, hogy én is egy segédoszlopos megoldást csináltam, mert az eredeti kiindulópont Deliláé volt.

Előzmény: pimre (37579)
pimre Creative Commons License 2023.09.29 0 1 37579

Szia, én egy segédoszlopos megoldást csináltam. Figyelembe véve egy olyan lehetőséget, hogy akkor is működjön, ha egyetlen vessző sincs valamelyik sorban:

 

 

 

 

A képletek:

 

E2: =HAHIBA(SZÖVEG.KERES(",";A2;1);0)

F2: =HAHIBA(SZÖVEG.KERES(",";KÖZÉP(A2;E2+1;HOSSZ(A2)-E2));0)

 

B2: =HA(E2>0;BAL(A2;E2-1);A2)

C2: =HA(ÉS(E2>0;F2>0);KÖZÉP(A2;E2+1;F2-1);HA(E2>0;KÖZÉP(A2;E2+1;HOSSZ(A2)-E2);""))

D2: =HA(ÉS(E2>0;F2>0);KÖZÉP(A2;E2+F2+1;HOSSZ(A2)-(E2+F2));"")

 

 

Előzmény: donikla (37577)
Fferenc50 Creative Commons License 2023.09.29 0 1 37578

Szia!

Nézd meg az alábbi képleteket:

B2 képlete:=BAL(A2;SZÖVEG.KERES(",";A2)-1)

C2 képlete: =HAHIBA(BAL(HELYETTE(A2;B2&",";"");SZÖVEG.KERES(",";HELYETTE(A2;B2&",";""))-1);HELYETTE(A2;B2 &",";""))

D2 képlete: =HAHIBA(KÖZÉP(HELYETTE(A2;B2 &"," & C2;"");2;HOSSZ(A2));"")

Természetesen húzhatóak lefelé.

A képletek egymásra épülnek, figyelembe veszik, ha csak 1 vessző van a névben, ezért néz ki bonyolultan a C2 képlete.

Remélem, nálad is műxik majd.

Üdv.

 

Előzmény: donikla (37577)
donikla Creative Commons License 2023.09.29 0 0 37577

Megnéztem a villámkitöltést, de hiába adok meg neki mindenféle variációt, nem igazán talál benne logikát. Ahol nincs harmadik név ott megismétli a másodikat. A legjobb eredményt a "szövegből oszlopok" adja ami a vesszőket figyeli és úgy dobja szét az oszlopokat.

Viszont ez és a villámkitöltés is független a kiindulástól, így ha az eredetiben módosítok az nem jelenik meg a végső feldolgozott formában, ezért görcsölök a  függvényekkel. :) 

Előzmény: Delila10 (37574)
donikla Creative Commons License 2023.09.29 0 0 37576

Utánanézek!
Köszi!

Előzmény: Delila10 (37574)
donikla Creative Commons License 2023.09.29 0 0 37575

Köszönöm!

Hasonló furcsaságokat produkál mint amikor én próbálkoztam, csak a te képleteid jóval egyértelműbekk.

Bizonyos esetekben megkergül, ezeket kezdtem a HA függvényekkel kigyomlálni, de abba nagyon belezavarodtam. Pl ebben az esetben a G5 értékét nem is értem...



Előzmény: Delila10 (37573)
Delila10 Creative Commons License 2023.09.29 0 0 37574

A választ írva hirtelen el kellett mennem.

Nem volt időm a legegyszerűbb megoldást leírni, hogy t.i. alkalmazhatod a villámkitöltést. Biztosan megtalálod a súgóban a leírását.

Előzmény: donikla (37572)
Delila10 Creative Commons License 2023.09.29 0 1 37573

Szia!

 

Előzmény: donikla (37572)
donikla Creative Commons License 2023.09.29 0 0 37572

Az előző hozzászóláshoz kapcsolódóan.

Legfőképp az ilyen típusú eltérések okozzák a problémát, valahol csak egy vessző van, valahol kettő, illetve a nevek hossza is változó ami az általam próbálgatott képletekben csak problémákat szül. "HA" függvények  halmazával sem tudok egységes függvényeket alkotni, ami mindegy típusú cellára jó lenne. 

 

RI,MÁRTON,ERZSÉBET

TAKÁTS,ISTVÁN

RI,ÁDÁM

KASZIBA,DÓRA

donikla Creative Commons License 2023.09.29 0 0 37571

Sziasztok!

Segítséget szeretnék kérni adatkinyerésben.

Vesszővel elválasztott, neveket tartalmazó cellákból szeretném függvény segítségével kinyerni az adatokat, későbbi feldolgozás céljára. A cél az lenne, hogy az egy cellában szereplő 3db vesszővel elválasztott nevek, 3db különböző cellába kerüljenek. Mindenképp függvénnyel szeretném, mert az alap adathalmaz változhat és emiatt a „szövegből oszlop” átalakítás nem célszerű út.

A cellák tartalma így néz ki:



Valahogy az én agyam nem tud ráhangolódni a függvényekre. Gondolom ez megoldható LEFT,RIGHT,MID és SEARCH függvények kombinációjával. Örülnék ha a függvény Google Táblázat kompatibilis lenne.

Köszönöm segítségeteket!

Ketele69 Creative Commons License 2023.09.21 0 1 37570

Garashan! pimre!

 

Köszönöm szépen!

Mindkét függvény tökéletes.

 

K.

Előzmény: Ketele69 (37566)
pimre Creative Commons License 2023.09.21 0 1 37569

Bocs, nem felülbíráltalak, hanem egyszerre írtunk. Te előbb végeztél.

Előzmény: Garashan (37567)
pimre Creative Commons License 2023.09.21 0 0 37568

C1 képlete: =HA(ABS(A1-A2)<=0,2; "OK";"nem OK")

Előzmény: Ketele69 (37566)
Garashan Creative Commons License 2023.09.21 0 0 37567

Bocsi, félre értelmeztem a kérdésedet.

 

Akkor erre módosítanám a képletet:

=HA(MAX(A1;A2)-0,2<=MIN(A1;A2);"OK";"Valami nem OK")

Előzmény: Ketele69 (37566)
Ketele69 Creative Commons License 2023.09.21 0 0 37566

Köszönöm.

 

Bocsánat, nem fogalmaztam pontosan, ezt szeretném elérni:

 

A1=2,5

A2=2,3

C1= "Ok"

 

A1=2,5

A2=2,2

C1= "Valami nem OK."

 

Előzmény: Garashan (37565)
Garashan Creative Commons License 2023.09.21 0 0 37565

A1 és A2 legyen a két vizsgálni kívánt cella.

=HA(KEREKÍTÉS(A1;2)=KEREKÍTÉS(A2;2);"OK";"Valami nem OK")

Ez azt csinálja, hogy a matematika szabályai szerint kerekíti A1 és A2 cellák tartalmát 2 tizedes jegy pontosságra. Ha így egyenlőek, akkor kiírja, hogy "OK", ha nem egyenlőek, akkor kiírja, hogy "Valami nem OK".

Előzmény: Ketele69 (37564)
Ketele69 Creative Commons License 2023.09.21 0 0 37564

Sziasztok!

Az alábbiakban kérnék tanácsot.

 

Két számított cellák értékét szeretném úgy összehasonlítani, hogy 2 tizedes eltérésig még OK eredményt adjon. 

Sajnos a két érintett cella különböző helyről szed össze rengeteg adatot és a kerekítések miatt gyakran van ennyi eltérés.

 

Köszönöm szépen,

Garashan Creative Commons License 2023.09.20 0 0 37563

"Ha nem nyitja meg az excel ma reggelre a gépen a fájlokat dupla kattintással.
Ami még látszik, hogy #appvlp lett társítva a fájlokhoz.
A hiba egy frissítés az office-hoz (szeptember 12).
Megoldás. Office-on belül fiók-nál frissítések tiltása, majd rendszergazda joggal ennek a parancsnak a futtatása:
"C:Program FilesMicrosoft Office 15ClientX64officec2rclient.exe" /update user updatetoversion=15.0.5571.1000
A fenti parancs Office 2013 64 bites verzióra vonatkozik, eltérő verzió esetén módosítani kell! Ezzel visszaállunk a július 11-én kiadott verzióra."

 

 

Forrás: https://www.facebook.com/story.php?story_fbid=pfbid029wKDobZPadWQCGwE38aYFVS5i5xW6coG1H6C34xjQ9fiQnykiNKodmh9XuvKRX2pl&id=100087579956061

m54-b Creative Commons License 2023.09.20 0 0 37562

Office 2007-ben:

 

 

Már beszúráskor megadhatod a szöveget

 

 

Működik  a link a pdf-ben is.

 

Újabb offisznál lehet, máshol található meg a  beszúrás.

 

 

Előzmény: zatzsu (37561)
zatzsu Creative Commons License 2023.09.20 0 0 37561

Sziasztok,

 

Hogyan tudok excelben úgy pdf-filera mutató hivatkozást vagy honlapra mutató hivatkozást befűzni, hogy a befűzés után a hivatjozás neve átnevezhető legyen? Illetve fog e működni a hivatkozás, ha utána az excel file-ból pdfet készítek?

Takeoff. Creative Commons License 2023.09.18 0 1 37560

Köszönöm, így már tökéletes

Előzmény: Garashan (37546)
Delila10 Creative Commons License 2023.09.16 0 0 37559

Átneveztem az XLSTART menüben a füzetet Munkafüzet1-re. Most úgy indul az Excel, ahogy szokott, kivéve a cellaformátumokat.

Előzmény: Törölt nick (37558)
Törölt nick Creative Commons License 2023.09.16 0 0 37558

Én az új munkafüzeteket mindig a Mentés gombbal mentem, mert egyszerűbb elérni, és hozzá vagyok szokva, hogy úgyis rákérdez a mentés helyére és a fájlnévre.

De nyilván más szokásokat is ki lehet alakítani :)

Előzmény: Delila10 (37557)
Delila10 Creative Commons License 2023.09.16 0 0 37557

Igen.

Viszont nem jellemző, hogy bárki Munkafüzet1 néven szeretné elmenteni a munkáját.

Előzmény: Törölt nick (37553)
Garashan Creative Commons License 2023.09.15 0 0 37556

(:

Eredetileg az volt a kérdés, hogy hogyan lehet gyorsan beilleszteni csak értéket. Így én feltéfeleztem, hogy van a vágólapon másolt cella/tartomány.

Előzmény: Eredő Vektor (37555)
Eredő Vektor Creative Commons License 2023.09.15 0 1 37555

b@sszus. Dehogynem működik! De arról nem volt szó, hogy előtte kell egy ctrl+c is :)

Előzmény: pimre (37537)
Eredő Vektor Creative Commons License 2023.09.15 0 0 37554

Van menü-gomb, néha használom is.

Alighanem az O365-ben rontották el - ez van a melóhelyen.

 

 

 

Előzmény: pimre (37537)
Törölt nick Creative Commons License 2023.09.15 0 0 37553

"Azóta ezzel a füzettel nyílik meg az Excel..."

 

De akkor figyelned kell rá, hogy az "új" munkafüzetet mindig a "mentés másként" paranccsal mentsed el először, különben felülírja a sablonodat, nem?

Előzmény: Delila10 (37552)
Delila10 Creative Commons License 2023.09.15 0 0 37552

Nem szeretem, hogy alapból minden cella függőlegesen lentre van igazítva. Ezért egy új füzetben minden cellát függ. középre igazítottam, majd Munkafüzet.xlsx néven elmentettem az XLSTART könyvtárba. Azóta ezzel a füzettel nyílik meg az Excel (és persze a háttérben a personallal).

 

Egyebeket is be lehetne állítani ebben a füzetben, pl. hogy az első oszlop dátum formátumú legyen, ha általában ilyen lapokat használunk.

Előzmény: Törölt nick (37548)
Törölt nick Creative Commons License 2023.09.15 0 1 37551

Valószínűleg a másik lapon "nevek" vannak. Ezek valójában tartományok, amelyeknek saját nevük van. A Képletek menüben a Névkezelő alatt lehet menedzselni őket.

Az ilyen névvel rendelkező tartományokat meg lehet adni adatforrásként Érvényesítés során.

Előzmény: djuice (37549)
Garashan Creative Commons License 2023.09.15 0 0 37550

A kijelölt cellákra a következő képen lehet ezt beállítani:

  1. Ki kell jelölni a cellákat.
  2. Át kell kattintani az adatok fülre.
  3. Majd az "Adateszköz" csoportnál az "Érvényesítés" parancs
  4. Megengedve szövegnél ki kell választani, hogy lista.
  5. Forrásnak be kell állítani a lehetséges értékeket
  6. A "Legördülő lista" mellett be kell pipálni a négyzetet
  7. Illetve nézd meg a többi beállítást is. Pl. be lehet állítani, hogy csak az érvényes listaelemeket fogadja el, ha nem olyat ír be kézzel az ember, akkor milyen üzenetet kapjon, stb.
Előzmény: djuice (37549)
djuice Creative Commons License 2023.09.15 0 0 37549

Sziasztok!

 

Kaptam egy excel táblát, ami a celláiban lenyíló menükben a szomszédos munkalapokról nyeri a kiválasztható adatokat.

Ez milyen funkció vagy hogyan lehet ezt megcsinálni?

Törölt nick Creative Commons License 2023.09.15 0 0 37548

Más fájlnevekkel nem próbálkoztam, szerintem ha sok fájl van az XLSTART mappában, akkor mindegyiket megnyitja. De valószínűleg a PERSONAL.XLSB név speciális, és csak akkor lesz rejtett munkafüzet, ha így hívják.

De ez csak az én véleményem, szerintem jobban jársz, ha szépen módszeresen kiteszteled.

Előzmény: Törölt nick (37547)
Törölt nick Creative Commons License 2023.09.15 0 0 37547

Nem vagyok tökéletesen tisztában vele, hogy az Excel hol tartja és hogyan kezeli ezt a fájlt. Láttam már a

C:\Program Files (x86)\Microsoft Office\root\OfficeXX\XLSTART

mappában is, de nekem például a

C:\Users\YourName\AppData\Roaming\Microsoft\Excel\XLSTART

mappába tette.

 

Fogalmam sincs, hogy ez mitől függ. Talán Office verziótól, vagy OS verziótól, vagy a csillagok állásától...

 

Mindenesetre az aktuális pontos helyet ki lehet deríteni. Ha a VB Editorban a Project Explorer ablakban ráállsz a PERSONAL.XLSB feliratú projektre, aztán az Immediate ablakban kiadod ezt a parancsot:

? ThisWorkbook.Path

akkor kiírja.

 

És ha már megtaláltad, szerintem ez is csak egy ugyanolyan fájl, mint a többi. Ha kiveszed a mappából, akkor nem nyílik meg automatikusan, ha visszateszed, akkor megnyílik.

Előzmény: CsRob1 (37544)
Garashan Creative Commons License 2023.09.15 0 0 37546

Rá állsz a B1 cellára, majd feltételes formázásnál új szabály. A szabálytípusnál pedig válaszd "A formázandó cellák kijelölése képlettel" opciót.
Értékek formázása, ha ez a képlet igaz mezőbe írd be:

=A1=2

Formátumnál pedig állítsd be, hogy mi legyen kék (vagy amit szeretnél).

Majd OK gomb.

 

Utána ugyan ezt meg kell csinálni, csak a mezőbe "=A1=1" szerepeljen macskakaparások nélkül és ott is állítsd be a formátumot olyanra amilyenre szeretnéd.

Előzmény: Takeoff. (37545)
Takeoff. Creative Commons License 2023.09.15 0 0 37545

Használtam már feltételes formázást, de azt csak arra a cellára tudtam beállítani ami meg is lett formázva. Itt viszont másik cella értéke alapján kell formázni. 

Előzmény: Garashan (37541)
CsRob1 Creative Commons License 2023.09.15 0 0 37544

Köszönöm. Ez az egyéni makró munkafüzet ugye az XLSTART mappában lévő personal.xlsb? Csak ezen a néven ismeri az Excel vagy bármilyen nevű .xlsb -t ebben a mappában ugyanúgy kezel? Okozhat-e problémát, ha ez a fájl csak időnként van ebben a mappában (amikor szükségem van rá), máskor pedig nincs, illetve időnként cserélgetem? 

Előzmény: Törölt nick (37543)
Törölt nick Creative Commons License 2023.09.15 0 0 37543

Úgy hívják, egyéni makró-munkafüzet. Elindítod a makrórögzítőt, és amikor megkérdi, hogy mi legyen a rögzítés helye, kiválasztod a lenyílóból az "Egyéni makró-munkafüzetben"-t. Aztán rögzítesz egy tetszőleges makrót. Akkor létrejön ez a fájl, a Visual Basic editorban látod, és utána oda mindenféle makrókat be lehet pakolni. Ez a munkafüzet mindig a háttérben, rejtettként nyílik meg, valahányszor elindítod az Excel alkalmazást.

Hátránya, hogy ha indítasz párhuzamosan egy második Excel instance-ot, akkor az is meg akarja nyitni ugyanezt a fájlt, és abból lehet némi kavarodás. De nem vészes.

Előzmény: CsRob1 (37542)
CsRob1 Creative Commons License 2023.09.14 0 0 37542

Ha van egy ilyen makróm, akkor azt hogy lehet elérni, hogy bármelyik megnyitott Excel fájlban működjön? Korábban, mikor tömegesen volt szükségem értékbeillesztésre, úgy sikerült megoldanom, hogy egy üres  makróbarát munkafüzetben volt a makró, és ha használni akartam, akkor ezt a munkafüzetet is megnyitottam. Van ennél egyszerűbb megoldás?

Előzmény: Törölt nick (37526)
Garashan Creative Commons License 2023.09.14 0 0 37541

Van.

Feltételes formázásnál keresd a Kezdőlap fülön.

Előzmény: Takeoff. (37540)
Takeoff. Creative Commons License 2023.09.14 0 0 37540

Sziasztok!

 

Van arra módszer, hogyha pl. az A1 cellába 1 szerepel akkor a B1 cellában lévő adat pirossal jelenjen meg, ha 2 akkor kékkel? 

pimre Creative Commons License 2023.09.14 0 1 37539

Először irtam egy elnézést kérő hozzászólást, jelezve a hibát. Aztán törlést kértem a moditopikban mindkettőre, és szerencsére gyorsan megtették. Láthatsz két lyukat a számozásban.

Előzmény: Törölt nick (37538)
Törölt nick Creative Commons License 2023.09.14 0 0 37538

Azt hogy csináltad, hogy utólag módosítottad a hozzászólást? Vagy rosszul emlékszem, hogy az eredeti poszt nem ilyen volt?

Előzmény: pimre (37537)
pimre Creative Commons License 2023.09.13 0 0 37537

"Nálam pl. nem megy, pedig tök jó ötlet." Nem egészen értem, hogy mi az oka, hogy nálad nem megy. Nincs Menü gomb?

 

 

 

Sajnos vannak olyan gépek, ahol nincs. Persze van olyan, ahol a jobb oldali Windows gomb hiányzik, és csak Menü gomb van. 

 

Ha viszont van Menü gombod, akkor lehet, hogy nem jelöltél ki másolandó cellá(ka)t? Mert egyébként működnie kellene. Vagy a menü gomb egyáltalán nem ad a gépeden helyi menüt más helyzetben sem? Mert akkor a gépeden van valami másképp beállítva.

 

AZ F2, F9, ENTER valóban csak egy cellán működik, sokan bosszankodnak is rajta. Pl.: https://forum.ozgrid.com/forum/index.php?thread/104427-macro-to-f2-f9-enter-then-repeat/

Előzmény: Eredő Vektor (37532)
Garashan Creative Commons License 2023.09.13 0 0 37534

2016-os, 2019-es és 2021-es verzió alatt próbáltam. Mindhárom verzió alatt működött. Nem tudom, hogy mikortól érhető el a jobb egérgombos menüben a gyorsgomb. Régen emlékszem, hogy egy külön ablakban kellett beállítani a beillesztés beállításait.

Nálam így néz ki a menü, a piros feliratok akkor jelennek meg, amikor ráviszem az egeret. Nálam "É" betűvel lehet köztük váltani, a második "É" betű lenyomására ugrik az érték beillesztésre.

Előzmény: Eredő Vektor (37532)
Eredő Vektor Creative Commons License 2023.09.13 0 0 37533

Bírom az ilyen "életszagú" hozzászólássokat, főleg egy ilyen "száraz" topikban :)

Előzmény: Garashan (37530)
Eredő Vektor Creative Commons License 2023.09.13 0 0 37532

Verziófüggő. Nálam pl. nem megy, pedig tök jó ötlet. Úgy szoktam, hogy F2, F9, ENTER. De ez csak 1 cellán működik.

Előzmény: Garashan (37528)
XNC Creative Commons License 2023.09.11 0 1 37531

Talán azt se ártott volna tisztázni, hogy melyik verzióról beszélünk.

.

Te leírtad a magyart, én meg leírom az angolt:

A korábban említett gomb lenyomása után lesz a "paste" alatt 1 "paste special" menü is;

ott a "Value", tehát az értéket kell kiválasztani.

Előzmény: Garashan (37528)
Garashan Creative Commons License 2023.09.11 0 0 37530

Férfiasan bevallom én se használtam túl sokat. De tavaly év végén felmondtam a régi munkahelyemen és írtam néhány utasítást, mit hogyan csináljanak az excel táblázatokban. Akkor jöttem rá, hogy ez a legegyszerűbb és a leggyorsabb módja. Amúgy is jó magam előnybe részesítem a billentyű kombinációkat az egérrel való hadonászással szemben, mert jóval gyorsabb velük a munka.

Amikor gyerekként egy-két alkalommal voltam a sebészeten ellátáson, akkor mindig csodáltam, hogy anya milyen gyorsan lépked ide-oda a programban. Akkor még valami DOS alapú programot használtak, gyakorlatilag egér nélkül lehetett csak. Mivel addigra már nagyon sok évet lehúzott ott, így a kisujjában volt minden kombináció és szinte csak egy villanásnyi időre jött fel egy új ablak, de ő már tovább is lépet.

Igaz a gomb nevére már nem emlékeztem :) De ezek szerint egész találó neve van.

Előzmény: pimre (37529)
pimre Creative Commons License 2023.09.11 0 0 37529

Off: Ez nekem új. Nem használtam sose. Most rákerestem, és kiderült, hogy a neve is az, amit írsz menü billentyű, angolul menu button, vagy menu key: https://en.wikipedia.org/wiki/Menu_key. Lényegében a jobb egér gomb funkcióját látja el. Mellesleg a Shift + F10 is használható ugyanerre a célra.

 

 

Előzmény: Garashan (37528)
Garashan Creative Commons License 2023.09.11 0 0 37528

Ha magyar Exceled van, akkor a jobb oldali alt mellett van egy speciális billentyű, azzal menüt lehet előhívni. Ha cellán állsz, akkor gyakorlatilag jobb kattintásnak felel meg. Utána kétszer É gomb, majd enter. És máris csak értéket illesztesz be.

Előzmény: thomas5000 (37527)
thomas5000 Creative Commons License 2023.09.11 0 0 37527

Köszönöm szépen!

Előzmény: Törölt nick (37526)
Törölt nick Creative Commons License 2023.09.11 0 0 37526

Abban igaza van Pimre kartácsnak, hogy a standard Ctrl+v beillesztés működését makróval nem lehet módosítani.

Viszont lehet olyan makrót írni, ami csak értéket illeszt be:

 

Sub beill_eszt()
    Selection.PasteSpecial xlPasteValues
End Sub

 

És utána ennek az indítását hozzá lehet rendelni akár a Ctrl+v kombinációhoz is.

Bár én inkább valami más kombinációhoz rendelném, olyanhoz, ami alapból nincs használatban.

Előzmény: thomas5000 (37524)
pimre Creative Commons License 2023.09.11 0 0 37525

Nem

Előzmény: thomas5000 (37524)
thomas5000 Creative Commons License 2023.09.11 0 0 37524

Sziasztok!

 

Egy olyan kérdésem lenne, hogy megoldható-e makróval, hogy a ctrl+v lenyomására csak az értéket illesze be, és semmi mást.
Szóval formátumot, meg ilyeneket ne.

Viselkedjen úgy, mintha csak az érték beillesztésére mennék egérrel.

 

Nem tudom mennyire érthető, remélem igen.

 

Előre is köszönöm a segítségeket!

local75 Creative Commons License 2023.09.05 0 0 37523

Szia!

Köszi ismét.

Jól működik.

Előzmény: pimre (37522)
pimre Creative Commons License 2023.09.04 0 1 37522

Szia, egy egyszerű megoldás:

 

Az aktuális munkalap kód oldalára, vagy egy új modulba másold be a következőt:

 

Sub elrejt()

Dim sor As Long

For sor = 1 To ActiveSheet.Range("I" & Rows.Count).End(xlUp).Row

    If ActiveSheet.Cells(sor, "I") = "A" Then

        ActiveSheet.Rows(sor).EntireRow.Hidden = True

    End If

Next sor

End Sub

 

Indításkor az adott munkalapon állj, majd indítsd el a programot. Megcsinálja, amit kérsz.

 

Azt hiszem, lenne elegánsabb megoldás, a ciklus kihagyásával egyetlen sorban megoldva, de erre most nincs ötletem.

Előzmény: local75 (37521)
local75 Creative Commons License 2023.09.04 0 0 37521

Sziasztok!

 

Segítségre van szükségem.

Makróval akarok elrejteni sorokat.
Az I oszlopban kellene keresni A betűt, és ahol A betű található, azt a sort el kellene rejteni.

 

Köszönöm

pimre Creative Commons License 2023.09.04 0 0 37520

Ugye az csak elütés, amit küldtél?

 

A1: 5  B1: 3

A2: 4  B2: 4

A3: 3  B3: 6

 

A5: 2  B5:  5

A6: 6  B6:  2

A6: 9  B7:  1

 

Mert szerintem a második csoportnak így kellene kinéznie:

 

A4: 2  B4:  5

A5: 6  B5:  2

A6: 9  B6:  1

 

És az összegzőnek is így kellene kinéznie:

 

C1: =SUM(A1:A3)=12

C2: =SUM(A4:A6)=17

 

Mert Garashan ezzel a feltétellel gondolta a javaslatát. Szerintem helyesen, különben nem stimmelnek a számaid. A Sum (A3:A6) =11 lenne (3+2+6), és a második csoportban is - bár ott két A6 szerepel - a Sum (A3:A6) ott is 17 lenne.

 

Légy szíves figyelmesebben add meg a képleteket, bár szerintem Garashan megoldása jó.

Előzmény: MM10 (37518)
Garashan Creative Commons License 2023.09.04 0 0 37519

Én így módosítanám a képleteket:

C1: =SZUM(A1:A3)+HA(ÉS(SZUM(A1:A3)=SZUM(A4:A6);MIN(B1:B3)=1);1;0)

C2: =SZUM(A4:A6)+HA(ÉS(SZUM(A1:A3)=SZUM(A4:A6);MIN(B4:B6)=1);1;0)

Előzmény: MM10 (37518)
MM10 Creative Commons License 2023.09.04 0 0 37518

Nem,viszont a probléma megoldásra kerül ha nem továbbküldöm a filet,hanem megoszton megnézésre.

 

Egy másik kérdésem lenne.

 

egy nagyon egyszerű példával szemléltetve a dolgot.

 

A1: 5  B1: 3

A2: 4  B2: 4

A3: 3  B3: 6

 

A5: 2  B5:  5

A6: 6  B6:  2

A6: 9  B7:  1

 

C1: =SUM(A1:A3)=12

C2: =SUM(A3:A6)=17

 

A B oszlop az egy sorrendet jelent a számok alapján legnagyobb az 1. és így tovább.

 

Vegyünk egy másik példát,amivel problémába ütközöm

A1: 3  B1: 4

A2: 4  B2: 3

A3: 5  B3: 2

 

A5: 1    B5:  5 

A6: 11  B6:  1

A6: 0    B7:  6

 

C1: =SUM(A1:A3)=12

C2: =SUM(A3:A6)=12

 

A problémám az,hogy a C1 és a C2es számok nem lehetnek egyenlőek,ez esetben szeretném ha a táblázat hozzáadna az összeshez a C1 és C2 cellában,amelyiknél a B oszlopban az "1" szerepel. Ez esetben a C2eshez,mivel az A6os számhoz tartozik az egyes szám. Ezt hogyan tudnám megoldani?

Előzmény: pimre (37509)
Törölt nick Creative Commons License 2023.09.04 0 0 37517

Esetleg azt próbáld meg, hogy a .Copy és  a .Paste közé beteszel egy DoEvents sort.

Meg én azt az "ActiveSheet" -et mindenképpen lecserélném valami egzakt hivatkozásra.

Előzmény: Garashan (37515)
pimre Creative Commons License 2023.09.04 0 0 37516

A makró megakadásról jut eszembe. három évvel ezelőtt kezdtem el írni egy meglehetősen szertegátazó interaktív programot, akkor még Office 2010 alatt. Minden rendben volt vele. Aztán, amikor a befejezéshez közeledtem - jó néhány hónap múlva -, telepítettem a 2019-es verziót. Legnagyobb döbbenetemre a program időről időre egyes helyeken megállt. Nem küldött hibaüzenetet csak megállt. Amikor megtaláltam a megállás helyét - mindig más helyen volt - akkor F5-el tudtam folytatni. Csakhogy nem magamnak szántam, és nem lett volna elfogadható, hogy így adjam át a felhasználónak. Sok találgatás után kiderült, hogy a ScreenUpdating kikapcsolása volt az ok. Hogy miért, arról fogalmam sincs. Kiirtottam, és onnantól hibátlanul működött. Kicsit rángatódzott néha a képernyő, de ezt inkább tartottam elfogadhatónak, mint a rendszeres megállást.

Előzmény: Garashan (37515)
Garashan Creative Commons License 2023.09.04 0 0 37515

Köszönöm, hogy szántál rá időt.

Az eredeti makrót évekkel ezelőtt írtam, 2016-os vagy 2019-es Office verzió alatt. Itthon 2021-es verzióm van. Tegnap este viszont jött egy telefon, hogy jó lenne, ha hasonlóan a korábbihoz itt is meg lehetne vizuálisan jeleníteni, hogy hogy áll a kamion töltöttsége.  Átmásolva a makrót és a hivatkozásokat rendbe téve az új dokumentumhoz jött a fekete leves, hogy sokszor hibára fut. Még éjjel a felhasználási helyén is ellenőriztem, ott amúgy nem tudtam reprodukálni a hibát. De csak egy munkaállomást érek el távolról az 5 darabból, így kicsit idegesített, hogy itthon megakad a makró. Amióta elkészült az eredeti makró azóta amúgy nem volt vele gond, nem is volt rajta módosítva még sohasem. De nyilván, ha új munkaállomás kerülne be a rendszerbe, akkor okozhatna gondot.

 

Egyelőre úgy hagyom, hogy marad a dupla copy-s sor. Ha esetleg mégis problémát okozna, akkor felhasználom az általad küldött kódrészletet. Bár a sok próba alatt 1 esetben a copy sorra is hibát adott. Esetleg még a DoEvents, mint lehetőség.

Előzmény: pimre (37514)
pimre Creative Commons License 2023.09.04 0 0 37514

Válaszoltam. De nem tudom a makró alapján megtalálni a hiba okát, hiszen nem a programod hibájáról van szó. 

Előzmény: Garashan (37513)
Garashan Creative Commons License 2023.09.04 0 0 37513

Szóval többször is lefuttam a makrómat.

1. eset: maradt a duplázott copy sor

2. eset: már csak 1 copy sor van

Ma nem akarta az igazságot. Sohasem jött ki 0 hiba :) Az esetek 90%-ban hiba=1, 10%-ban pedig hiba=2. 3 hibát sohasem regisztrált.

 

Közben rájöttem még valamire. Az Application.Wait függvénynek hiába lehet letuszkolni a torkán milliszekundumokat is jó formán nem veszi őket figyelembe. Szóval tegnap csak placebó hatás volt, hogy segített. Maximum 1 pillanattal több ideje volt utolérnie magát a makrónak. Arra alapozom az állításomat, hogy ha 500 ms várakozási időt adtam meg, akkor nem volt érezhető lassulás. Viszont ha 501 ms várakozási időt adtam meg, akkor kb. 1 mp-re felfüggesztette a futást.

Itthon a Sleep függvényt nem sikerült működésre bírni, pedig biztos vagyok benne, hogy már csináltam olyat.

 

Elküldtem e-mailben a dokumentumot, miután kipucoltam belőle az érzékeny adatokat.

Előzmény: pimre (37512)
pimre Creative Commons License 2023.09.04 0 0 37512

És esetleg hibafigyeléssel tesztelnéd, hogy sikerült-e, és ha nem, akkor visszaküldöd valahogy így:

 

hiba=0

:ujra

On error resume next

ActiveSheet.Paste

if err>0 then

   hiba=hiba+1

   if hiba>2 then ' Ha már harmadszor jön ide hiába

      'Tévedés, ez nem megoldás sajnos, ezért akkor itt lehet a várakoztatás

   endif

   goto ujra ' EGy korábbi vitára emlékezve ilyenkor azért elfogadható a goto parancs:-)

endif

on error goto 0

 

Más: itt találtam egy megoldást hasonló problémára: https://forum.ozgrid.com/forum/index.php?thread/1226709-paste-method-of-worksheet-class-failed/

A kérdező szerint a 9. javaslat (ezen belül nyilván a Sub maybe_4) a Paste megkerülésével oldotta meg a dolgot másolással. Nem tudom, nálad is megoldás lenne ez.

 

Ha egyik megoldás sem működik, akkor remélhetőleg jelentkezik Jimmy. Ő már többször talált az én hasonló problémáimra megoldást.

 

Előzmény: Garashan (37510)
Garashan Creative Commons License 2023.09.03 0 0 37511

Mondjuk ha megduplázom a 'Variables.Shapes(kepnev).Copy' sort, és kommentelem a várakozást, akkor egyszer se futott hibára a makró.

Előzmény: Garashan (37510)
Garashan Creative Commons License 2023.09.03 0 0 37510

Van egy makróm a következő dolgot csinálja:

  • megrendelő lapon figyeli a munkafüzet változását
  • ha a munkafüzet megváltozott, akkor törli a megfelelő nevű képeket róla
  • a kocsi telítettségének megfelelően beilleszt egy képet
  • majd a képet eltolja a megfelelő koordinátákra

Nos nekem a beillesztéssel van probléma. Eddig tökéletesen futott a makró. De most itthonról nyitottam meg és hibára futott....

A hiba:

Run-time error '1004':

Worksheet osztály Paste metódusa hibás

vagy angolul "Paste Method of Worksheet class failed"

 

Arra magamtól is rájöttem, hogy túl gyors neki a gépem. Hahaha. (Vagy túl lassú) Ugyanis, ha hibakereséshez betettem a következő sort 'MsgBox kepnev', akkor sohasem futott hibára.

Amúgy pedig teljesen véletlenszerűen jött elő a hiba.

Itt az egyik kommentben azt javasolták, hogy 'Application.Wait (Now + TimeValue("0:00:01"))' sort szúrjuk be és akkor csökken a hibák száma.

Tudtok erre valami elegánsabb megoldást? Hogy ne legyen annyira zavaró az 1 másodperces szünet, így levittem 250 ms-ra a várakozási időt. De attól függetlenül nem tetszik a megoldás... Illetve az itthoni gépemen így igaz, hogy csökkent az esetek száma, de nem szűnt meg teljesen. Másik gépen tesztelve viszont nincs probléma.

 

A kérdéses kódrészlet:

i = Variables.Range("B1").Value
If i < 5 Then
kepnev = "kocsi000"
ElseIf i < 10 Then
kepnev = "kocsi005"
ElseIf i < 97.5 Then
i = i / 5
kepnev = "kocsi0" & i * 5
ElseIf i <= 100 Then
kepnev = "kocsi100"
Else
kepnev = "kocsi101"
End If
Range("L1:M2").Select
Variables.Shapes(kepnev).Copy
'MsgBox kepnev
Application.Wait Now + ms * 250
ActiveSheet.Paste

pimre Creative Commons License 2023.09.03 0 0 37509

Elég valószínűtlen, de megkérdezem: Nem telt meg a drive?

Előzmény: pimre (37508)
pimre Creative Commons License 2023.09.03 0 0 37508

A megoldástól még messze vagyunk, de annyival előrébb jutottunk, hogy a probléma a továbbküldéstől független.

Ha jól értelek, arról van szó, hogy van egy Excel munkafüzeted, és azon az egyik munkalapot a Drive-on formázod: képeket teszel bele, betméreteket módosítasz, cellákat formázol, és mindezek a módosítások elvesznek, mikor a munkafüzet kikerül a Drive környezetből.

 

Jól értem? Ha igen, akkor azt, hogy mi az ok és a megoldás, egyelőre nem sejtem, csak annyit tudunk,hogy a munkafüzet letöltése után a módosítások elvesznek. (A visszaimportálás ebből a szempontból érdektelen. Naná, hogy az elveszett formázások nem jönnek vissza:-)

 

Szóval arra keressük a választ, hogy a Drive-on végzett módosítások miért vesznek el letöltés után. Ugye az Office verziód viszonyleg friss? Mondjuk nem 2003-as?

Előzmény: MM10 (37507)
MM10 Creative Commons License 2023.09.03 0 0 37507

letöltés utáni változát sem jó nálam sem már sem driveba újra beimportálva sem microsoft excelel megnyitva,ugyan ez a helyzet ha valakinek továbbküldöm 

Előzmény: pimre (37506)
pimre Creative Commons License 2023.09.03 0 0 37506

A "továbbküldés" mit jelent? Letöltöd, és azt küldöd tovább? Ebben az esetben a letöltött még jó, a továbbküldött pedig nem?

 

Előzmény: MM10 (37503)
MM10 Creative Commons License 2023.09.03 0 0 37505

.xlsx

Előzmény: Garashan (37504)
Garashan Creative Commons License 2023.09.03 0 0 37504

Én még nem találkoztam ilyennel. Milyen dokumentumot szerkesztesz a driveal? xls, xlsx, xlsm vagy valami mást, esetleg a sajátját?

Előzmény: MM10 (37503)
MM10 Creative Commons License 2023.09.02 0 0 37503

Sziasztok. Google Driveban szerkeztett táblázatnál ha továbbküldöm a fájlt elcsúszik az egész táblázat. A képek,a betűméretek visszaváltoznak eredeti méretre,a cellák nagysága visszaváltozik eredeti méretre (microsoft excel és google driveba is)

1. ez mitől van?

2. Hogyan tudom javítani a dolgot?

 

pimre Creative Commons License 2023.09.01 0 1 37502

Akkor az egyszerűség kedvéért idemásolom a teljes kódot:

 

Sub masolo()

Dim forrashely As Worksheet, celhely As Worksheet, cell As Range, utolsosor, utolsooszlop, sor As Long, oszlop As Long

Set forrashely = ThisWorkbook.Worksheets("Munka1")

Set celhely = ThisWorkbook.Worksheets("Munka2")

utolsosor = forrashely.Range("A" & Rows.Count).End(xlUp).Row

utolsooszlop = forrashely.Cells(1, Columns.Count).End(xlToLeft).Column

For sor = 1 To utolsosor

    For oszlop = 1 To utolsooszlop

        forrashely.Cells(sor, oszlop).Copy

        If forrashely.Cells(sor, oszlop).Font.ColorIndex = színkód Then

            celhely.Cells(sor, oszlop).PasteSpecial Paste:=xlPasteFormulas

        Else

            celhely.Cells(sor, oszlop).PasteSpecial Paste:=xlPasteValues

       End If

    Next oszlop

Next sor

End Sub

 

Sub Szin_lekerdezes()

    Dim Rh As Integer, Gh As Integer, Bh As Integer

    Dim Rk As Integer, Gk As Integer, Bk As Integer

    Dim hatter, karakter

  

    hatter = Selection.Interior.Color

    karakter = Selection.Font.Color

  

    Rh = hatter Mod 256

    Gh = (Int(hatter / 256)) Mod 256

    Bh = Int(hatter / 256 ^ 2)

  

    Rk = karakter Mod 256

    Gk = (Int(karakter / 256)) Mod 256

    Bk = Int(karakter / 256 ^ 2)

  

    MsgBox "Háttér RGB:  " & Rh & ", " & Gh & ", " & Bh & vbLf & _

        "Karakter RGB:  " & Rk & ", " & Gk & ", " & Bk & vbLf & vbLf & _

        "Háttér színkód:  " & Selection.Interior.ColorIndex & vbLf & _

        "Karakter színkód:  " & Selection.Font.ColorIndex

End Sub

 

És ha kiválasztasz egy színt, akkor annak színkódját lekérdezed a Delilától kapott lekerdezes() makróval, majd a kapott színkódot beírod a masolo() makróban a szinkód helyére és utána indítod el a masolo() makrót.

 

Természetesen a megtartandó képletek színkódja mindenütt ugyanaz legyen.

Előzmény: CsRob1 (37496)
pimre Creative Commons License 2023.09.01 0 1 37501

Bocsánat, elnéztem. Elfelejtettem, hogy az

 

If forrashely.Cells(sor, oszlop).Font.Color helyett a 

If forrashely.Cells(sor, oszlop).Font.ColorIndex re kellett volna javítanom a képletet. És ezzel már jól működik. Köszönöm.

Előzmény: pimre (37500)
pimre Creative Commons License 2023.09.01 0 0 37500

Kösz, ez nagyon jó, de amikor ráállok egy cellára, amin a piros betűszínt jelöltem ki, aminek a kódja 255, akkor a függvényeddel ezt kapom:

 

 

 

 

És az immediate ablakban az érték ?range("b3").Font.Color  esetében 255.

 

És a 3 értékkel nem működik a program, a 255-el pedig igen.

 

A helyzet az, hogy a színek kezelésével nemigen foglalkoztam, tehát lehet, hogy nálam van a hiba, de nem tudom, mi a megoldás.

 

 

Előzmény: Delila10 (37499)
Delila10 Creative Commons License 2023.09.01 0 1 37499

Valamikor Jimmy the Hand segítségével írtam egy makrót a personalba.

 

Sub Szin_lekerdezes()

    Dim Rh As Integer, Gh As Integer, Bh As Integer

    Dim Rk As Integer, Gk As Integer, Bk As Integer

    Dim hatter, karakter

   

    hatter = Selection.Interior.Color

    karakter = Selection.Font.Color

   

    Rh = hatter Mod 256

    Gh = (Int(hatter / 256)) Mod 256

    Bh = Int(hatter / 256 ^ 2)

   

    Rk = karakter Mod 256

    Gk = (Int(karakter / 256)) Mod 256

    Bk = Int(karakter / 256 ^ 2)

   

    MsgBox "Háttér RGB:  " & Rh & ", " & Gh & ", " & Bh & vbLf & _

        "Karakter RGB:  " & Rk & ", " & Gk & ", " & Bk & vbLf & vbLf & _

        "Háttér színkód:  " & Selection.Interior.ColorIndex & vbLf & _

        "Karakter színkód:  " & Selection.Font.ColorIndex

End Sub

 

Ezt kitettem a gyorselérésire, azóta sokszor alkalmazom, nagyon hasznos, hála Jimmynek.

Előzmény: pimre (37497)
gobe2222 Creative Commons License 2023.09.01 0 0 37498

Köszönöm szépen a segítséget, műxik! :)

Előzmény: Törölt nick (37494)
pimre Creative Commons License 2023.09.01 0 0 37497

A betűszín használatához az  If forrashely.Cells(sor, oszlop).Interior.Color = 255 Then sorában az  Interior.Color helyett Font.Color álljon.

A színkód lekérdezésére nem tudok jobb megoldást, mint a VBA oldalon (ALT + F11 után) az Immediate ablakban az aktív munkalap egyik már beszínezett cellájának színét lekérdezed: Ha mondjuk az A1, akkor ezt írod be: ?range("A1").Font.Color, majd az Enter után kiírja a színkódot.

 

Ha nálad nem jelenik meg az Immediate, akkor a fenti menüsorban a View alatt kérd a megjelenítését.

 

Előzmény: CsRob1 (37496)
CsRob1 Creative Commons License 2023.08.31 0 0 37496

Köszönöm, működik. Kisebb módosításokkal fogom tudni használni. Ha nem a cella háttérszínével, hanem a karakter színével különböztetem meg a képletes cellákat, akkor az Interior.Color helyett mit kell használni? Az Excel által a betűszín kiválasztásánál felajánlott színek (Alapszínek és Színösszeállítás) kódjait hol tudom megnézni? 

Előzmény: pimre (37489)
Törölt nick Creative Commons License 2023.08.31 0 0 37495

Elmondásod alapján arra gondolok, hogy van egy sablon táblázatod, aminek mindig ugyanaz a felépítése, és mindig ebbe pakolgatod bele az adatokat, de bizonyos adatokat képlet nélkül kellene.

Ha így van, akkor én azt tenném, hogy

  • a sablonban létrehoznék egy nevesített tartományt, avagy "nevet" az érintett cellákból,
  • átmásolok mindent úgy, ahogy van, képletestül
  • és utána futtatnék egy olyan makrót, ami a named range összes cellájában cseréli a képletet értékre.

Pl. ha a nevesített tartományt úgy hívják, hogy "no_formula_cells", és a Munka1 lap következő celláiból áll: F8, K12, J5, A7, J8  (valójában mindegy, milyen cellák vannak benne, ez tényleg csak egy példa)

akkor a makró ilyesmi lenne:

 

Dim c as Range

For Each c in Range(ThisWorkbook.Names("no_formula_cells").RefersTo).Cells

     c.formula = c.value

Next

 

Előzmény: CsRob1 (37484)
Törölt nick Creative Commons License 2023.08.31 0 0 37494

A két intervallum legyen (a;b) és (x;y).

Képlet:

=MIN(MAX(a:b);MAX(x:y)) >= MAX(MIN(a:b);MIN(x:y))

 

Teszteltem pár esetre, jónak tűnik...

Előzmény: gobeee (37493)
gobeee Creative Commons License 2023.08.31 0 0 37493

Igen, pontosan ezeket az eseteket próbáltam betenni a függvényképletbe, de sehogy sem volt hajlandó elfogadni.

Igazából mindegy hogy nyitott vagy zárt, mindkettő jó. Ehhez kérek szépen egy excel számára elfogadható képletet.
Köszi szépe előre is!

Előzmény: Garashan (37488)
Garashan Creative Commons License 2023.08.31 0 0 37492

De ha ez sem megoldás. Akkor a makró futtatása előtt, ha kijelöléssel kijelöli azokat a cellákat, ahol át kell vinni a képletet, akkor szerintem meglehet úgy írni a makrót, hogy ezt le tudja kezelni.

A kijelölt cellák hivatkozását el kell menteni egy tömbben. Minden átmásolni csak értékként, majd a tömbben elmentett hivatkozásokat átmásolni függvényként.

Előzmény: Garashan (37491)
Garashan Creative Commons License 2023.08.31 0 0 37491

Arra gondolok, hogy a táblázat szerkezete mindig ugyan az. Mondjuk egy árajánlat adó A4-es lap. A tételek változnak és mondjuk máshonnan jönnek az árak (nyilván azokat számként kell átvinni), de mondjuk a lap alján a szummázás már lehet képlet.

De lehet, hogy életszerűbb példa, ha megrendelő lapként gondolunk rá. Akkor az eladási ár kerül át számként, míg a sorösszegnek képletnek kell lennie.

Előzmény: pimre (37490)
pimre Creative Commons License 2023.08.31 0 0 37490

"Esetleg ha a táblázat szerkezete statikus, akkor nem kell trükközni se az eltérő formázással." Bocs, de ezt nem értem. Kíváncsi vagyok, mire gondolsz.

Előzmény: Garashan (37487)
pimre Creative Commons License 2023.08.31 0 1 37489

Készítettem is egy makrót, ami megcsinálná. Piros hátteret (színkód 255) csináltam a meghagyandó képletet tartalmazó cella hátterének.

A program végigmegy a teljes táblázaton, és mindent számmá alakít, ha nem piros a háttér, utóbbiaknál megtartja a képletet. A formázást nem tartja meg, feltételezem, hogy a célhelyen már nem lesz rá szükség.

Egyetlen munkafüzeten belül terveztem meg, Munka1 és Munka2 lapokkal:

 

 

Sub masolo()

Dim forrashely As Worksheet, celhely As Worksheet, cell As Range, utolsosor, utolsooszlop, sor As Long, oszlop As Long

Set forrashely = ThisWorkbook.Worksheets("Munka1")

Set celhely = ThisWorkbook.Worksheets("Munka2")

utolsosor = forrashely.Range("A" & Rows.Count).End(xlUp).Row

utolsooszlop = forrashely.Cells(1, Columns.Count).End(xlToLeft).Column

For sor = 1 To utolsosor

    For oszlop = 1 To utolsooszlop

        forrashely.Cells(sor, oszlop).Copy

        If forrashely.Cells(sor, oszlop).Interior.Color = 255 Then

            celhely.Cells(sor, oszlop).PasteSpecial Paste:=xlPasteFormulas

        Else

            celhely.Cells(sor, oszlop).PasteSpecial Paste:=xlPasteValues

       End If

    Next oszlop

Next sor

End Sub

Előzmény: pimre (37485)
Garashan Creative Commons License 2023.08.31 0 0 37488

Szerintem a felsorolt 3 függvénnyel meg lehet oldani. Most éppen utazok és nincs nálam papír és ceruza, de annyi a trükk, hogy fel kell rajzolni az összes lehetőséget és utána azt vizsgálni, hogy annak megfelel-e vagy sem.

A két intervallum legyen (a;b) és (x;y).

Ha nem tévedek, akkor a következő esetek kellenek neked:

x<=a<=y

x<=b<=y

a<=x<=b

a<=y<=b

Nyilván nem mindegy, hogy nyitott vagy zárt intervallumról beszélünk. Annak függvényében a relációs jelek változhatnak.

Előzmény: gobeee (37486)
Garashan Creative Commons License 2023.08.31 0 0 37487

Én is ilyesmire gondoltam. Esetleg ha a táblázat szerkezete statikus, akkor nem kell trükközni se az eltérő formázással.

Előzmény: pimre (37485)
gobeee Creative Commons License 2023.08.31 0 0 37486

Sziasztok!

Segítségetek szeretném kérni számintervallumok közös részével kapcsolatban. A kérdés az, hogy egyik intervallum és másik inetrvallumnak van-e közös része. Nem kell kiírni mi a közös intevallum, csak hogy van-e.

Próbálkoztam órákat IF , AND , OR fügvényekkel , szémos féel relációval,, de eredménytelen.

Milyen egymásba ágyazott függvény parancsot tudtok adni erre az esetre?  

Köszönöm szépe előre is!

pimre Creative Commons License 2023.08.31 0 0 37485

Szerintem ez makró nélkül nem oldható meg. Legalábbis nem tudok olyan eszközről, amivel jelezni tudnám az Excelnek, hogy másoláskor melyik cella tartalmát másolja, és melyiknél a függvényt.

 

Azt viszont el tudnám képzelni, hogy mondjuk az egyik típusú cellákat - mondjuk a képletet megtartandókat - másképp formázod, pl. eltérő betűtípus, vagy háttérszín stb., majd a makró végigmegy a munkalapon (vagy annak kijelölt területén), és ennek megfelelően másolja át az értéket, vagy a képletet. 

Előzmény: CsRob1 (37484)
CsRob1 Creative Commons License 2023.08.31 0 0 37484

Sziasztok!

Munkám során gyakran szükséges képletekkel és hivatkozásokkal teletűzdelt táblázatok adatainak elküldése (számítások, hivatkozások nélkül). Ez egyszerűen megoldható munkalapon végzett másolás-értékbeillesztés funkcióval. Bizonyos esetekben szükséges, hogy egyes cellákban a képletek a továbbküldött táblázatban is megmaradjanak, mások helyett csak érték szerepeljen. Jelenleg úgy oldom meg, hogy a számként beillesztendő tartományokat egyesével másolom a küldendő munkalapra, ám ez nagyméretű és bonyolult táblázatoknál időigényes. Van-e arra mód az Excelben, hogy egy-két lépésben csak az értékeket illesztem be, de a beillesztési területen lévő bizonyos cellák (a képletet tartalmazók) ne módosuljanak? Többszörös kijelölés ebben az esetben nem működik.  Excel 2007 verzió.

pimre Creative Commons License 2023.08.25 0 2 37483

Szívesen. Örülök, hogy sikerült megoldani.

Előzmény: local75 (37482)
local75 Creative Commons License 2023.08.24 0 1 37482

Bocsi, közbe jött egy kis nyaralás, és nem tudtam vele foglalkozni.

 

 

Nagyon köszi a segítséget.

 

Ez a mondatod segített: "a másik az, hogy az input adatokkal van valami gond. Olyan adat keveredett be (pl. szám helyett string), amivel nem tud mit kezdeni"

 

Átnéztem az utoljára bevitt adatokat, és egy dátum formátum volt a hibás.

Az OTP excel táblájából másoltam át egy dátumot, amely látszólag ugyanolyan formátumú volt mint az enyém, de mégsem tetszett neki.

 

 

Előzmény: pimre (37449)
Electroman Creative Commons License 2023.08.20 0 1 37481

Szuper, köszönöm!

Előzmény: Garashan (37419)
Tibi8009 Creative Commons License 2023.08.20 0 0 37480

 Köszönöm a segítséget! Már kipróbáltam és tényleg működik.:)

Előzmény: Fferenc50 (37478)
Fferenc50 Creative Commons License 2023.08.19 0 0 37479

Bocs, az új Excelben a DARABTELI helyett a DARABHA név szerepel, de ugyanaz a függvény csak másként magyarították a nevét.

Előzmény: Fferenc50 (37478)
Fferenc50 Creative Commons License 2023.08.19 0 0 37478

Szia!

Sajnos az ismétlődések nem lehet ilyen egyszerűen, de jófelé kapirgálsz.

Csakhogy a DARABTELI függvénynek nem lehet tartományt/tömböt megadni kritérium paraméterként, ezért minden keresett értékre egyenként kell felírni a függvényt és a találatokat összegezni. Ezt lehet egy cellában is, a példádban a J15 cella képlete ez lenne:

=SZUM(DARABTELI(E$2:E$36;$E38);DARABTELI(E$2:E$36;$E39);DARABTELI(E$2:E$36;$E40);DARABTELI(E$2:E$36;$E41);DARABTELI(E$2:E$36;$E42);DARABTELI(E$2:E$36;$E43);DARABTELI(E$2:E$36;$E44))

Ez a képlet húzható jobbra.

A DARABTELI függvényeket beteheted segédcellákba és a végén összegzed. A képen így van, láthatod a J2 cella képlete megegyezik az előző képlet első DARABTELI függvényével és a képlet húzható lefelé és oldalra is. 

 

Annyi DARABTELI függvényre van szükség, ahány keresést szeretnél végrehajtani. Természetesen az első paraméter (Tartomány) nem csak egy oszlop lehet, de összefüggőnek kell lennie.

Üdv.

Előzmény: Tibi8009 (37477)
Tibi8009 Creative Commons License 2023.08.19 0 0 37477

 

 Ha képlettel is lehetne, az lenne a legjobb, egyszerű, elegáns megoldás. Megpróbáltam analóg módon felírni azzal, ahogy mutattad, a 4-nél kisebb formázásra, de nem ment. Nekem ismétlődő értékek feltételes formázásra kellene. Mutatom a konkrét példát:

 

 

 

 A J15 cellába ezt írtam: =DARABTELI(E2:E36;"="& E38:E44)

 Gondolom az E38:E44 tartomány felírását kellene másképp. Legalábbis, ha csak annyit írok be, hogy E38, akkor beírja az 1-et. Próbáltam / jelekkel elválasztva:

=DARABTELI(E2:E36;"="&E38/E39/E40/E41/E42/E43/E44), de így nem jó, pedig végül is ez a kritérium kellene: ha egyenlő ezzel vagy ezzel vagy ezzel…

 

 Meg lehet így valahogy, mit kellene beírni a / helyett?

Előzmény: Fferenc50 (37476)
Fferenc50 Creative Commons License 2023.08.18 0 0 37476

Szia!

Ebben az esetben még makró sem kell a megoldáshoz! (Nagyon a színre koncentráltunk, pedig másként is meg lehet oldani!)

Feltételes formázásnál pedig képlettel is megy a dolog.

A példában: I1 képlete =SZUMHA(A1:A6;"<" &4;A1:A6) a cellák összege

                  I2 képlete =DARABTELI(A1:A6;"<" &4) a cellák darabszáma

Amint látod, a feltételes formázáshoz tartozó feltételt kell beírni mindkét függvényhez. Ebben a formában húzható jobbra.

Ráadásul nem is kell így mintacella!

Ha nem feltételes formázással van a cella színezése, akkor úgy működik a makró, hogy a DisplayFormat tulajdonságot ki kell hagyni pl.

indRefColor = cellsColorSample.Cells(1, 1).DisplayFormat.Font.Color helyett 

indRefColor = cellsColorSample.Cells(1, 1).Font.Color

Üdv.

Előzmény: Tibi8009 (37474)
pimre Creative Commons License 2023.08.18 0 0 37475

Szia, újabb verzió ügyben talán tudok segíteni. Küldj egy emailt.

Előzmény: Tibi8009 (37474)
Tibi8009 Creative Commons License 2023.08.18 0 0 37474

 

 És már meg is van a megoldás!:)

 Kitöröltem a sort és kaptam hibaüzenetet:

 

Run-time error ’438’:

Object doesn’t support this property or method

 

 2007-es Excel-t használok, szégyellem is magam, de újabbat nem sikerült beszereznem. Kerestem online használható verziót, de az meg nagyon más, a makrókat pl. sehol nem találtam benne, pedig szerettem volna kipróbálni és végre látni szépen megszámolt színes cellákat.:)

 Megpróbálok szerezni újabb verziót. Köszönöm a segítséged! Talán ezzel érem el a régen várt áttörést az életemben.:)

Előzmény: Fferenc50 (37473)
Fferenc50 Creative Commons License 2023.08.17 0 0 37473

Folytatás:

Előbb ezt nézd meg légy szíves!

Milyen Excel verziót használsz? Mert korábbi verziókban nem volt benne a DisplayFormat  a Range objektumhoz.

Az On Error Resume Next sor miatt nem kapsz hibaüzenetet, ezért úgy tűnik, mintha lefutna rendesen, de mégsem.

Légy szíves töröld ki ezt a sort, akkor ki fog derülni, hogy kapsz-e hibaüzenetet.

Üdv.

Előzmény: Tibi8009 (37465)
MM10 Creative Commons License 2023.08.17 0 0 37472

Köszönök minden segítséget. Még annyit,hogy képet lehetséges úgy beszúrni hogy a cellába tudjak írni és a szöveg az kép elé kerüljön?

Előzmény: Fferenc50 (37470)
Fferenc50 Creative Commons License 2023.08.17 0 0 37471

Szia!

Nem szeretnélek elkeseríteni, de nálam megfelelően működik. 

Kísérletezéseim során arra jutottam,  hogy nem 1 cellát jelölsz be mintacellaként, hanem többet, nem egyforma színűt. Ezért marad fekete a betűszín.

A minta csak 1 cella lehet!

Üdv.

Előzmény: Tibi8009 (37465)
Fferenc50 Creative Commons License 2023.08.17 0 0 37470

Szia!

A cellát szerintem nem lehet több színűre színezni.

Viszont beszúrhatsz képeket a munkalapra és azokat beformázhatod és hozzákötheted egy cellába.

Beszúrás - képek beszúrása. Ha nem találod itt, akkor a beállítások - menüszalag testreszabása - gyakori parancsok között találod meg, ebben az esetben a menüszalagon létre kell hoznod egy új egyéni lapot.

Üdv.

Előzmény: MM10 (37468)
Vax Creative Commons License 2023.08.17 0 0 37469

Így is lehet: [link]

Előzmény: MM10 (37462)
MM10 Creative Commons License 2023.08.17 0 0 37468

Lemaradt a mellékelt kép,talán nem tudok képet feltölteni friss felhasználóról.

https://imgur.com/sc4Hsix

Előzmény: MM10 (37467)
MM10 Creative Commons License 2023.08.17 0 0 37467

Köszönöm szépen,tökéletesen működik.

Egy utolsó kérdésem még lenne,talán ez nem is megvalósítható. 

Egy adott cella színét lehetséges több színűre állítani? a példám kedvéért,azt szeretném elérni ha néhány cellám a Magyar zászló színeiben nézne ki. Egy átszerkeztett képet mellékelek,amiből látszik hogy nagyjából mire gondoltam. 

 

 

Előzmény: Fferenc50 (37466)
Fferenc50 Creative Commons License 2023.08.17 0 0 37466

Szia!

Itt a képlet: =INDEX($A$2:$A$5;HOL.VAN($G2;$B$2:$B$5;0))

Szerintem a kettőspontot pontosvesszőnek "fordítottad".

Üdv.

Előzmény: MM10 (37464)
Tibi8009 Creative Commons License 2023.08.17 0 0 37465

 

 Nálam is piros, nem fekete a minta betűszíne, minden próbánál. A kijelölés sorrendet is betartom, ahogy írtad(vizsgált tartomány, minta, célcella).

 Feltöltöttem a Google Drive-ra, talán így rá tudsz nézni.

 

https://drive.google.com/file/d/1lzqk47kcctghE78_H8De0JMMbZheW25w/view?usp=sharing

 

 Vagy ha így nem jó, hová célszerű feltölteni, hogy láthassad?

 Gondoltam, nézek valahol online használható Excel programot vagy töltök le valahonnan, de nem tudom, honnan lehetne. Talán úgy indulhatnék tiszta lappal és úgy működne, ahogy nálad. Bár lehet, nem ez a gond.

 

Előzmény: Fferenc50 (37461)
MM10 Creative Commons License 2023.08.17 0 0 37464

Üdv. Köszönöm a választ. a g2es képlet tökéletesen működik. a h2esnél viszont hibát ír (Az argumentumok száma nem megfele a(z) MATCH függvényhez. 2 és 3 közötti argumentumot várt,4érkezett)

mindenesetre kitudnád másolni azt a képletet is,mert lehetséges hogy én írtam ki rosszul. 

Előzmény: Fferenc50 (37463)
Fferenc50 Creative Commons License 2023.08.17 0 1 37463

Szia!

A sorrendet a NAGY függvénnyel és az INDEX - HOL.VAN függvény kombinációval lehet megvalósítani:

G2 cella képlete: =NAGY($B$2:$B$5;$F2)

H2 cella képlete látszik a képen.

A képletek húzhatók az oszlopon lefelé, ha a $ jelek a fentiek szerint vannak.

Azonos pontszám esetén ez sajnos nem működik.

Üdv.

Előzmény: MM10 (37462)
MM10 Creative Commons License 2023.08.17 0 0 37462

Sziasztok.

 

a problémám a következő lenne. Vegyünk alapul egy nagyon egyszerű példát mondjuk a focival kapcsolatban.

 

ebben az esetben így néz ki

 

     1                           2                    

A   csapatok            pontok

B  Barcelona              10

C Real Madrid             9

D Valencia                 11

E Sevilla                    12

 

és egy másik helyen azt szeretném hogy csináláljon a tábla automatikusan egy sorrendet minden változás után a pontok alapján

pl a jelenlegi példával élve van ez a sorrend

1. Sevilla

2. Valencia

3. Barcelona

4. Real Madrid

de ha átírom a valencia pontjait 15re akkor automatikusan cserélje a sorrendet 

Ez megoldható valahogyan?

Előre is köszönöm a válaszokat,szép napot! 

Fferenc50 Creative Commons License 2023.08.17 0 0 37461

Szia!

A minta cella betűszíne biztosan fekete, mert az írja ki a makró és a képen is annak látom. :(

Így néz ki a kijelölés nálam, mielőtt elindítom a makrót (ezt a Ctrl billentyű nyomvatartásával lehet elérni):

Talán kevésbé látszik, de az F1 cella betűszíne is piros.

A betűszín miatti összesítést akkor is megcsinálja, ha a kitöltőszínnel nem foglalkozunk:

Tehát csak a betűszín alapján is összead. Ez nyilván akkor probléma, ha ugyanazon betűszinhez más-más háttérszín van párosítva eltérő feltételekkel. Ez utóbbira is van megoldás. 

Most igazából azt kellene elérnünk, hogy nálad is ugyanúgy működjön, ahogyan kell. 

Esetleg valahova fel tudnád tenni ezt a minta fájlodat, hogy ránézhessek?

Természetesen az is fontos, a kijelölés a leírt sorrendben történjen: vizsgálandó terület - utána mintacella - végül a célcella! 

Üdv.

Előzmény: Tibi8009 (37460)
Tibi8009 Creative Commons License 2023.08.17 0 0 37460

 Sajnos nem ez baj. A feltételes formázásnál nem csak a cellaszínt változtatja, hanem a betűszínt is(piros kitöltőszín, sötétvörös szöveggel), a formázott cellákban nem fekete betűk vannak. Meg a 2.próbában, ahol csak egyenként változtattam a betűszíneket, nem feltételes formázással, ott sem működik.

 Azért kipróbáltam a FONT-ot INTERIOR-ra cserélni, ahogy írtad, de nincs változás, ugyanazt írja be.

 Ahogy belegondoltam, valószínűleg tényleg jó lehet a makró, hiszen nálad jól működik. Valamilyen beállítás lehet a gond, környezet, ami nálad más, mint az én gépemen. Csak nem tudom, mi. Ajj… pedig már majdnem jó.:)

 Ja, meg a 2.próbából az is következik, hogy nem csak a feltételes formázást nem veszi figyelembe, hanem az sem érdekli, hogy külön megváltoztattam a betűszínt.

Előzmény: Fferenc50 (37459)
Fferenc50 Creative Commons License 2023.08.17 0 0 37459

Szia!

Azt hiszem, az a gond nálad, hogy a feltételes formázást a cella kitöltő színére adtad meg. A makró pedig a betűszint vizsgálja (FONT.COLOR). Ezért is irja a végén, hogy betűszín 000000, azaz fekete, hiszen minden betű fekete színű a cellákban.

Ha a kitöltő színre szeretnél keresni, akkor a FONT -ot INTERIOR-ra kell cserélned a makróban a két helyen. Mert nem mindegy, mit vizsgálunk.

Egyenlőre azt javaslom, ha kitöltő színre szeretnél vizsgálódni, akkor másold át a makrót egy új névvel és ott INTERIOR legyen a FONT helyén, a kiírásban pedig a betűszínt írd át kitöltő színre vagy egyszerűen csak színre.

Más: 1. Azokat a cellákat, amelyekben nincs érték, azt kihagyja a számolásból. Sajnos a feltételes formázás ezt úgy értékeli, hogy kisebb, mint 4 :( ezért színezi be.

2. A 4. próba cellaszáma sem "helyes" az elvárásod szerint, hiszen mindenhova 6-ot írt, ugyanakkor a makró feltételei szerint jó.

Üdv.

 

 

Előzmény: Tibi8009 (37458)
Tibi8009 Creative Commons License 2023.08.17 0 0 37458

 Kipróbáltam, de valamiért nem úgy működik, mint neked. Vagyis rosszul működik.

 

 

 

 Az 1.próbában kisebb, mint 5 feltételes formázott számok vannak.

 A 2-ban egyenként változtattam meg a betűszínt, hátha csak a feltételes formázást nem veszi figyelembe.

 A 3-ban megpróbáltam mindent pontosan ugyanúgy, ahogy te mutattad a képen, kisebb, mint 4 feltétellel formázva.

 De nekem nem számolja. Mit csinálhatok másképp, mint te?

 A 3.próbában, érdekes, hogy 5 darab cellát adott eredményül, tehát nem csak simán az összes cellát megszámolja az adott oszlopban, hanem csak ahol valamilyen érték van. Vagyis valamit biztosan csinál. Illetve a számok összegét is beírja, bár a feltételes formázást ebből a szempontból sem veszi figyelembe. Mondjuk azt sem értem, hogy a feltételes formázás miért színezte be azt a cellát, ahol semmilyen érték nincs.

 

 Negyedszerre kipróbáltam, hogy ha kitörlöm az eljárásból az output végét

(& " Darab " & Left("000000", 6 - Len(Hex(indRefColor))) & Hex(indRefColor) & " betűszínű cella összege: " & sumres)

 akkor csak egyetlen számot ír be, az adott oszlop színes celláinak számát, nekem ez kellene. Vagyis elvileg azt írná be. Tehát valószínű, az eljárásban van a hiba, nem én csinálok rosszul valamit. Már bocsánat, hogy így mondom, de sajnos nem értek hozzá eléggé, pedig nagyon érdekes dolog.:)

 

 Esetleg valami ötlet, miért nem sikerült nekem ugyanaz, mint neked, az alapján, hogy mit csinál nálam a kép szerint?

Előzmény: Fferenc50 (37456)
Tibi8009 Creative Commons License 2023.08.17 0 0 37457

 Sajnos nagyon kezdő vagyok, nem tudtam, hogy a feltételes formázással kapott cellaszín ennyire más tészta. Köszönöm a segítséged.:)

Előzmény: Delila10 (37454)
Fferenc50 Creative Commons License 2023.08.16 0 0 37456

Szia!

Sajnos olyan függvény nem működik, amely a feltételes formázás paramétereit figyelembe véve írná ki a kívánt értékeket. Azonban egy kis ügyeskedéssel elérhető, hogy egy menetben írja ki a kívánt értéket.

A következő módosított eljárást másold be egy modulba:

Sub SumCountByConditionalFormat2()
Dim indRefColor As Long
Dim cellsColorSample As Range
Dim cntRng As Range
Dim curRng As Range
Dim cntRes As Long
Dim sumRes
Dim cntCells As Long
Dim indCurCell As Long
Dim colNum As Long
Dim indCurColumn As Long
Dim colRng As Range
Dim clRng As Range
Dim outputRng As Range
If Selection.Areas.Count <> 3 Then
MsgBox "Nem tudom, melyik területtel számoljak!"
Exit Sub
End If
On Error Resume Next

cntRes = 0
sumRes = 0
With Selection
Set cntRng = .Areas(1)
Set cellsColorSample = .Areas(2)
Set outputRng = .Areas(3)
End With
cntCells = cntRng.Cells.Count
colNum = cntRng.Columns.Count
indRefColor = cellsColorSample.Cells(1, 1).DisplayFormat.Font.Color
indCurColumn = 0
For Each colRng In cntRng.Columns
For Each clRng In colRng.Cells
If indRefColor = clRng.DisplayFormat.Font.Color Then
If Not IsEmpty(clRng) Then
cntRes = cntRes + 1
sumRes = WorksheetFunction.Sum(clRng, sumRes)
End If
End If
Next
outputRng.Offset(0, indCurColumn).Value = cntRes & " Darab " & Left("000000", 6 - Len(Hex(indRefColor))) & Hex(indRefColor) & " betűszínű cella összege: " & sumRes
cntRes = 0
sumRes = 0
indCurColumn = indCurColumn + 1
Next
End Sub

Hogyan működik: 

Ki kell jelölnöd a Ctrl billentyű segítségével 3 tartományt: 1. ahol a megszámolandó értékek vannak 2. ahol a minta van 3. ahova az eredményt szeretnéd látni. EZUTÁN lehet a makrót elindítani a Fejlesztőeszközök - makrók menüpontból.

Képen így néz ki a kijelölés pl:

Kijelöltem az A1:C6 tartományt, majd a Ctrl gombot nyomva az F1 továbbá az akkor még üres I1 cellát. A kijelölés sajnos nem látszik a képen valami miatt.

Ezután indítottam a makrót. 

A makró az első kijelölt terület oszlopain végig megy, megszámolja az F1 cellában levő minta szerinti cellákat és az eredményt  beírja a harmadik terület következő cellájába. A minta a piros betűszínt tartalmazza feltételes formázásban a 4-nél kisebb cellákra.

Üdv.

Előzmény: Tibi8009 (37448)
Fferenc50 Creative Commons License 2023.08.16 0 0 37455

Szia!

Igen, az később derült ki, hogy az lenne igazán fontos számára.

Üdv.

Előzmény: Delila10 (37454)
Delila10 Creative Commons License 2023.08.16 0 0 37454

Nem néztem végig az összes hsz-t (most sem), az eredeti kérdésben nem szerepel a feltételes formázás.

Előzmény: Fferenc50 (37452)
Vax Creative Commons License 2023.08.16 0 1 37453

Állj bele a kimutatásba, jobbklikk-frissítés, jobbklikk-kimutatás beállításai, Adatok lap, és ott kell beállítani, hogy frissüljön, vagy mentse el a forrást. 

Előzmény: local75 (37444)
Fferenc50 Creative Commons License 2023.08.16 0 0 37452

Szia!

A feltételes formázást ez így nem számolja meg! Ahhoz a DisplayFormat objektumot kell használni a Range-nél, viszont úgy függvényként nem műxik.

Üdv.

Előzmény: Delila10 (37451)
Delila10 Creative Commons License 2023.08.16 0 0 37451

Ez a funkció megszámolja.

 

Function FormaDarab(Mintacella As Range, Tartomany As Range)

   'Megszámolja a Tartomany-ban lévő cellákat, ahol a háttér és a font színe

   'megyezik a mintacelláéval.

  

   Dim CV As Range, Hatterszin, db, Fontszin

   Application.Volatile

  

   Hatterszin = Mintacella.Interior.Color

   Fontszin = Mintacella.Font.Color

   db = 0

   For Each CV In Tartomany

      If CV.Interior.Color = Hatterszin And CV.Font.Color = Fontszin Then db = db + 1

   Next CV

   FormaDarab = db

End Function

 

Előzmény: Tibi8009 (37424)
Vax Creative Commons License 2023.08.16 0 0 37450

Egyéni listák szerint is lehet rendezni. (hasonlóan a V,H,K,Sz..., vagy a jan.,feb., márc., stb.hez).

Létre kell hozni egy "A1.,A1.1,A1.2.1, stb." listát, és a rendezésnél hivatkozni rá.

Előzmény: Takeoff. (37426)
pimre Creative Commons License 2023.08.16 0 1 37449

Szerintem ennyi információból sötétben tapogatózás lenne találgatni, hogy mi lehet a hiba oka. Az ilyen hibakódok önmahukban keveset mondanak. Ha látjuk hozzá a hibás sort, ahol a program elakadt, az talán többet elárulna, de még az sem biztos,hogy elég.

 

A lehetséges okok közül a legkevésbé valószínő, hogy "az excel eghülyült". Nem szokott:-)

Az sem valószínű, hogy a makró módosult úgy, hogy eddig jól működött, most meg már nem. Ilyet se szokott csinálni.

 

Így távolból két lehetőségiet tudok elképzelni: 

 

Az egyik, hogy a makróban van valami hiba, de az eddig használt adatokkal nem futott rá a hibás sorra, a másik az, hogy az input adatokkal van valami gond. Olyan adat keveredett be (pl. szám helyett string), amivel nem tud mit kezdeni, vagy sérült a letöltött fájl.

 

Ha nem bizalmas adatokról van szó, akkor jó lenne, ha feltöltenéd a munkafüzetet a makrókkal együtt felhőbe, és megadnád a linket.

Ha ez nem megoldható, akkor nincs igazán ötletem a megoldásra.

Előzmény: local75 (37443)
Tibi8009 Creative Commons License 2023.08.16 0 0 37448

Hello!

 Köszönöm, hogy átvettél.:)

 Hasznos volt a segítséged, egy lépéssel közelebb jutottam, de sajna még mindig nem jó. Mutatom, mit csinál az a makró, amit a linkelt részletesen magyarázó angol nyelvű oldalon találtam.

 

 

 Valami nem jó benne, mert nem csak a piros, hanem az összes cella összegét adja meg. És a cellák száma is az összes, nem csak a piros.

 Az tényleg működik, amit írtál módosítást, beírja a cellába az eredményt, ez tényleg jól jön, így szeretném. Ha jól látom, akkor a makróba kellett beírni, hogy az F1 cellába írja. Nekem az kellene, hogy beírja egy adott cellába az eredményt és utána kitöltéssel az egész keresést kiterjeszthessem a szomszédos cellatartományokra is, és oszloponként beirkálja az eredményeket, mint ahogy egy függvénnyel csinálnám. Ezt ezzel nem lehet?

 Engem egyébként nem érdekel a piros cellákba írt számok összege, csak az egy tartományban található piros színű cellák száma. De úgy tűnik, ez sem olyan egyszerű…

Előzmény: Fferenc50 (37440)
Tibi8009 Creative Commons License 2023.08.16 0 0 37447

 Rendben, megértem, köszönöm az eddigi segítséged is.:)

Előzmény: pimre (37437)
local75 Creative Commons License 2023.08.16 0 0 37446

Igen, akkor is.

Előzmény: pimre (37445)
pimre Creative Commons License 2023.08.15 0 0 37445

Kikapcsoltad és újraindítottad a gépet? Akkor is?

Előzmény: local75 (37444)
local75 Creative Commons License 2023.08.15 0 0 37444

A kézi szűrőt sem engedi használni.

Azt írja: Kimutatás mentése adatok nélkül. Használja az adatfrissítés parancsot..

local75 Creative Commons License 2023.08.15 0 0 37443

Sziasztok!

Segítséget szeretnék kérni.

Az excel kicsit meghülyült.

Eddig flottul működtek a kimutatásomban a makrók, most 1004-es hibára fut.

Azt írja használjam az adatfrissítés parancsot, de nem találok ilyet.

Ha a sima frissítésre gondoltak, az hasztalan.

 

Mi lehet a probléma?

 

Fferenc50 Creative Commons License 2023.08.15 0 0 37442

Szia!

Ez valami magasabb szintű beállítás lehet, mert az Excelben nem találok rá lehetőséget.

Üdv.

Előzmény: pimre (37441)
pimre Creative Commons License 2023.08.15 0 0 37441

Sziasztok, most egy idegen gépen dolgozom. Office 365. Amikor keresek és nem találja a megadott szöveget, akkor hangjelzést ad. Enélkül is rájövök, hogy nem találja:-). Hol tudom kikapcsolni ezt a funkciót?

Fferenc50 Creative Commons License 2023.08.15 0 0 37440

Szia!

1." halvány, nem aktív a „létrehozás, futtatás” gomb" Az első részben levő kódok mind függvények és nem eljárások! Ha megfigyeled, Function a kezdetük, zárójelek között a nekik szükséges paraméterek vannak. Ezek nem számolják meg a feltételes formázás által kiváltott színeket.

2. Count and sum conditionally formatted cells cím utáni részben viszont a feltételes formázás eredménye is megszámolható. Itt nem függvény van, hanem eljárás - ami Sub kezdetű és nincs utána paraméter. Használata a következő címben van megmutatva:

How to count and sum conditionally formatted cells using VBA macro egy cellát be kell színezni a keresett színnel, utána ki kell jelölni a megszámolni tervezett területet. Elindítani a makrót, megadni neki azt a cellát, amelyben a keresett szín van.

A Sub SumCountByConditionalFormat() makró a kitöltő színt vizsgálja. Ha a betűszin szerint szeretnél számolni, akkor az Interior -t mindenütt Font -ra kell cserélned benne.

Ha az eredményt cellába szeretnéd íratni, akkor az End Sub előtt End If elé ezt a sort írd be:

Range("F1").Value = cntRes & " Darab " & Left("000000", 6 - Len(Hex(indRefColor))) & Hex(indRefColor) & " színű cella összege: " & sumRes

Üdv.

Előzmény: Tibi8009 (37436)
Vax Creative Commons License 2023.08.15 0 0 37439

Próbáld ezen a linken Excellel megnyitni ezt a fájlt! Ez egy DropBox Public mappa, de zavaros elöttem a működése. Ez csak egy modell, de ha meglátod benne a fantáziát, ki lehet dolgozni egy óra alatt.

Előzmény: Andyyy42 (37430)
pimre Creative Commons License 2023.08.15 0 0 37438

Szívesen. Azért ha módosulnának az input adatok, mondjuk a második pont után is elmennek 9 fölé a "számok", akkor jelentkezz. Arra is van elképzelésem. Ott bevezetnék egy újabb segédoszlopot, amelyik az elsőnek az adatait nézi át hasonló módon, ugyanis további egymásba ágyazott függvények alkalmazása meglehetősen nehezen lenne áttekinthető.

Előzmény: Takeoff. (37435)
pimre Creative Commons License 2023.08.15 0 0 37437

Sajnos én eddig csak az általad a 37424 hozzászólásodban talált kód technikai kérdéseivel foglalkoztam: Miért adott hibajelzést elsőre, aztán miért nem működik az Alt + F8 az UDF függvény esetében.

A függvény érdemi részével egyáltalán nem foglalkoztam, és most nem is nagyon tudnék elmélyedni benne. Remélem, lesz itt, aki megnézi, és javítja a függvény használhatóságát.

 

 

Előzmény: Tibi8009 (37436)
Tibi8009 Creative Commons License 2023.08.15 0 0 37436

 

 Hát ez nagyon érdekes!:)

 Már majdnem jó, de sajnos mégsem.

 Működik, ha egy számsorban megváltoztatom a cellaszínt, azt tényleg megszámolja. De nekem arra kellene, hogy az ismétlődő értékeket feltételesen formázott cellákat (piros kitöltőszín, sötétvörös szöveggel) számolja meg, de ezt nem csinálja.

 Végigpróbáltam 1-10-ig a számokat a piros 3-as helyére, hátha a piros/sötétvörös különbség a hiba, de nem. Mintha az ismétlődő értékek formázást nem venné figyelembe.

 

 Keresgéltem máshol is és találtam egy oldalt, ahol leírnak lépésről-lépésre kezdőknek mindent ezzel a cellaszín számolással kapcsolatban, de ott meg a VBA kód futtatásánál akadok el, halvány, nem aktív a „létrehozás, futtatás” gomb. Bár nem tudom, az figyelembe venné-e az ismétlődő értékek formázott cellaszíneket.

 

https://www.ablebits.com/office-addins-blog/count-sum-by-color-excel/#insert-code

 

Előzmény: pimre (37434)
Takeoff. Creative Commons License 2023.08.15 0 0 37435

Köszönöm szépen, így már rend van! :)

Előzmény: pimre (37428)
pimre Creative Commons License 2023.08.15 0 0 37434

Amit te most használni akarsz, az nem Alt+F8-al indítható makró, hanem UDF, azaz User Defined Function, magyarul felhasználó által definiált függvény, egyszerűbben felhasználói függvény. És mivel függvény, ugyanúgy viselkedik, mint az Excel beépített függvényei. 

Ahogy az általad belinkelt példa írja, egy Excel munkafüzetben beírod a következőt:

 

=CountColor(B1:B11;IGAZ;3)

 

És itt megadod a vizsgált tartományt, aztán ha háttérszínt akarsz vizsgálni, akkor igaz, egyébként hamis, majd a vizsgált háttérszín kódját adod meg. A példában 3.

 

És ha ezeket beírtad, akkor végzi a dolgát.

 

Megjegyzés: Az ilyen függvényeket általában nem egy szokásos munkafüzetben használjuk, hanem saját függvénygyűjteményben, ami a háttérben van, de mindig elérhető. Egy úgynevezett Personal.xlsb munkafüzetben, ami egy erre a célra fenntartott helyen van, és a háttérben mindig rendelkezésre áll. De erről most elég ennyi. 

 

Még annyit, hogy az Alt + F8-al indítható makrók kezdősora nem Function(), hanem Sub(), de erről majd később, ha egyáltalán érdekes lesz. 

 

Előzmény: Tibi8009 (37432)
Delila10 Creative Commons License 2023.08.15 0 0 37433

Szia!

 

Természetesen Neked kell megadnod, hogy az Adat lap melyik celláját melyik sorba és oszlopba másolja a Nyomtatni lapon. Eszerint kell átalakítani a makrót.

Azt hittem, ezt megteszed.

 

Sub Korlevel()

    Dim sor As Integer, usor As Integer

 

    Sheets("Nyomtatni").Select

    usor = Sheets("Adat").Range("A" & Rows.Count).End(xlUp).Row

    For sor = 2 To usor

        Range("B2") = Sheets("Adat").Cells(sor, 1)

        Range("B4") = Sheets("Adat").Cells(sor, 2)

        Range("E4") = Sheets("Adat").Cells(sor, 3)

        Range("B10") = Sheets("Adat").Cells(sor, 4)

        Range("E10") = Sheets("Adat").Cells(sor, 5)

        Range("B13") = Sheets("Adat").Cells(sor, 6)

        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False

    Next

End Sub

Előzmény: Andyyy42 (37429)
Tibi8009 Creative Commons License 2023.08.15 0 0 37432

Köszönöm a segítséget!:)

 Már majdnem jó…

 Nagyon műkedvelő szinten foglalkozom az Excel-lel, hiányoznak az alapok, de azért már sok mindenre rájöttem. Itt viszont most megint elakadtam. Még soha nem használtam makrót. Ahogy megtudtam, azt úgy kell, hogy miután beillesztettem a kívánt VBA makrót(cellaszín) és visszatértem a munkafüzethez, nyomok egy Alt+F8-at, hogy elérjem a Makró párbeszédablakot. Itt kellene kiválasztani a kívánt makrónevet és elindítani, de nálam minden gomb halvány, nem lehet az Indítás-ra kattintani. Gondolom, valami beállítás hiányzik hozzá, de nem tudom, hol találom. Tudnál még ebben segíteni?

Előzmény: pimre (37425)
pimre Creative Commons License 2023.08.14 0 0 37431

"...így ránézésre nem biztos, hogy pontosan azt csinálja, amire én gondoltam." Valóban nem, tekintve, hogy Delila sem gondolatolvasó:-)

 

Most, hogy megadtan az űrlap elrendezését, már biztos meg lesz oldva a kérésed. Még egy olyan apróság lehet kérdés, hogy az összes nyomtatandó adat a mintádon középre pozicionált, a motortérfogat kivételével. Ez szándékos? Vagy nincs jelentősége?

Előzmény: Andyyy42 (37429)
Andyyy42 Creative Commons License 2023.08.14 0 0 37430

Szia Vax,

 

Köszi, alapvetően egy tervezett adatlap-ot nyomtatunk ki

Előzmény: Vax (37423)
Andyyy42 Creative Commons License 2023.08.14 0 0 37429

Szia Delila10,

 

Köszi, a hét második felében tudom majd kipróbálni, de így ránézésre nem biztos, hogy pontosan azt csinálja, amire én gondoltam.
Persze lehet nem voltam egyértelmű, illetve lehet hogy azt csinálja, mondom még kezdő vagyok nagyon VBA-ban.

 

De biztonság kedvéért teszek be példát. Az adatokat csak kitaláltam, de arra jó, hogy lássátok, mit szeretnék.

 

Adat fülön első ID a "202213", ezt bemásolva  a nyomtatni fül B2-es cellájába, betölti a hozzá tartozó adatokat, amit kinyomtatunk.
Aztán bemásoljuk az Adat fül ID - 202244-et, ami a soron következő, szintén a nyomtatni fül B2-es cellájába és bekeresi a hozzá tartozó adatokat, amit kinyomtatunk.
Aztán megyünk a következő ID-ra és így tovább, amíg van az Adat fül ID oszlopban (ez mindig változó, hogy éppen hány sor adat van)


Szóval ezt szeretném, hogy VBA menjen végig egyesével az összes ID-n, amíg van adat és mindene egyes ID betöltés után nyomtassa ki a nyomtatni oldalt.




Előzmény: Delila10 (37421)
pimre Creative Commons License 2023.08.14 0 0 37428

Szia, Excel függvényes megoldást nem tudok, mivel ezek nem számok, hanem stringek.

 

Egy segédoszloppal talán meg tudnád oldani. A C2 cellába írd be a következő képletet, és húzd végig lefelé, majd rendezd a táblázatot a c oszlop szerint:

 

=BAL(B2;3)&HA(HOSSZ(KÖZÉP(B2;4;4))=0;"";HA(HOSSZ(KÖZÉP(B2;4;4))=1;"0"&KÖZÉP(B2;4;1);HA(KÖZÉP(B2;5;1)=".";"0"&KÖZÉP(B2;4;3);KÖZÉP(B2;4;5))))

 

Ha valami nem stimmel, akkor megpróbálom javítani.

Előzmény: Takeoff. (37426)
Takeoff. Creative Commons License 2023.08.14 0 0 37427

Itt a kép is. 

Takeoff. Creative Commons License 2023.08.14 0 0 37426

Sziasztok!

Mi arra a megoldás, hogy egy adatbázisból kinyert és a bal oldalon felsorolt elemekből, egy a "Pos" oszlop szerint növekvő sorrendet kapjak. Ha egyszerű módban próbálom elrendezni, fura lesz az eredmény - jobb oldal - mert az A1.1 után az A1.10 jön ami logikus lehet, de nekem ott az A.2-nek kellene következnie. Tehát például az A1.7.1 és A1.7.2 ... az A1.7 altételei, tehát azoknak azt kell követniük jó sorrendben.  

 

        

pimre Creative Commons License 2023.08.13 0 0 37425

Szerintem csak az első sor tördelésébe keveredett egy hibás karakter, amitől kötelezően új sort kezd a colorcode As után. Próbáld meg erre cserélni:

 

 

Function CountColor(MyRange As Range, fontbackgr As Boolean, colorcode As Integer)

Előzmény: Tibi8009 (37424)
Tibi8009 Creative Commons License 2023.08.13 0 0 37424

 Szeretnék segítséget kérni.

 Excel 2007-ben kellene függvény, ami megszámolja B1:B11 tartományban a piros írószínű cellákat.

 Találtam egy hozzászólást erről a problémáról, hogy UDF-fel lehet, de valamiért nem működik. Ha a függvény beírása után Entert nyomok, azt írja:” Compile error: Expected: type name”.

 

„Ezt csak UDF-fel lehet megcsinálni:

Function CountColor(MyRange As Range, fontbackgr As Boolean, colorcode As
Integer)
Dim iCount As Long, i As Long
Application.Volatile
iCount = 0
For Each Cell In MyRange
If fontbackgr Then
If Cell.Font.ColorIndex = colorcode Then
iCount = iCount + 1
End If
Else
If Cell.Interior.ColorIndex = colorcode Then
iCount = iCount + 1
End If
End If
Next Cell
CountColor = iCount
End Function


Használata:
=CountColor(B1:B11;IGAZ;3)
range írószín: IGAZ
háttérszín:HAMIS
A harmadik paraméter a keresett színkód, a 3 pl. a piros.
Ez a példa tehát a B1:B11 tartományban számlálja meg a piros írószínű
cellákat.”

( https://microsoft.public.hu.office.narkive.com/M4y2HEbn/szines-cellak-osszeszamolasa-az-excelben)

 

 Működhet ez a megoldás, mit csinálhatok rosszul, hogyan kellene?

 Nekem pontosabban nem piros írószín kellene, hanem a kitöltés színe legyen piros, azt mennyiben kell máshogy megoldani?

Vax Creative Commons License 2023.08.12 0 0 37423

Erre van kész megoldás az Excelben. A kérdés az, hogy a Nyomatóoldal formájára nézve mennyi a valódi megkötés? Pl. ha egy nyomtatványt kell kitölteni, az nem egyszerű, de ha csak egy jól tervezett adatlap készül belőle, akkor az nem probléma.

Előzmény: Andyyy42 (37420)
Delila10 Creative Commons License 2023.08.12 0 0 37422

Ha van címsorod, a ciklust az első adatsortól (a kép szerinti 2-től) kell indítanod.

Előzmény: Andyyy42 (37420)
Delila10 Creative Commons License 2023.08.12 0 0 37421

Sub Korlevel()

    Dim sor As Integer, usor As Integer

   

    Sheets("Nyomtatni").Select

    usor = Sheets("Adat").Range("A" & Rows.Count).End(xlUp).Row

    For sor = 1 To usor

        Range("A1") = Sheets("Adat").Cells(sor, 1)

        Range("B3") = Sheets("Adat").Cells(sor, 2)

        Range("C7") = Sheets("Adat").Cells(sor, 3)

        Range("D3") = Sheets("Adat").Cells(sor, 4)

        Range("F7") = Sheets("Adat").Cells(sor, 5)

        Range("H6") = Sheets("Adat").Cells(sor, 6)

        Range("D10") = Sheets("Adat").Cells(sor, 7)

        ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False

    Next

End Sub

 

Előzmény: Andyyy42 (37420)
Andyyy42 Creative Commons License 2023.08.11 0 0 37420

Sziasztok,

 

Makrókat ismerem, makrófelvevővel. VBA-val most ismerkedem.

Lenne egy feladat :)

Van egy excel munkafüzet, két munkalappal
Az egyik munkalapon rendszerből lekért adatsor van, különböző adatokkal.
Ez a táblázat minden egyes lekérésnél módosul, attól függően, hogy milyen intervallumra kérjük le az adatokat.
Több oszlop van - minden oszlopban más jellegű adat.
Az egyes sorok, egy-egy ID-hoz tartoznak. 
A másik munkalapon van egy összeszerkesztett nyomtatási forma, amivel kinyomtatjuk az egyes ID-k jellemzőit.

A nyomtatatást úgy csináljuk, hogy az Adat fül első oszlop első ID-t átmásoljuk (CTRL+C / Ctrl + V) a nyomtatási fül megfelelő cellájába és akkor a nyomtatási lapon kitölti a megfelelő bekeresett adatokkal (az Adat fülről) és kinyomtatjuk azt az 1 oldalt.
aztán kimásoljuk  az Adat fül első oszlop második ID-t és bemásoljuk ismét a nyomtatási fül adott cellájába (ez fixen mindig ugyan az) és akkor betölti az ehhez az ID-hoz tartozó adatsort és kinyomtatjuk.
És így megyünk egyesével sorba az Adat fül első oszlopának celláin, addig amíg van benne adat és kinyomtatjuk egyesével.

 

Nekem kellene egy olyan VBA, amit aztán makro gombra tennék és onnan indulna, hogy autómatikusn betölti az első ID-t, kinyomtatja, aztán lép egyet tovább az ID oszlopban, betölti a másodikat, kinyomtatja, aztán ismét lép egyet a következő ID-ra és így tovább, mindig addig amíg van adat az ID oszlopban.

Szóval ne egyesével keljen adott esetben 50 különböző ID-t betölteni és kinyomtatni, hanem egy gombnyomással futtasa végig az excel egyesével és nyomtassa ki, addig amíg az Adat fül ID oszlopában van adat.

(ez az adatsor változik, van amikor 5 sor van, de van amikor 50)

 

Gondolom vmi ciklussal kell az utolsó adatig bekeresve.

Tudtok segíteni?

 

Köszi 

Garashan Creative Commons License 2023.08.09 0 0 37419

Feltételes formázással viszonylag könnyű megoldani:

Jelöld ki a D:H oszlopokat, majd csinálj egy új feltételes formázás szabályt, ahol "A formázandó cellák kijelölése képlettel" opciót válaszd.

A képlet a következő:

=ÉS(SZÁMÉRTÉK(D1;".")>=SZÁMÉRTÉK(FKERES($I1;$L:$N;2;HAMIS);".");SZÁMÉRTÉK(D1;".")<=SZÁMÉRTÉK(FKERES($I1;$L:$N;3;HAMIS);"."))

Formátumnak pedig megadod, amit te szeretnél.

A trükk annyi, hogy én ketté szedtem az intervallumokat, van nekik minimuma és maximuma, lásd a képernyő mentést.

Ha az intervallumokat nem lehet szétszedni, akkor itt van rá egy másik megoldás:

=ÉS(SZÁMÉRTÉK(D1;".")>=SZÁMÉRTÉK(BAL(FKERES($I1;$L:$N;2;HAMIS);SZÖVEG.KERES("-";FKERES($I1;$L:$N;2;HAMIS))-1);".");SZÁMÉRTÉK(D1;".")<=SZÁMÉRTÉK(KÖZÉP(FKERES($I1;$L:$N;2;HAMIS);SZÖVEG.KERES("-";FKERES($I1;$L:$N;2;HAMIS))+1;99);"."))

Előzmény: Electroman (37418)
Electroman Creative Commons License 2023.08.09 0 0 37418

A legalsó sor, amiben számok vannak a táblázatban, az alatti sorokat végig lefelé. (Ezek jelenleg a táblázaton kívül vannak.

Előzmény: Garashan (37417)
Garashan Creative Commons License 2023.08.09 0 0 37417

Pontosan melyik cellákat szeretnéd színezni?

Előzmény: Electroman (37416)
Electroman Creative Commons License 2023.08.09 0 0 37416

Sziasztok,

 

Szeretnék segítséget kérni egy feladat megoldásában.

 

Van egy táblázat. Mindegyik sorban adatok vannak.

Azt szeretném, hogy a 8. sorban, ahol lefelé folytatódna a táblázat, befüggvényezni, hogyha A vagy B terméket mérjük akkor <és egyenlő 1.48 és 1.50 egyenlő és < számok esetén pirosodjon a cella.

Viszont egyszerre kellene, hogy függvényezve legyen a C termék is, csak az <egyenlő 1.50 és 1.52 egyenlő és < értékekre pirosodjon be a cella.

 

Ezek a termékek (A B C) az I oszlopban vannak, tehát ha az I oszlopba beírjuk, hogy pl. C, akkor eszerint kellene, hogy működjön a következő sorban a cellák bepirulása. C-hez tartozó 1.50 - 1.52 tartományban.

Ha A vagy B van az I oszlopban akkor meg az 1.48 - 1.50 tartományban.

 

Lambada7512 Creative Commons License 2023.08.04 0 0 37415

Azt hol és hogyan kell futtatni?

 

Köszönöm, maradok pimre megoldásánál.;)

Előzmény: Törölt nick (37413)
Lambada7512 Creative Commons License 2023.08.04 0 0 37414

Köszönöm!

Előzmény: pimre (37412)
Törölt nick Creative Commons License 2023.08.04 0 0 37413

Futtasd ezt a VBA parancsot:

 

Range("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

 

Ez eltünteti az üres sorokat. (Pontosabban azokat a sorokat, ahol az A oszlopban nincs érték.)

Utána csinálhatod azt, amit eredetileg terveztél.

Előzmény: Lambada7512 (37410)
pimre Creative Commons License 2023.08.04 0 1 37412

Ha 3-4 lépésből megfelel, akkor a következő a megoldás:

 

1. A segédoszlop 1. sorába beírsz valamit. Aztán Shift + Ctrl + End kijelöli a teljes táblázatot. Aztán Shift + balra nyíllal visszalépkedsz, hogy csak a segédoszlop legyen kijelölve. 

 

2. Ctrl + D megnyomása a teljes segédoszlopba bemásolja az első sorba írt adatot.

 

3. Innentől már működik a Garashan által a 37405-ben javasolt megoldás a teljes táblázatra, közte az üres sorokra is.

Előzmény: Lambada7512 (37404)
Fferenc50 Creative Commons License 2023.08.04 0 0 37411

Szia!

Szerintem többszörös szűrő alkalmazással talán egyszerűbb:

Először kiszűrni az üres cellákat - ide hozzá lehet venni még a számokat is ha kevés van belőle.

A kiszűrt sorokat kijelölni és törölni.

Ezután a maradékot szűrni  egyéni szűrővel, nagyobb mint 0-ra. Ezeket a sorokat is törölni.

A szűrőből még látható a maradékban levő kritikus - nem szükséges érték, azokat is ki lehet jelölni és törölni.

Persze a számoknál fontos, hogy valóban számok legyenek, pl. az első példád ugye nem kellene, de egyik feltétel sem szűri ki (legalábbi nálam szöveg lett a másoláskor).

Egyéni szűrővel elég sok variáció lehet. Pl. Nem tartalmaz * feltétel az üres és a számot tartalmazó cellákat egyaránt mutatja. A tartalmaz * feltétel a szöveget tartalmazó cellákat szűri ki.  (* = csillag karakter.)

Mutatja v. kiszűri = a szűrés eredményeként látható.

Üdv.

Előzmény: Lambada7512 (37410)
Lambada7512 Creative Commons License 2023.08.04 0 0 37410

Hát, próbáltam egyértelműen írni, de azért csak sikerült félreérteni.;)

 

Ilyenek vannak:

 

0:13-24

fekete

 

189/4

kerekes kocsi

 

739:4

12 valami

 

 

 

Erre kellett megoldás, hogy csak azok a sorok kerüljenek ki szövegfájlba, ahol szöveg van, az üres sorok és a számok az egyéb írásjelekkel nem. Problémá, hogy néha a szöveges sorok is sámmal kezdődnek.

 

Erre jött a megoldás, amit legelőször írtam, sorbarendezés után törlés, majd a segédoszlop alapján a sorrend visszaállítása és mehetett a szövegfájlba mentés már segédoszlop nélkül.

 

 

Fferenc50 Creative Commons License 2023.08.04 0 0 37409

Szia!

Mutatnál egy rövid példát, mert számomra értelmezhetetlen, hogyan kerülhet egy sorszámozott táblázatba üres sor, illetve mi legyen az üres sorokhoz tartoz(and)ó sorszámmal. Előtte-utánna helyzet lenne jó. 

Üdv.

Előzmény: Lambada7512 (37406)
pimre Creative Commons License 2023.08.04 0 0 37408

Van olyan technika is, hogy egy segédoszlopban összegezzük az egyes sorokban lévő nem üres cellák számát, és a 0 összegűeket töröljük.

Most nem vagyok gépközelben, ezért nem tudok példát írni.

Előzmény: Garashan (37407)
Garashan Creative Commons License 2023.08.04 0 0 37407

Akkor szerintem makróval lehetne a leggyorsabbá tenni a dolgot. Ha estig nem ír valaki használható megoldást, akkor ha gép előtt leszek kreálok hozzá egy makrót.

Van olyan oszlop amiben minden sorban van adat, kivéve az üres sorokat?

Előzmény: Lambada7512 (37406)
Lambada7512 Creative Commons License 2023.08.04 0 0 37406

De vannak, sőt pont azért kell ez a hókusz-pókusz, hogy az üres sorokat gyorsan törölni lehessen.

 

Előzmény: Garashan (37405)
Garashan Creative Commons License 2023.08.04 0 0 37405

Kijelölöd az első két cellát, amibe beírtad a sorszámokat, majd a jobb alsó sarokba dupla klikk. Ha nincsenek üres sorok, akkor az utolsó sorig lehúzza a sorszámokat.

Előzmény: Lambada7512 (37404)
Lambada7512 Creative Commons License 2023.08.04 0 0 37404

Sorszámozásra keresek egy gyors módszert, mert sokezer soros táblázatoknál már sokáig tart a hagyományos lehúzásos megoldás.

 

(táblázat elé üres oszlop beszúrása, első két cellába 1 ill 2 szám beírása, majd egérrel a pluszjel lehúzva a táblázat aljáig - illetve valamennyivel tovább, és a felesleges sorok törölve)

 

Eredő Vektor Creative Commons License 2023.08.02 0 0 37403

bocsi:) nem olvastam kellőképpen vissza.

Előzmény: hellsing (37397)
Eredő Vektor Creative Commons License 2023.08.02 0 0 37402

a nullák láthatósága beállítható a beállításoknál

https://support.microsoft.com/en-gb/office/display-or-hide-zero-values-3ec7a433-46b8-4516-8085-a00e9e476b03

 

szerintem ez kell neked

Előzmény: hellsing (37389)
Delila10 Creative Commons License 2023.08.01 0 0 37401

Kimaradt egy nyitó zárójel.

 

=ha(vagy(xkeres(...)="";xkeres(...)=0);"";xkeres(...))

Előzmény: Delila10 (37400)
Delila10 Creative Commons License 2023.08.01 0 0 37400

=ha(vagy(xkeres...)="";xkeres(...)=0);"";xkeres(...))

Előzmény: hellsing (37389)
Fferenc50 Creative Commons License 2023.08.01 0 0 37399

Szia!

Az előző bejegyzésedre: nyilván rengeteg olyan eset van, amikor látni kell a 0 eredményt, erre nem megoldás a 0 kikapcsolása.... :(

Csak egy másik ötlet: duplikálni a lapot, a duplikációt elrejteni, a képlet pedig hivatkozhat a rejtett lapra. Képletet módosítás ellen levédeni, sőt el is lehet rejteni a beállításokban (nem a betűszínre gondoltam most) - cellaformázás - védelem - rejtett, az érvényesítéshez be kell kapcsolni a lapvédelmet. 

Üdv.

Előzmény: hellsing (37398)
hellsing Creative Commons License 2023.08.01 0 0 37398

Köszönöm, sajnos az a gond, hogy az értéktömböt is látják humanoidok, így nem rakhatom tele hibakódokkal. De ötletnek, rejtett lapokra tök jó!

Előzmény: Fferenc50 (37392)
hellsing Creative Commons License 2023.08.01 0 1 37397

Köszönöm! Az első megoldás (nulla megjelenítésének kikapcsolása a Beállításokban) tök jónak tűnt, amíg ki nem derült, hogy nem csak a keresőfüggvényekre hat, hanem mindenre (pl. SZUM). De meglesz az.

Előzmény: Garashan (37391)
Fferenc50 Creative Commons License 2023.08.01 0 0 37396

Ez igaz, csak a kérdező ezt (HA függvény) alkalmazta, így semmi új nem volt számára a "hivatalos" megoldásban szerintem.

 

Előzmény: Garashan (37395)
Garashan Creative Commons License 2023.08.01 0 0 37395

Igen az MS által javasolt megoldások nem túl elegánsak...

De telefonról nem szerettem volna annyit gépelni, így egyszerűbbnek láttam belinkelni a "hivatalos" megoldást a problémára.

Előzmény: Fferenc50 (37393)
Fferenc50 Creative Commons License 2023.08.01 0 0 37394

A betűszín megválasztásával a "hibás érték láthatatlanná" is tehető az adott cellában. Sőt feltételes formázással is beállítható ez.

Előzmény: Fferenc50 (37392)
Fferenc50 Creative Commons License 2023.08.01 0 0 37393

Szia!
Úgy mellékesen szerintem MS igazán megoldhatta volna már az elmúlt évtizedek alatt, hogy a beépített Excel függvényei meg tudják különböztetni az üres cellát a 0 tartalmú cellától. Nem hiszem, hogy olyan nagy fejlesztést igényelt volna, így meg a szerencsétlen felhasználó küzdhet vele minden alkalommal. (Nem igazán elegáns, sőt bosszantó a HA függvény ajánlgatása....)

Üdv.

Előzmény: Garashan (37391)
Fferenc50 Creative Commons License 2023.08.01 0 0 37392

Szia!

Ez volt a helyzet a HAHIBA függvény bevezetése előtt minden hibás eredmény "eltüntetése" érdekében, most legalább van már ez a függvény.

Egy szintén nem igazán elegáns megoldás, de a HAHIBA függvény alkalmazását lehetővé teszi, ha az üres cellákat feltöltöd hibás művelettel, pl. =1/0 képletekkel, amit aztán át is alakíthatsz értékké. Ha később mégis kerül oda érték, akkor simán átírható és a képlet működni fog továbbra is.

Üdv.

Előzmény: hellsing (37389)
Garashan Creative Commons License 2023.08.01 0 0 37391
Előzmény: hellsing (37389)
hellsing Creative Commons License 2023.08.01 0 0 37390

...DE hogynézmárki :))

Előzmény: hellsing (37389)
hellsing Creative Commons License 2023.08.01 0 0 37389

'reggelt! Hogy lehet elérni, hogy az XKERES ne nullát adjon vissza, ha a keresési tömbben megvan a keresett adat, de a visszaadandó tömb aktuális mezője üres? Üres mezőre lenne szükségem. A képlet a G5-ben:

 

=XKERES("I2";Staff[ID];Staff[Spec.];"";0;1)

 

A hibakezelők (szerintem) nem alkalmazhatók, mert nincs hiba, a keresett adat megvan. Így kezelni tudom, hogy hogynézmárki? :)

=HA(XKERES("I2";Staff[ID];Staff[Spec.];"";0;1)=0;"";XKERES("I2";Staff[ID];Staff[Spec.];"";0;1))

 

Delila10 Creative Commons License 2023.07.27 0 0 37388

Örülünk.

Jó munkát!

Előzmény: Fatales (37387)
Fatales Creative Commons License 2023.07.27 0 0 37387

Köszönöm!

Tökéletes lett!   :)

További szép napot mindenkinek!  :)

Előzmény: Delila10 (37386)
Delila10 Creative Commons License 2023.07.27 0 0 37386

Most az első kigyűjtés a BI2-től lesz, a következő BI3-tól, és így tovább.

Előzmény: Delila10 (37385)
Delila10 Creative Commons License 2023.07.27 0 0 37385

Most az első kigyűjtés a BH2-től lesz, a következő BH3-tól, és így tovább.

 

Sub Egysorba()

    Dim usor As Integer

 

    Sheets("Munka2").Select

    usor = Range("BI" & Rows.Count).End(xlUp).Row + 1

   

    Selection.Copy Range("BB1")

    Range("BC1:BC20").Cut Destination:=Range("BH1")

    Range("BD1:BD20").Cut Destination:=Range("BH21")

    Range("BE1:BE20").Cut Destination:=Range("BH41")

    Range("BF1:BF20").Cut Destination:=Range("BH61")

 

    With ActiveWorkbook.Worksheets("Munka2").Sort

        .SortFields.Clear

        .SortFields.Add Key:=Range("BH1:BH100"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

        .SetRange Range("BH1:BH100")

        .Header = xlNo

        .MatchCase = False

        .Orientation = xlTopToBottom

        .SortMethod = xlPinYin

        .Apply

    End With

 

    ActiveSheet.Range("$BH$1:$BH$100").RemoveDuplicates Columns:=1

    Range("BH1:BH100").Copy

    Range("BI" & usor).PasteSpecial xlPasteValues, Transpose:=True

    Application.CutCopyMode = False

    Columns("BB:BH").ClearContents

End Sub

Előzmény: Fatales (37384)
Fatales Creative Commons License 2023.07.27 0 0 37384

Szerbusztok.

A makró amit kaptam tőletek teszi a dolgát jól.  :)


A kérdésem/kérésem az lenne.
-
1=Kijelölöm a 20 sort és az 5 (A.B.C.D.E.) oszlopot
2=A makrót indítom.
3=A BB1 sorba elkészíti a feladatát.
-
A következő kijelölés és makró indításával felülírja a BB1 sort és teszi a dolgát.( ezt tudja most a makró )
-
A többi makró indításkor kellene vele megoldatni hogy .....
1. kijelölés és makró indítás BB1 sorba írja ( ezt tudja most a makró )
2. kijelölés és makró indítás BB2 sorba kellene iratni az eredményt ( ezt még nem tudja )
3. kijelölés és makró indítás BB3 sorba kellene iratni az eredményt ( ezt még nem tudja )
4. stb....
-
Ezzel a módosítással teljesen ki lenne maxolva ez a makró amire nekem kell.
Az esetleges segítséget előre is köszönöm.

Előzmény: Delila10 (37353)
Fatales Creative Commons License 2023.07.26 0 0 37383

Ott a pont a dolog végén. :)

Ez a megoldás.

Köszönet mindenkinek és " tudja ki " kinek :)

-

Előzmény: Fferenc50 (37382)
Fferenc50 Creative Commons License 2023.07.26 0 0 37382

Szia!

A .SetRange sor elé írd be a következőket:

.SortFields.Clear

.SortFields.Add Key:=Range("BB1:BB100"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

Ez adja meg a Sort számára szükséges rendezési paramétereket.

Üdv.

 

Előzmény: Fatales (37379)
Fatales Creative Commons License 2023.07.26 0 0 37381

-

Előzmény: Fatales (37380)
Fatales Creative Commons License 2023.07.26 0 0 37380

A Munka2-t lecseréltem erre.

With ActiveWorkbook.ActiveSheet.Sort

-

BB1-től sorba kirakja a számokat de akkor sem rakja nagyság szerint.  :(

A duplákat levadássza, hibát nem dob.

-

-

Előzmény: Fatales (37379)
Fatales Creative Commons License 2023.07.26 0 0 37379

Bocsánat most már vagyok.

Ezt elkavartam rendesen.

Átneveztem Munka2-re .BB1-től sorba kirakja a számokat de akkor sem rakja sorba.  :(

A duplákat levadássza.

Most viszont hibát nem dob.

-

Előzmény: Delila10 (37376)
Fferenc50 Creative Commons License 2023.07.26 0 0 37378

Hiányzik a Sort-ot tartalmazó sor, mivel a Sort paramétereit állítanák be a következő, ponttal kezdődő sorok.

Valószínűleg véletlenül lett kitörölve.

Előzmény: Fferenc50 (37377)
Fferenc50 Creative Commons License 2023.07.26 0 0 37377

Nagyobb baj szerintem - és erre utal a hibaüzenet is - , hogy nincs With -et tartalmazó sor, ebben a kifotózott részben biztosan nincs.

Üdv.

Előzmény: Delila10 (37376)
Delila10 Creative Commons License 2023.07.26 0 0 37376

Garashan jól írja. A képen közölt részleten kétszer szerepel az End With, pedig nem kellene.

Előzmény: Fatales (37373)
Garashan Creative Commons License 2023.07.26 0 0 37375

Mintha a sorok össze lennének keveredve.

Előzmény: Fatales (37373)
Delila10 Creative Commons License 2023.07.26 0 0 37374

Kijelölted a 20 sort és 5 oszlopot a makró indítása előtt?

Előzmény: Fatales (37373)
Fatales Creative Commons License 2023.07.26 0 0 37373

With ActiveWorkbook.ActiveSheet.Sort
Hibát dob--fotó mellékelve.
-------------------------------------
"..a Munka1 szöveget írd át a munkalap nevére..."
Átírtam "Munka2" a lapom. Hibát dob--fotó mellékelve.

-

Előzmény: Garashan (37372)
Garashan Creative Commons License 2023.07.26 0 0 37372

Szerintem neked ezzel a sorral lesz bajod, mert nem Munka1 a lap neve.

With ActiveWorkbook.Worksheets("Munka1").Sort

 

Most nem vagyok gépközelben, de szerintem így menni kell, ha lecseréled erre:

With ActiveWorkbook.ActiveSheet.Sort

 

Ha mégsem, akkor a Munka1 szöveget írd át a munkalap nevére.

Előzmény: Fatales (37371)
Fatales Creative Commons License 2023.07.26 0 0 37371

Szerbusz.
Köszönöm a makrós megoldásod.Teszi a dolgát és " duplikál" is serényen :)
Egy kis hiba van azonban.
" BB1-től írja emelkedő sorrendbe a számokat." --- nem teszi sajnos :(
Rendezetlenül írja a sort, nem veszi figyelembe az emelkedő számsorrendet.
-
Köszönöm a segítségedet előre is.

Előzmény: Delila10 (37353)
Garashan Creative Commons License 2023.07.25 0 0 37370

Ha összetettebb megoldást szeretnél, akkor makrót kell írni.

Vagy szintén feltételes formázással szöveg.keres függvényt kell használni. Akkor a részeredményeket is színezi. Pl. alma kereső szóra az almafa szót. Míg Delila10 megoldása csak a pontos találatokat színezi.

Előzmény: Agko (37369)
Agko Creative Commons License 2023.07.25 0 0 37369

Nagyon köszönöm a fáradozást, ki fogom próbálni. Hálás köszönet még egyszer!

 

Előzmény: Delila10 (37361)
hellsing Creative Commons License 2023.07.25 0 0 37368

A megyék kikeresése szerintem egy egyszerű FKERES (VLOOKUP), pl.: =FKERES(2100;C:E;3;HAMIS), ami visszaadja a 2100-ra (Gödöllőre), hogy Pest. Ha viszont régiót is szeretnél, akkor a neveiket vagy minden megye mellé oda kell írnod egy plusz oszlopba, aztán ugyanúgy FKERES, vagy egy másik munkalapra/táblázatba bemásolni a 19+1 megyét, mellé a régiót és ezen a táblázaton FKERESs. Az utóbbinak az az előnye, hogy csak egy helyen kell javítani, ha hibás.

 

A keresésnél ügyelj arra, hogy ne keress településnév szerint, mert több olyan település is van (nem csak Bp.), amelyiknek több irányítószáma van.

Előzmény: czuni09 (37367)
czuni09 Creative Commons License 2023.07.25 0 0 37367

Köszönöm ezt beimportáltam és tovább? :) 
Sajnos nem megy. Irányítószám megvan és a település név. A megyét kellene mellé írni egy oszlopba. A régiókra gondoltam Pest, Közép-dunántúl stb...

Előzmény: Delila10 (37365)
tekeoff Creative Commons License 2023.07.25 0 0 37366

Köszönöm!

Előzmény: Delila10 (37363)
Delila10 Creative Commons License 2023.07.25 0 0 37365

Találtam egyet: 

Ebből már Index-Hol.van párossal a helység mellé meg tudod adni az irányítószámot és a megyét.

Az országos régión nem tudom, mit értesz, de egy új oszlopba beírhatsz hozzá adatokat.

Előzmény: czuni09 (37364)
czuni09 Creative Commons License 2023.07.25 0 0 37364

Sziasztok!
Tudna esetleg nekem abban segíteni valaki hogyan lehetne iárnyítószám/ település név mellé megyét párosítani és utána országos régiókra bontani? Valami külső adatbázisból importálni esetleg. A TikTokon láttam néha egy-két ilyen videót de nem találom. A válaszokat előre is köszönöm.

Delila10 Creative Commons License 2023.07.25 0 0 37363

Úgy rémlik, nemrég hasonló kérdés volt.

Előzmény: tekeoff (37362)
tekeoff Creative Commons License 2023.07.25 0 0 37362

Sziasztok!

 

Van 4 oszlop (5000 sor) és ebben szeretném megkeresni azokat a sorokat amik ugyanazt tartalmazzák, azaz duplikáltak és elég belőlük egy is. Az erre szolgáló "Ismétlődések eltávolítása" meg is oldaná a problémát, de én szeretném látni hogy melyek voltak azok a sorok, de a parancs rögtön törli és csak azt mutatja meg hányt törölt.

Van erre megoldás?  

Delila10 Creative Commons License 2023.07.25 0 0 37361

Kitaláltam egy megoldást.

 

A G1 cellába írod a keresendő szöveget, vagy számot.

Kijelölöd a területet, ahol színezni akarod a keresett cellá(ka)t. Legyen ez pl. az A1:C20 tartomány. A feltételes formázásnál A formázandó cellák kijelölése képlettel opciót választod, majd az Értékek formázása, ha a képlet igaz rovatba beírod: =A1=$G$1, a Formátumnál megadod a kedvenc formátumodat.

Marad a kijelölés, új formátumnál a képlet =A1<>$G$1, ennél ne legyen formátum megadva.

 

Ezzel a megoldással a keresendő cellák színeződnek, új keresésnél az eredeti formátumot veszik fel az előzőkben kiválasztott cellák.

Előzmény: Agko (37360)
Agko Creative Commons License 2023.07.24 0 0 37360

Köszönöm a tanácsot, de lehet, hogy én nem írtam le jól amit szeretnek. Szóval, ha keresek az excel-ben, természetesen az eredményre ugrik, fókuszál, de a szememnek jó lenne, ha a keresett eredmény sorát, kiemelné egy adott színnel. A sorban több adat van, alatta fölötte több szám,

Köszönöm! És még az is lehet, hogy nem teljesen értem amit írtál! :)

Előzmény: Delila10 (37359)
Delila10 Creative Commons License 2023.07.24 0 0 37359

Keresésnél (Ctrl+F) a talált értékre ugrik a fókusz, rögtön kiszínezheted.

Ha listába kéred a keresést, a lista tagjait egyenként kijelölve szintén a keresett szöveg cellája lesz kijelölve, színezhetsz kedvedre.

Előzmény: Agko (37358)
Agko Creative Commons License 2023.07.24 0 0 37358

Sziasztok! Tudna nekem valaki abban segíteni, hogy az Excel-ben, ha keresek, a keresett eredményt kijelölje mondjuk egy általam kiválasztott színnel? Kutools-t használtam már, de ha van más alternatíva, akkor nem fizetnék elő, csak ezért az egy funkcióért! Köszönöm!

MZ/Y Creative Commons License 2023.07.24 0 0 37357

A szép magyar nyelv. :) Valószínűleg nála a többlépcsős volt a kulcsszó, nálad a makró, innen lett a félreértés.

Előzmény: pimre (37356)
pimre Creative Commons License 2023.07.23 0 1 37356

 

"Így csináltam eddig ezt szeretném gyorsítani." Ez érthető, és ha nem írtad volna oda a végére ezt: "A többlépcsős makró használatot kellene kiváltani.", akkor én is makrót írtam volna.

Előzmény: Fatales (37354)
MZ/Y Creative Commons License 2023.07.23 0 1 37355

Pontosítanám magam, mert félreérthető volt:

Nem "értsétek", hanem "tudjátok", mi történt. A kis "kód" tökéletesen működik, nem tűnnek el adatok, a másolás miatt tűnt úgy.

 

Ma ezzel játszottam, hogy kollégáknak csak pár másolat kelljen csinálni, szerintem elértem a minimumot. Közben nézegettem a fel nem ismerhető sorok (rekordok) kezdő elemét, nem sikerült megfejtenem. Hogy ezt ki és milyen megfontolásból generálja ilyennek, elképzelésem sincs. Nem is olyan kevés, kb. a sorok ötöde ilyen, de már az nagy segítség a munkában (időben pláne), hogy a 80 %-ot sikerül felismerni.

Előzmény: MZ/Y (37346)
Fatales Creative Commons License 2023.07.23 0 0 37354

Köszönöm mindenkinek hogy a Vasárnapjából áldozott erre a dologra.
Külön köszönöm az érdemi hozzászólásokat.
Elnézést ha félreérthető voltam valamiben.
-
pimre
Így csináltam eddig ezt szeretném gyorsítani.
-
Delila10
Ez a segítség több mint reméltem. Külön köszönet a makrós megoldásodnak. :)

Delila10 Creative Commons License 2023.07.23 0 1 37353

Egy makrós megoldás. Kijelölöd a tartomány, indítod a makrót. BB1-től írja emelkedő sorrendbe a számokat, mindegyikből 1-et.

 

Sub Egysorba()

    Selection.Copy Range("BB1")

    Range("BC1:BC20").Cut Destination:=Range("BB21")

    Range("BD1:BD20").Cut Destination:=Range("BB41")

    Range("BE1:BE20").Cut Destination:=Range("BB61")

    Range("BF1:BF20").Cut Destination:=Range("BB81")

   

    With ActiveWorkbook.Worksheets("Munka1").Sort

        .SetRange Range("BB1:BB100")

        .Header = xlNo

        .MatchCase = False

        .Orientation = xlTopToBottom

        .SortMethod = xlPinYin

        .Apply

    End With

    ActiveSheet.Range("$BB$1:$BB$100").RemoveDuplicates Columns:=1

   

    Range("BB1:BB100").Copy

    Range("BC1").PasteSpecial Paste:=xlAll, Transpose:=True

    Application.CutCopyMode = False

    Columns("BB:BB").Delete Shift:=xlToLeft

End Sub

Előzmény: Fatales (37347)
Garashan Creative Commons License 2023.07.23 0 0 37352

Ettől nem lettem okosabb.

Ha kézzel szeretnéd csinálni akkor ott van pimre megoldása. Ha pedig gyorsan akarod mindig, akkor lehet rá makrót írni. De az eredeti hozzászólásból úgy jött le, hogy nem szeretnél makrót.

Előzmény: Fatales (37351)
Fatales Creative Commons License 2023.07.23 0 0 37351

"...1. Az első lépésre nem tudok egyszerűbb megoldást, mint az 5 oszlopot egy új oszlopba bemásolni egymás alá...."

Előzmény: Garashan (37350)
Garashan Creative Commons License 2023.07.23 0 0 37350

Ha ezt műveled, akkor csak makróval lehet gyorsítani rajta ;-)

Előzmény: Fatales (37349)
Fatales Creative Commons License 2023.07.23 0 0 37349

Ezt "művelem" én is.   :(

Ezt kellene 1szerűsiteni.

Köszönöm a segítségedet.

Előzmény: pimre (37348)
pimre Creative Commons License 2023.07.23 0 0 37348

Szia,

1. Az első lépésre nem tudok egyszerűbb megoldást, mint az 5 oszlopot egy új oszlopba bemásolni egymás alá.

2. Az adatok menüben rendezés a legkisebbtől a legnagyobbig

3. Ugyanitt az ismétlődő értékek eltávolítása

4. A kapott adatok vízszinteressé transzponálása

 

 

Előzmény: Fatales (37347)
Fatales Creative Commons License 2023.07.23 0 0 37347

Szerbusztok.
Kérdezni/kérni szeretnék.
-
Adott egy tetszőleges kiragadott számokból álló számhalmaz.
Mindig 5 oszlop (A,B,C,D,E)és 20 sor a kiragadott vizsgálandó számhalmaz.
Összesen 100 db. szám amiben sok a szám ismétlődés.
-
Kérdésem.
Hogyan tudom az 5x20-as számhalmazt 1 sorba rendezni.
Növekvő számsorrendben az ismétlődő számokat kiszűrve/elhagyva.
A többlépcsős makró használatot kellene kiváltani.
-
Köszönöm.

-

MZ/Y Creative Commons License 2023.07.22 0 0 37346

Csak hogy kerek legyen a történet, és értsétek mi történt: de.

 

Ha a D oszlopba másoltam a függvény értékét, random hosszúságnál levágta (legalábbis szemre, de lehet x karakternél, csak a különböző betűszélességek miatt tűnik így), ha egy másik sheet A oszlopába, ott meg megvan.

 

A kérdésednél azt hittem, arra gondolsz, hogy a képernyőn nem húzom elég szélesre az oszlopot.

 

Úgyhogy elvileg minden szép és jó - csak kiderült, hogy néhány új sort nem /abc/ kezdettel jelöl, teljesen mással indul (nincs / sincs), úgyhogy a sorok mondjuk 5 %-át nem tudom kinyerni, de azt már letojom.

Előzmény: MZ/Y (37331)
MZ/Y Creative Commons License 2023.07.21 -1 0 37345

Kösz mindenkinek, majd kipróbáljuk.

 

De hogy ez az elválasztójel-különbség mekkora f.szság.. Jó, tizedes vesző-pont különbözik, mert az helyesírás kérdése, na de a paraméterek elválasztása... Ez döntés kérdése, "legyen vessző minden nyelven", és kész.

Fferenc50 Creative Commons License 2023.07.21 0 1 37344

Szia!

Akkor az én ismereteim voltak korlátosak. Igaz, idegen nyelvű Excellel nem volt "szerencsém" találkozni.

Köszi az információkat.

Üdv.

Előzmény: Garashan (37341)
Garashan Creative Commons License 2023.07.21 0 0 37343

Közben meg is lett a beállítás:

Klasszikus vezérlőpult --> Dátum is idő --> Dátum és idő módosítása --> Naptárbeállítások módosítása --> További beállítások

Itt a "lista elválasztó" választja el a függvényeket.

Előzmény: Garashan (37342)
Garashan Creative Commons License 2023.07.21 0 0 37342

Most tudtam értelmezni amit írtál. Szóval a függvény nevek angolok, de az elválasztó jel marad pontosvessző és minden működik szépen.

Ha jól emlékszem, akkor területi beállítás függvénye a vessző-pontosvessző és a számoknál a pont-vessző kérdés is.

Előzmény: Garashan (37341)
Garashan Creative Commons License 2023.07.21 0 0 37341

Legjobb tudomásom szerint igen. Bár ennek némileg ellentmond pimre tapasztalata.

Én nem egyszer nyitottam már meg angol nyelven szerkesztett Excel munkafüzetet, minden esetben minden jól működött nekem. Olyannyira biztos, hogy nem magyar nyelven szerkesztették eredetileg, mint hogy kék az ég. Külföldi fórumról származott, ahol nem is beszéltek magyarul.

Az is látszódik, hogy az xlsx fájlon belül az adott munkalap xml fájlján belül már vessző az elválasztó karakter és nem pontosvessző.

 

@pimre: Engem eddig nem foglalkoztatott az Office nyelvének a módosítása. Ha hamarabb váltasz nyelvet, minthogy megnyitnád a fájlt, akkor is hibásak a függvények?

Előzmény: Fferenc50 (37340)
Fferenc50 Creative Commons License 2023.07.21 0 0 37340

Szia!

Angol nyelvi környezetben - nem csak az Excel nyelvét átállítva - akkor ezek szerint az elválasztó jeleket is megfelelően tudja alkalmazni?

Üdv.

Előzmény: Garashan (37337)
Fferenc50 Creative Commons License 2023.07.21 0 0 37339

Szia!

Csak azok a paraméter elválasztó jelek ne lennének.....

Egyébként rémlik nekem olyan példa is már valahonnan, ahol a magyar Excelben is vessző az elválasztójel. Nem tudom, nem emlékszem hol láttam. Jó lenne, ha valaki esetleg tudna valamit mondani azzal kapcsolatban, hogyan lehet ilyet beállítani.

Üdv.

Előzmény: pimre (37338)
pimre Creative Commons License 2023.07.21 0 0 37338

Sőt továbbmegyek. Ha a nyelvet átállítom, akkor ugyanazt a fájlt megnyitva a függvények a választott nyelven jelennek meg.

 

Magyarul:

 

 

Átállítva angolra az Office nyelvét:

 

 

Csak az a furcsa, hogy az elválasztójeleket meghagyja pontosvesszőnek. És ebből következően a vesszőt nem is fogadja el.

Előzmény: Garashan (37337)
Garashan Creative Commons License 2023.07.21 0 0 37337

Szia!

Én annyit pontosítanék a leírtakon: amilyen nyelvű az adott Excel olyan nyelven kell a függvényeket megadni neki, de ő ezt minden esetben angolul tárolja el.

Látszik a két képernyő mentés összevágásánál is, hogy én a magyar Excelemben magyarul írtam meg a függvényt és ha "megnyitottam szövegszerkesztővel", akkor ott már angolul látszódik a függvény. Így ilyen szempontból mindegy, hogy eredetileg milyen nyelven írodott az Excel tábla és hogy a későbbiekben milyen nyelvű Excellel lesz az megnyitva, mindig az adott nyelven fognak a függvények megjelenni.

Előzmény: Fferenc50 (37336)
Fferenc50 Creative Commons License 2023.07.21 0 0 37336

Szia!

A magyarban magyar, az angolban angol függvény neveket kell használni :(  (és mások a paraméter határolók is) , sajnos nincs kétnyelvű Excel, legalábbis én így tudom.

Nálad nem fogja "megenni" az angol függvényneveket.

Makróval lehet megoldani, ha makróval írod be a képleteket, akkor az international szabvány szerint angol függvényneveket, elválasztót kell használni a Range.Formula paramétereként. Viszont ezt az Excel a saját verziójának megfelelően fogja megjeleníteni a cellákban.

A makrót beleteheted a sablonfájlba és új munkafüzet nyitásakor egyszer le kell futtatni - ez mehet automatikusan is.

Ha ez a lehetőség működik nálatok akkor mintát tudok mutatni.

Üdv.

Előzmény: MZ/Y (37335)
MZ/Y Creative Commons License 2023.07.21 0 0 37335

Persze, nem csak nem látszott, nem volt ott.

 

De megoldódott, kiszedtem  a nekem amúgy sem kellő részt (annyi, hogy én oda vesszőt írtam, de nem hiszem, hogy az kavart be, mindegy, mit szúrnék be szerintem), és így már tökéletes. Köszönöm ismét.

 

A tegnap félre tett kérdésem:

Én magyar Excelt használok, más angolt. Ott is működik a jobb, bal... függvény? Vagy angolosítsam nálam, és az működik mindkettőben?

Előzmény: Fferenc50 (37332)
MZ/Y Creative Commons License 2023.07.21 0 0 37334

Nem, csak a végén. De már a múlt. :) 

Előzmény: pimre (37333)
pimre Creative Commons License 2023.07.21 0 0 37333

És a gh? gbb sorral mi történik? Ott nem zavarja a kérdőjel?

Előzmény: MZ/Y (37327)
Fferenc50 Creative Commons License 2023.07.21 0 0 37332

Szia!

Elég széles a D oszlopod? 

Üdv.

Előzmény: MZ/Y (37327)
MZ/Y Creative Commons License 2023.07.21 0 0 37331

Én ezt használtam, mert nálam a fájlkezelő keresője nem adott találatot, de ez tarthatott 5 percig is, az Excelben meg 5-6 mp. Előttem próbálták mutatni a kollégáknak ezt, hogy jobb mint a fájlkezelő, de nem tudták meggyőzni őket. Nekem a sebességgel végül sikerült. :)

 

De köszönöm! 

Előzmény: m54-b (37330)
m54-b Creative Commons License 2023.07.20 0 0 37330

Jövőbeni ötletnek a Totál Commandert ajánlom, mint kereső.

 

Az ALT + F7 kiadja ezt az ablakot.A "Mit keres"-be *txt --> minden txt fájlt megkeres (ezt lehet cifrázni, *alm* pl minden olyan fájlt keres, amely tartalmazza az alm-t). Szöveg bejelölésével ezekben keresi a megadott szót.

 

Az 1 értelemszerű, az adott fájlra ugrik, a 2 kiad egy ablakot

 

Ebben egyesével lépkedve F3-al belenézhetsz a fájlokba.

A Bővített fül alatt további paraméterekkel szűkítheted a találati listát (időpontok között, fájlméret figyelembe vétele).

Sokkal gyorsabb, mint a Win keresője, jobban paraméterezhető, zseniális. Szerintem.

Előzmény: MZ/Y (37322)
Fferenc50 Creative Commons License 2023.07.20 0 0 37329

Szia!
Tudom, nem vígasztal, de nálam műxik, Excel (MS) 365 van nálam.

Jó éjszakát!

Üdv.

Előzmény: MZ/Y (37328)
MZ/Y Creative Commons License 2023.07.20 0 0 37328

Pontosvessző az elválasztó.

De most inkább jó éjszakát, majd holnap kérdezek még 2-t - meg előbb kipróbálom, amit most beszéltünk. Hátha ez meg is oldódik.

Előzmény: Fferenc50 (37325)
MZ/Y Creative Commons License 2023.07.20 0 0 37327

Igen, képletek vannak a sablonban most is, csak nem ismert a sorok száma, ezért berakom az első sorba, és onnan lehet bemásolni annyi sorba, amennyi éppen kell.

 

Megpróbálom majd, de az egész szenzitív, mindent át kell irni.

 

De röviden így néz ki:

/abc/rzgcfgh

fgjbb

dbFFe

renc27vbgfh

fghBud

apestchvdd

/abc/fgghh

fghvfg

eggfgh

thh

/abc/zgg

vbbb

gh? gbb

/abc/pkhf

fbvgh

g hFt

hghfhh

thgtzu? 

zzhftz

hjhgj

hj?ggzuk

k hffgu

/abc/ghbf

dgh

 

Amelyik sor végén kérdőjel van, ott (onnantól)nem adódik hozzá a következő sor. Sor elején még nem bukott ki, hogy zavart okozna, de lehet, az első 300 sorban pont nem volt olyan sor.

Előzmény: Fferenc50 (37323)
Fferenc50 Creative Commons License 2023.07.20 0 0 37326

Amúgy gratulálok annak a programozónak, amelyik ilyen összevissza adatot képes kiadni a kezéből.... annak pedig külön diploma jár, aki ezt így el fogadja, netalán még fizet is érte. :( :(

 

Előzmény: MZ/Y (37324)
Fferenc50 Creative Commons License 2023.07.20 0 0 37325

Szia!

Ahol összefűzés miatt van a & ";" & akkor a ; elhagyható. A kérdőjelet nem értem, nálam a példában simán betette. Ezért mondtam, hogy jó lenne látni, hol van. Esetleg mutasd meg a képleted. Milyen Excel verziót használsz, mi a paraméter elválasztó?

Üdv.

Előzmény: MZ/Y (37324)
MZ/Y Creative Commons License 2023.07.20 0 0 37324

Kösz, látom.

 

Érdekes, mert nekem nem teszi be a ;-t. Valamit elírtam volna? De nekem nem is kell pontosvessző, úgy kell összefűznie a sorokat, ahogy vannak. Pl. a név, számlaszám sem 1-1 sorban van, hanem sor végén elkezdődik a név (FFe), a másik sor elején meg folytatódik (renc). Ugyanez a számlaszámmal: sor végén HU123, következő sor elején meg 45678901234567890123456. Tehát csak össze kell fűzni.

 

Akkor ezek szerint kiszedhetem a ";" & részt, marad az D2 & A3 (ha jól emlékszem, hátha nem borul meg a kérdőjeltől.

Előzmény: Fferenc50 (37321)
Fferenc50 Creative Commons License 2023.07.20 0 0 37323

Szia!

Képletezett sablont is tudsz csinálni. Továbbá, ha táblázattá alakítod, akkor még a képletekkel sem kell törődni. Ezért lenne jó látni a szerkezetet.

Ha tudod, tegyél fel egy mintát valahová.

Üdv.

Előzmény: MZ/Y (37322)
MZ/Y Creative Commons License 2023.07.20 0 0 37322

Lehet, hogy járható lenne, de azt már nem nyomnám le a kollégák torkán. :)

 

FFerenc megoldásával egyelőre kell egy. txt import, oszlop másolás, beillesztés a sablonba, x db oszlopban a 2. sor lehúzása végig, szűrés, pár oszlop másolása, másik fájlba/lapra beillesztés értékkel. Ezt talán el tudom érni.

 

Napi több óra munkát lehet megspórolni 5 perc alatt, de nagyon nehezen mozdulnak a kollégák, óriási a tehetetlenség, "így szoktuk", "X így találta ki", ha nem pofon egyszerű, inkább szüttyögnek órákig. Én meg látom, csapágyasra vannak hajtva nem túl jó fizetésért, próbálok erővel is segíteni rajtuk. :)

 

Most volt egy "projektem", az is sok órát spórolt meg, de küzdelmes volt a dolog: csak annyi a változás, hogy csináltam egy böszme .xls-t, abban tudnak keresni - max. 5-6 mp (múltkor ezt akartam még gyorsítani), ha a táblázat legvégén van az adat, külön cellába kiraktam ami kell; eddig meg a windows fájlkezelőjében keresték a szöveget, nem túlzok, volt hogy 5 perc alatt lett meg a .txt, megnyitották, abban megkeresték a szöveget, az ömlesztett sorból kivadászták, ami most ott van külön cellában. Na, ez is nem nagyon tetszett, 1 ember mondta, szerinte a táblám lelassítja a fájlkezelőt, rögtön volt, aki csatlakozott. Aztán 1 ember használta, elmondta, hogy 10-20-100x gyorsabb, aztán 3, ma már mindenki, éppen ma hálálkodtak, mennyire jó. Csak nehéz rávenni őket, hogy van új a nap alatt, ezért kell a végletekig egyszerűsítenem.

 

Bocs, hogy hosszú lett.

Előzmény: m54-b (37319)
Fferenc50 Creative Commons License 2023.07.20 0 0 37321

Szia!

Megmutatnád legalább képen a kiinduló adataidat? (Persze ne a titkosad, csak a szerkezete fontos.)

A ; a Ha függvénynél paraméter elválasztó, egyébként pedig az egyes sorok közötti elválasztás lenne a funkciója, nézd vissza a hozzászólásomban a képet.

Üdv.

Előzmény: MZ/Y (37320)
MZ/Y Creative Commons License 2023.07.20 0 0 37320

Köszönöm, majdnem tökéletes.

 

Egy hiba van: ha a sorom utolsó karaktere ?, akkor a D2 & ";" & A3 "parancs" eredménye marad D2. Ezt kellene még megoldani, utána tökéletes lenne szerintem.

 

Bevallom, az a ";" nem tudom, mi célt szolgál, mert pontosvesszőt nem tesz be, azt látom.

 

Előzmény: Fferenc50 (37314)
m54-b Creative Commons License 2023.07.20 0 1 37319

Word nem lehet?

 

Szöveg a Wordbe, soremelés lecserélése semmire, vagy egy szóközre, aztán az xyz cserélése bekezdésjel + xyz-re.

Előzmény: MZ/Y (37313)
pimre Creative Commons License 2023.07.20 0 0 37318

Szép megoldás. Akkor én nem is próbálkozom más megoldással.

Előzmény: Fferenc50 (37314)
MZ/Y Creative Commons License 2023.07.20 0 0 37317

Kösz szépen, meglesem, és akkor pimre olvtársat már nem is kell terhelnem.

Előzmény: Fferenc50 (37314)
MZ/Y Creative Commons License 2023.07.20 0 0 37316

Megnyugodtam, az félelmetes lett volna, ha ilyen memóriád van. De számomra az is csoda, am(enny)ire emlékeztél. :)

 

Tökéletesen értetted a problémát. :)

 

Szoktam importálni (na nem sokat...), de nem láttam olyan beállítást, hogy több sorból 1 sor. Erre gugliban keresve az 1 cellában több sort hozza, egyetlen fordított (nekem kellő) találat sincs.

 

Jól érzed, szenzitiv a cucc, még "kihoznom" is nehéz lenne, próbálok összedobni valami hasonlót, úgyis csak az elv a lényeg. A : és , abszolút nem számít, mert tulajdonképpen nem is kell cellákra bontani, jó egyben is a sor.

 

Kösz előre is, ha van rá(m) időd!

Előzmény: pimre (37315)
pimre Creative Commons License 2023.07.20 0 0 37315

Szia, nem emlékeztem, csak rémlett, hogy talán nálad volt valami lassulási probléma. Próba szerencse rákerestem az Excel hozzászólásaidra (tudod, bárki nevére kattintva egy hozzászólás felett listát kapsz arról, hogy hány hozzászólásod volt az adott topikban. Neked kevés volt, így pillanatok alatt rátaláltam a 2020-as lassulásra.) . 

 

A txt-s kérdést nem tudom, jól értem-e. Tehát egys sorok valamilyen fix karaktersorozattal kezdődnek, legyen /xyz/. És akkor az adott sor tartalmához hozzá kell fűzni (és törölni) a további sorokat addig, amíg nem találunk egy /xyz/-t, mert ezzel új összefűzést kezdünk új sorba. Az első üres cellánál befejezzük a keresést.

 

Nem hinném, hogy ez komoly nehézséget jelentene. Az excel és a txt jóban vannak, könnyű konvertálni ket. Gondolj a CSV kiterjesztésre. 

 

"Amúgy érdekes a .txt, hol :, hol vessző a szeparátor jel, ". Ha a kettőspont és a vessző egyaránt csak szeparátorként fordul elő, akkor nem nehéz törölni, vagy másra változtatni, vagy egységesíteni őket.

 

Ha tudsz küldeni emailben, vagy felhőből (pl. Google Drive) egy mintát, akkor szívesen megnézem. Az adataid nyilván bizalmasak, de próbálj meg egy olyan részt kivágni, ahol nincs érzékeny adat, vagy valami hasonlót generálni 6-8-10 sornyit.

Előzmény: MZ/Y (37313)
Fferenc50 Creative Commons License 2023.07.20 0 0 37314

Szia!

Némi trükközéssel megoldható szerintem:

A oszlop az eredeti sorok, D oszlop az összfűzött értékek, H oszlop a vizsgálat eredménye, ami alapján törölni kell a sorokat.

Lépések:

D2 cella képlete: =A2

D3 cella képlete: =HA(BAL(A3;5)="/xyz/";A3;D2 & ";" & A3)

Ez végig húzható a D oszlopon, ameddig adataid vannak.

H2 cella képlete: =HA(A2=D2;HAMIS;HA(A3=D3;IGAZ();HAMIS()))

Ez lehúzható a H oszlopon, ameddig az A oszlopban adataid vannak.

D:H oszlop kijelölése másolás - irányított beillesztés értéket --> hogy a képletek értékké változzanak.

Autoszűrő bekapcsolása 

A H oszlop szűrő HAMIS kiválasztása - a sorok kitörlése

Szűrő megszüntetése.

 

A D oszlopban ott a kívánt eredmény.

Az A és H oszlop természetesen törölhető a műveletek végén.

Ha egy sorban több oszlopban is van adatod, akkor az oszlopok értékét ugyanúgy össze kell fűzni a utolsó oszlop után.

Üdv.

Előzmény: MZ/Y (37313)
MZ/Y Creative Commons License 2023.07.20 0 0 37313

Erre most emlékszel, vagy visszakerestél? Ha előbbi, le vagyok esve a székről. :) Volt ilyen, az más probléma volt. Elbújó képek miatt bődületes fájlméret, alig lehetett megtalálni, a fájlt meg megnyitni is alig.

 

Itt most csak sima "lassúságról" van szó, pár mp, amin van aki hisztizik, de ezen is túl vagyok.

 

Még egy bajom van, hálás lennék, ha erre lenne megoldás. Makró biztos jó, csak nem értek hozzá. :(

 

Van egy .txt, abban sok tétel, de így:.

Első sor /xyz/abcd

Következő sorok: szövegek, amiket az előző sorhoz hozzá kellemes fűzni. "Az egyszerűség kedvéért" változó, hány sor van, azzal nem lehet kalkulálni.

 

Valami olyan jut eszembe, nézze meg, szöveg eleje /xyz/-e, ha igen, lépjen a következő sorra. Megint vizsgálja, ha igen, lépjen lentebb, ha nem, fűzze hozzá az előző sorhoz, ezt a sort törölje, következőt vizsgálja, mindaddig ismételve, amíg üres cellát nem talál.

 

Programmal bármikor menne fél óra alatt (rég csináltam ilyet, azért írok ilyen sokat), de multi, (tök jogosan amúgy) nincs helye saját programoknak, Excelben kellene összehozni. Aztán még egy kis bűvészkedés az adatokkal, aztán az egészet úgy összerakni, hogy a kollégáknak csak a .txt tartalmát kelljen bemásolni, és kiessen a kész adat. :) A vége nem gond, de a kiinduló adatot nem tudom előállítani.

 

Amúgy érdekes a .txt, hol :, hol vessző a szeparátor jel, de az is megoldható, csak nem tudom, ki és miért ilyet generál.

Előzmény: pimre (37302)
Vax Creative Commons License 2023.07.18 0 0 37312

A táblázat amit havonta lehívsz, minimum három oszlopot tartalmazzon!
1. kelt, vagy hónap,
2. partnerkód,
3. összeg

Ezeket az adatokat másold egy "Egyesített adatok" nevű munkalapra, havonta egymás alá!

Az "Egyesített adatok" nevű munkalapot elemezd kimutatással!
A kimutatást egyszer kell megszerkeszteni. Bármilyen formázás, rendezés létrehozható.

A havi teendő annyi, hogy becopyzod az adatokat, és mented. Frissíted a kimutatást és annyi. Praktikus, ha a kimutatás és az adatok nem egy munkafüzetben vannak.
Ha a havi lekérés nem tartalmazza a partner nevét, akkor kell egy nulladik havi táblát is hozzáadni az egyesítetthez, hogy a nevek is kéznél legyenek.

Előzmény: Nyáúkász (37304)
Fferenc50 Creative Commons License 2023.07.17 -1 0 37311

:)

Előzmény: Delila10 (37310)
Delila10 Creative Commons License 2023.07.17 -1 1 37310

De igen, csak nem tudok négyig számolni ebben a hőségben. :(

Előzmény: Fferenc50 (37306)
pimre Creative Commons License 2023.07.17 -1 1 37309

Biztos, ami biztos itt elérhetők az általam használt fájlok, amik azonosak a mintában megadottakkal. Hogy ha valamiért nem működne nálad, akkor össze tudd hasonlítani, és megtalálni az eltéréseket.

 

https://docs.google.com/spreadsheets/d/1DtlmnaHrjRoxvH-vefLpaKV_uNeYIA0z/edit?usp=drive_link&ouid=113951927802309105103&rtpof=true&sd=true

 

https://docs.google.com/spreadsheets/d/1aLy7YMXMx_xy2V2oen9xnZvYxaPIo6Jr/edit?usp=sharing&ouid=113951927802309105103&rtpof=true&sd=true

Előzmény: pimre (37308)
pimre Creative Commons License 2023.07.17 -1 0 37308

Ja és ha megvan, célszerű a kapott eredményeket értékre konvertálva véglegesíteni.

Előzmény: pimre (37307)
pimre Creative Commons License 2023.07.17 -1 0 37307

 

A saját tábládban a június hónap első sorába másold be a következőt: 

 

=HAHIBA(INDIREKT("[vevők.xlsx]Munka1!B" & HOL.VAN(A2;[vevők.xlsx]Munka1!$A$2:$A$8;0)+1);"")

 

A vevők.xlsx és a Munka1 helyére persze  a letöltött fájl nevét és a munkalap nevét írd. Majd ezt a képletet húzd le a teljes partnerlistán.

 

Mindeközben legyen nyitva a letöltött fájl is.

Előzmény: Nyáúkász (37304)
Fferenc50 Creative Commons License 2023.07.17 -1 0 37306

Szia! Nem a 4. paraméterre gondoltál?

Előzmény: Delila10 (37305)
Delila10 Creative Commons License 2023.07.17 -1 0 37305

Szia! Nézd meg a súgóban az FKERES függvényt, különös tekintettel a 3. paraméterére.

Előzmény: Nyáúkász (37304)
Nyáúkász Creative Commons License 2023.07.16 -1 0 37304

Sziasztok! 

 

Excel használatában szeretnék segítséget kérni :)

Munkahelyen, a számítógépes programból kell lehívnom minden hónapban egy táblázatot, ezt szeretném összefésülni egy másik, a meghajtón lévő táblázattal. 

A saját gépen lévő táblázatnál fel van sorolva az összes ügyfél név és partnerkód alapján, mellettük lévő oszlopokban pedig egy összeg, hogy a különböző hóapokban milyen értékben vásároltunk tőlük. A legutóbbi hónap (június) még nincs kitöltve, ebben lenne szükségem a segítségre. A programból lehívott táblázatbanc sak azok az ügyfelek szerepelnek, szintén partnerkód alapján, akiktől a legutóbbi hónapban (júniusban) vásároltunk, valamint mellette az összeg, hogy mennyiért. Ezt a két táblázatot kéne a lehető leggyorsabb módon összefésülnöm egybe. 

Segítségképpen itthon készítettem egy egyszerűsített példát. A lenti, fehér táblázat B (Összeg) oszlopából szeretném a számokat átrakni a felső, kék táblázat B (Június) oszlopába, a partnerkódnak megfelelő sorba. Tehát az első, 50 000-res összeget szeretném berakni az első táblázat A/4 cellájába, és így tovább.

Természetesen ezt csak a szemléltetés végett készítettem, munkahelyen sokkal több adatról lenne szó, ezért is keresek egy gyorsabb megoldást, hogy ne kelljen hónapról-hónapra kézzel átírnom.

 

Előre is köszönöm mindenki segítségét! 

Eredő Vektor Creative Commons License 2023.07.11 0 0 37303

Használhat oszloponkénti autofiltert a kereséshez, vagy ha ez a keresés egy sima Ctrl+F opcióval történik, akkor kijelölni előtte azt az oszlopot, amiben keresni akar... így csak a kijelölt tartományon (oszlopon) vándorol végig, nem a teljes táblán.

Előzmény: MZ/Y (37300)
pimre Creative Commons License 2023.07.11 0 0 37302

Nem lehet, hogy képek is vannak a táblában? 3 éve volt valami hasonló problémád, amit a képek (rajzok) eltávolításával megoldottál.

Előzmény: MZ/Y (37300)
Eredő Vektor Creative Commons License 2023.07.11 0 0 37301

Abban az értelemben amire Te gondolsz, nem lehet indexet rakni rá.

Nem tudom, hogy keresel a táblában... Valószínűleg máshogy kéne megfogni, megközelíteni ezt a keresést, elképzelhető, hogy előállítható gyorsabb módszer is. De így látatlanul megítélhetetlen.

 

Előzmény: MZ/Y (37300)
MZ/Y Creative Commons License 2023.07.10 0 0 37300

Van mód "indexelni" az Excel táblát?

Adott egy több százezer soros táblázat, amiben a keresés lehet 15 mp is. Ezt van aki sokallja. :) Ha lehetne adatbázist kezelni a melóhelyen, nem lenne gond, index a kívánt oszlopra, és 1 mp alatt kiadná. De nem lehet, így az Excelből kellene kihoznom a legtöbbet.

Eredő Vektor Creative Commons License 2023.07.07 0 0 37299

Szia,

Nézd meg a Nézet/ Ablak / Új ablak opciót. Munkalaponként nyiss új ablakot. (Mindegyiken ablakban kiválsztod a látni kívánt munkalapot.)

Utána rendezd ezeket az ablakokat:  Nézet / Ablak / Mozaik -->

Válaszd ki a kívánt elrendezést és jelöld be alul az "aktív munkafüzet ablakai" checkboxot. Ok.

Előzmény: peeszp (37298)
peeszp Creative Commons License 2023.07.06 0 0 37298

Sziasztok!

 

Egy kis segítséget kérnék. Az excelben egymásra épülő számoló táblázataim vannak, mindegyik külön munkalapon. A számított eredményeket, vagy adatokat amire másik munkalapon, másik táblázatban is szükség van mindig átkerülnek a következő munkalapokra. A táblázatok teljesen különböző formátumuak, így azonos munkalapon a megjelenítésük nem szerencsés, az eltérő méretű cellák miatt.

 

Hogy ne kelljen folyamatosan ugrálnom az egyes munkalapok között szerencsés lenne, ha egymás alatt azonos oldalon látnék mindent, de ehhez több oszlopazonosító kiosztás kell úgy gondolom. Meg lehet azt oldani, hogy a különböző munkalapokat egymás alatt lássam, így görgetéssel tudnék haladni a táblázatok között.

 

Talán érhető volt, amit kérdeztem. Köszönöm.

local75 Creative Commons License 2023.07.06 0 0 37297

A sorba rendezést sehogy nem akarta jól elvégezni, de sikerült táblázattá alakítanom.

Nem tetszett neki hogy a fejléc egyesített cellákból áll.

Előzmény: local75 (37296)
local75 Creative Commons License 2023.07.06 0 0 37296

Sziasztok!

Egy táblázatban az első sorban lévő elemre nem hat a sorba rendezés parancs.

Mit lehet ilyenkor tenni?

 

Nem alakítottam táblázattá, mert ez egy meglévő "táblázat", és akárhogyan próbálom táblázattá alakítani, szétcseszi a formát.

 

local75 Creative Commons License 2023.07.05 0 0 37295

Hát ez tényleg egyszerű lett volna. :)

 

Köszönöm mindkettőtöknek.

Előzmény: Fferenc50 (37290)
Delila10 Creative Commons License 2023.07.05 0 0 37294

OK.

Előzmény: Fferenc50 (37293)
Fferenc50 Creative Commons License 2023.07.05 0 0 37293

Ha valamelyik cellában HIBAérték van, akkor ne az legyen az eredmény, hogy #HIÁNYZIK/#ZÉRÓOSZTÓ stb.

Előzmény: Delila10 (37292)
Delila10 Creative Commons License 2023.07.05 0 0 37292

Még a HAHIBA sem kell.

=AB12 & "." & G12 & HA(Q12>0;"_" & Q12;"")

Előzmény: Fferenc50 (37290)
Delila10 Creative Commons License 2023.07.05 0 1 37291

=HA(VAGY(Q12=0;Q12="");AB12&"."&G12;AB12&","&G12&"_"&Q12)

Előzmény: local75 (37289)
Fferenc50 Creative Commons License 2023.07.05 0 1 37290

Szia!

Be kell építeni egy HA függvényt, pl.

=HAHIBA(ÖSSZEFŰZ(AB12;".";G12;HA(Q12>0;"_" & Q12;""));"")

De az ÖSSZEFŰZ függvény helyett lehet használni az & jelet (ahogyan a HA függvényen belül is használtam):

=HAHIBA(AB12 & "." & G12 & HA(Q12>0;"_" & Q12;"");"")

Üdv.

Előzmény: local75 (37289)
local75 Creative Commons License 2023.07.05 0 0 37289

Sziasztok!

Segítségre lenne szükségem.

Van egy ilyen függvényem:
=HAHIBA(ÖSSZEFŰZ(AB12;".";G12;"_";Q12);"")

 

Szeretném ha Az alsó vessző, és a Q12 értéke nem lenne összefűzve ha Q12=0 vagy nincs érték.

 

Most ezt a műveletet végzi:

 

AB12       G12       Q12                    EREDMÉNY

 

   1          Sajt       Paprika                    1.Sajt_Paprika      

   1          Sajt           0                        1.Sajt_0               Rossz

 

 

Szeretném, ha Q12-ben nulla az érték, vagy nincs érték, akkor ez lenne az eredmény:

 

AB12       G12       Q12                    EREDMÉNY

 

   1          Sajt                                     1.Sajt                

   1          Sajt           0                        1.Sajt                

 

 

Köszi.

Garashan Creative Commons License 2023.07.02 0 0 37288

Tudtommal nincs olyan függvény, ami meg tudná állapítani a cellák színét és az alapján rendezni valamint a bennük lévő adatok alapján pluszban.
Makróval lehet megoldani a dolgot.

Előzmény: Fatales (37287)
Fatales Creative Commons License 2023.07.02 0 0 37287

Szerbusztok.
A segitségeteket szeretném kérni.
Adott ez a fügvény ami teszi a dolgát.
=DARABTELI($A$1:$H$1;A1)>0
Hogyan kell átirni hogy rendezze is soronként?
1.A szint (csak 2 szín jelöli zöld=kitöltés , piros=szám) a megtalált számokkal előre veszi.
2.A színnel(zöld=kitöltés) jelölt megtalált számokat sorba rendezi nagyság szerint
3.A nem színesített számokat a sorok végén szintén nagyság szerint rendezi.
Köszönöm.

-

-

tekeoff Creative Commons License 2023.06.29 0 0 37286

Nagyon szépen köszönöm! 

Előzmény: Fferenc50 (37285)
Fferenc50 Creative Commons License 2023.06.29 0 0 37285

Szia!

Bocs, lemaradt egy HAHIBA függvény az elejéről, mert az Excel fájlomban nincs benne.

=HAHIBA(képlet;"")

Remélem rá tudsz nézni arra a fájlra, ami a linken van. Ott megtalálod az összes képletet helyesen (igaz angolul). 

Képletek magyarul, HAHIBA nélkül, 

H2 képlete:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(BAL(H$1;1);ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP())

I2 képlete:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(BAL(I$1;1);ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP($G2))

J2 képlete:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(BAL(J$1;1);ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP($H2))

K2 képlete:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(K$1;ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP($H2))

L2képlete:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(L$1;ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP($H2))

M2 képlete:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(M$1;ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP($H2))

N2 képlete

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(N$1;ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP($H2))

O2 képlete:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(O$1;ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP($H2))

P2 képlete:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(P$1;ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP($H2))

Q2 képlete:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(Q$1;ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP($G2))

R2 képlete:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(R$1;ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP($H2))

Ezeket kell belefoglalnod a HAHIBA függvénybe.

Ezután a képletek húzhatóak lefelé.

Üdv.

Előzmény: tekeoff (37284)
tekeoff Creative Commons License 2023.06.29 0 0 37284

Igen így már kezd működni. :)

Viszont ahol nincs beolvasandó érték pl. G4 - G7 oda "#Hiányzik" kerül. Ezt hogy lehet kiküszöbölni? Ha nincs mit beírni, inkább maradjon üres a mező. Illetve a következő "H" oszlopba a képlet melyik értéket kell átírnom? 

Előzmény: Fferenc50 (37283)
Fferenc50 Creative Commons License 2023.06.29 0 0 37283

Szia!

Ezek szerint magyar Exceled van. Fenn a linken nekem angol neveket kellett írnom ahhoz, hogy működjön.

A függvény neveket magyarul kell beírnod:

INDEX = INDEX

OFFSET=ELTOLÁS /vagy régebbi verzióban OFFSET

LEFT= BAL

COUNTIF = DARABHA / régebbi verziókban DARABTELI

MATCH = HOL.VAN

COLUMN = OSZLOP

A képlet magyar függvénynevekkel:

=INDEX(ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);20);HOL.VAN(BAL(G$1;1);ELTOLÁS(connections!$B$1;HOL.VAN(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;OSZLOP($E2);DARABHA(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);OSZLOP())

Üdv.

Előzmény: tekeoff (37282)
tekeoff Creative Commons License 2023.06.29 0 0 37282

Szia!

 

El tudnád küldeni e-mailen, mert nekem NÉV hibát ad. 

 

Köszi

Előzmény: Fferenc50 (37276)
Delila10 Creative Commons License 2023.06.29 0 0 37281

Ha már átmozgattad kézzel, sehova.

 

A VB szerkesztőben kellett volna egy modulba tenni.

A füzetedben Alt+F11-re bejön a VB szerkesztő. Ott az Insert Module létrehoz egy modult (jobb oldalon nagy üres felületet), oda kellett volna bemásolni.

A füzetbe visszalépve Alt+F8-ra előjön egy ablak, benne a makró nevével, ezt indítva pikk-pakk áthelyezte volna az adatokat.

Előzmény: djuice (37279)
djuice Creative Commons License 2023.06.28 0 0 37280

Most már igen, de nem nagyon azt csinálja amit szeretnék. Végül kézzel mozgattam át mindent, mert csak az idő ment el a sok kísérletezgetéssel.

Előzmény: Fferenc50 (37265)
djuice Creative Commons License 2023.06.28 0 0 37279

Ezt hova kell begépelni?

Előzmény: Delila10 (37268)
tekeoff Creative Commons License 2023.06.28 0 0 37278

Köszönöm szépen!

Ez olyan mintha kínai lenne, de próbálom megérteni, jó hogy írtál magyarázatot is! :)

Előzmény: Fferenc50 (37276)
MZ/Y Creative Commons License 2023.06.27 0 0 37277

Kösz szépen!

Ilyesmin gondolkodtam (annyi változással, hogy az oszlopokkal van gond, tehát ha adott sorban nincs a - mondjuk - G oszlopban adat, akkor csak F-ig rendezi át).

 

Alapból mindig úgy rendeztem, hogy kijelöltem a sorokat, amiket rendezni akarok. Ilyenkor nincs gond, mindug komplett sorokat mozgat. Még nem jöttem rá, mitől van, de néha a fejlécet is rendezi, hiába nincs kijelölve az első sor. Ilyenkor vagy elmentem, bezárom az Excelt, újra nyitom a táblát, és jól működik, vagy úgy rendezem, hogy nem jelölök ki semmit, és ekkor sem rendezi az első sort. Valószínűleg ez lehetett a baj, éppen kijelölés nélkül rendeztem, így meg az általad írtak alapján nem kezelte G oszloptól, mert az aktuális sorban ott nem volt semmi. Vagy valami ilyesmi lehetett.

Előzmény: Fferenc50 (37275)
Fferenc50 Creative Commons License 2023.06.27 0 0 37276

Szia!

Beletettem az általam javasolt képleteket. A képletek minden oszlopban hasonló elven működnek, de az eltérő paraméterekben különböznek. Ezért lefelé húzhatók az oszlopokban, de oldalra nem.

Biztosan meg lehetett volna csinálni egyszerűbben is, hátha valakinek sikerül.

Itt az egyik képlet (G2 cella)

=IFERROR(INDEX(OFFSET(connections!$B$1;MATCH(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;0;COUNTIF(connections!$B$1:$B$35;Csatlakozások!$B2);20);MATCH(LEFT(G$1;1);OFFSET(connections!$B$1;MATCH(Csatlakozások!$B2;connections!$B$1:$B$35;0)-1;COLUMN($E2);COUNTIF(connections!$B$1:$B$35;Csatlakozások!$B2);1);0);COLUMN());"")

Nagyon rettenetnek látszik (az is, :) ).

Egy kis magyarázat:

Mivel sorba vannak rendezve a tételek a pozició szerint (- ami akkor is megvalósítható, ha egyébként nem lennének így - ) minden pozícióhoz ki lehet jelölni azt a tartományt, ami hozzá tartozik. Ezt teszi az OFFSET függvény: A MATCH megkeresi a pozició első előfordulását, a COUNTIF megszámolja, hány sorban fordul elő. Ez alapján jön létre a tartomány, melynek G oszlopában keressük a Connection Type-ot ismét a MATCH függvénnyel. Ezt az eredményt adja vissza az INDEX függvény - aminek oszloptartománya most nálam 20, de ez változtatható, ha több paramétert keresel.

A kérésed szerint most a Conn1 és Conn2 értékek kerülnek át a megfelelő pozícióhoz. 

Remélem, tudod használni.

Üdv.

Előzmény: tekeoff (37274)
Fferenc50 Creative Commons License 2023.06.27 0 0 37275

Szia!

Az ilyen nincs és mégis van esete. :)

Akkor fordulhat elő, ha nincs a teljes rendezendő állomány kijelölve vagy az adatok között üres sor/ok vannak vagy egy oszlop szerint rendeznél, de az ebben levő értékek "nem érnek végig" a többi oszlophoz viszonyítva.

Az Excel automatikusan az éppen aktuális cella környezetét veszi rendezendő adatoknak - ez nem mindig a teljes adatállomány.

Tanács: az adatállomány legyen sorfolytonos, rendezés előtt jelöljük ki az egyik fejléc cellát. Az Excel általában megkérdezi, hogy ezen a tartományon szeretnénk-e a műveletet vagy kiterjeszteni. A kiterjesztésnél meg kell lesni, minden benne van-e.

Üdv.

Előzmény: MZ/Y (37273)
tekeoff Creative Commons License 2023.06.27 0 0 37274

Sziasztok!

 

Szeretnék készíteni egy táblázatot, de nem tudom hogyan tudom megcsinálni az adatcsoportosítást.

A táblázat „product” és „connections” füleit egy rajzoló program hozza létre az aktuális rajzból kiemelt lista alapján. Ezeket egy régi XLS-be írja. Ebbe szeretnék beletenni egy új „Csatlakozások” lapot, amely a másik kettőből összesíti az adatokat. A problémám itt kezdődik, mivel a „connections” lapon egy készüléknek a különféle csatlakozásait külön soron jeleníti meg (G oszlopban: E, G, HW, CW stb …) de én ezt egy soron szeretném kezelni. Tehát ha a „connections” G oszlopban pl. „E” szerepel, azt a „Csatlakozások” lapon az „E (kW)” és „E (Volt)” mezőkbe írja be a „Conn1” és „Conn2” értékeket. A „Csatlakozások” lapon minden „Poz” szám csak egyszer szerepelhet. A készüléknek csak néhány csatlakozása van, így a sorban több cella is üresen marad. Az összetartozó értékeket beszíneztem. Az is fontos lenne, hogy a „Csatlakozások” lapon a G és I oszlop szám legyen, azt összegezni lehessen.

 

Előre is köszönöm a segítséget!

 

https://tecogastro-my.sharepoint.com/:x:/g/personal/admin_tecogastro_onmicrosoft_com/EerUl90oaEtBhpe0ha2FVmQBZ9xvjTW6hhp1MjT-o9qTrg?e=eZHhjH

 

MZ/Y Creative Commons License 2023.06.27 0 0 37273

Lenne egy furcsa kérdésem. Szerintem ilyen nincs, de már többször előfordult. :) 

 

Sorbarendezésénél mondjuk G oszlopig sorba rendezi a táblát, de a H oszloptól maradnak eredeti sorrendben.

 

Nekem is csinált ilyet, kaptam vissza táblát ilyen hibával, tegnap meg kolléga futott bele. És ugye ha nem tűnik fel rögtön, akkor már a visszavonás nem feltétlenül járható.

Törölt nick Creative Commons License 2023.06.26 0 0 37272

"Ha a valós tudásszintjére lenne kíváncsi a gyakorló vizsgázó vajon próbálkozna e végtelen számban?"

 

Semmilyen szoftvert nem lehet arra alapozni, hogy majd a felhasználó betartja a szabályokat, mert a felhasználók sosem tartják be a szabályokat. Sőt, a legelképzelhetetlenebb hibákat is elkövetik, amit józan, normális programozónak álmában sem jutna eszébe, hogy azokat is ki kellene védeni.

 

De mindegy. Jól láthatóan nem vagyunk egy hullámhosszon, úgyhogy nem erőltetem a nézőpontomat. Viszont, mivel nem sikerült a kérdésemre adekvát választ adnod, és továbbra is csak találgatni tudok, hogy pontosan hogy lesz ez a rendszer használva, felállítottam pár munkahipotézist, és kiválasztottam azt, ami szerintem a legvalószínűbb. Így született ő: https://data.hu/get/13782213/QA.xlsm

 

Előzmény: hát ő (37271)
hát ő Creative Commons License 2023.06.26 0 0 37271

 Érdekes a kiindulási alap "a feladatmegoldó végtelen számú alkalommal próbálkozhat".

Ha a valós tudásszintjére lenne kíváncsi a gyakorló vizsgázó vajon próbálkozna e végtelen számban?

Azt kellene újra megérteni "hacsak nem tökéletesen IQ mentes, akkor - végül minden választ helyesre fog kihozni."

nem a helyes válasz megadása a cél, hanem a TUDÁSA.

 

A több választási lehetőség kiértékelés utáni helyes válasz gyors megnézésére szolgál.

 

Nem IQ mentes csak más utat választ, mert tudni szeretné és ehhez gyakorol.

 

százalékos kiértékelés:

számlálóban a helyes válaszok

nevezőben a kérdések száma

 

5=91%-100% 4=78%-90% 3=65%-77% 2=50%-64% 1=49%

 

Ez egy vizsgára felkészítő gyakorló feladatsor gyors tudásszint felmérő.

 

Amikor a gyakorló vizsgázó visszatér a rossz válaszokhoz megnézheti a helyes választ rögtön a kérdés alatt.

Nem kell újra könyvet bújni máshova klikkelni.

 

Ha a vizsgázó arra koncentrál, hogy megadja a jó válaszokat és nem arra, hogy jó választ adjon nem lesz tudása.

Bármilyen program átírható, vizsgafeladat megvásárolható stb.

A tudás megkérdőjelezhetetlen.

Előzmény: Törölt nick (37270)
Törölt nick Creative Commons License 2023.06.26 0 1 37270

Okés, a törlés gomb nem gond, de én továbbra sem értem, hogy a százalékos kiértékelés mit jelent, amikor a feladatmegoldó végtelen számú alkalommal próbálkozhat a helyes válasz kiválasztásával, és - hacsak nem tökéletesen IQ mentes, akkor - végül minden választ helyesre fog kihozni. Tehát mi van a százalékszámítás számlálójában és mi van a nevezőjében? Precíz megfogalmazást kérek.

 

Előzmény: hát ő (37266)
hát ő Creative Commons License 2023.06.26 0 1 37269

Igen igazad van, de ez egy gyakorló vizsgasor és nem az értékelés a cél hanem a tanulás.

Ha klikkelget a feladatmegoldó az agya rögzíteni fogja a helyes választ.

A következő feladatmegoldáskor nagyobb a helyes válasz adásának a valószínűsége.

A százalékos kiértékelés azonnal mutatja a fejlődést.

Köszönöm a hozzászólásod.

Előzmény: Garashan (37263)
Delila10 Creative Commons License 2023.06.26 0 0 37268

Szia!

 

tol változó tartalmazza a sort, ahonnan az áthelyezést kell kezdeni. Az ig az áthelyezendő cellák száma mínusz 1. A tol a mintádban 7 (mert az első csapat marad a helyén), az ig pedig 5-tel több a minta szerint, 6 adatnál. Ezek értékét a *-gal jelölt sorokban módosíthatod.

 

Sub TranszP()

    Dim tol As Long, ig As Long, oszlop As Integer

    tol = 7: ig = tol + 5: oszlop = 2  ’*

   

    Do While Cells(tol, 1) <> ""

        Range(Cells(tol, 1), Cells(ig, 1)).Cut Destination:=Range(Cells(1, oszlop), Cells(6, oszlop))

        tol = tol + 6: ig = tol + 5: oszlop = oszlop + 1  ’*

    Loop

End Sub

 

 

Előzmény: djuice (37264)
hát ő Creative Commons License 2023.06.26 0 1 37267

Köszönöm a hozzászólásodat, de ez egy gyakorló vizsgasor.

Igen egy éles vizsgához jó az elgondolásod.

Előzmény: Garashan (37261)
hát ő Creative Commons License 2023.06.26 0 1 37266

Nagyon köszönöm a Gyors választ / feladatmegoldást.

Erre gondoltam. Nagyon hálás vagyok a ráfordított idő és szakértelem miatt.

 

Kérlek amennyiben van rá lehetőség egy törlő gombot is helyezz el

a feladat újrakezdésének lehetősége végett.

 

Magyarázat:

- lényegében ez egy gyakorló vizsgasor. A lényege, hogy a feladatvégző azonnali vizuális visszacsatolást kapjon

az adott válasza után. Nincs súlya a feladatlapnak. Tanító - oktató jellegű.

 

- százalékos kiértékelés lényege hogy a feladatmegoldó azonnal kapjon egy értékelést az elvégzett feladat után, amit újra kezdhet.

 

Köszönöm a munkád.

Szép napot.

Előzmény: Törölt nick (37260)
Fferenc50 Creative Commons License 2023.06.25 0 0 37265

Szia!

A Transzponálást - másolás - irányított beillesztés transzponálás -  próbáltad már?

De van TRANSZPONÁLÁS függvény is.

Üdv. 

Előzmény: djuice (37264)
djuice Creative Commons License 2023.06.25 0 0 37264

Halihó!

 

Az alábbi szerkezetű, Wordből konvertált táblázatom van mint adatfelvételi lap.


Sorsz.: #

Név: …

Születési idő: …

Szig.szám: …

Adószám:…

TAJ:…

stb.

 

Az adatok személyenként ismétlődnek egymás alatt.

Én pedig azt szeretném, ha azok adatmegnevezések szerint egymást követő oszlopokban helyezkedjenek el.

Ez is makrós móka már vagy van rá más megoldás?

Garashan Creative Commons License 2023.06.25 0 0 37263

Mint arra Te is rámutattál, ha meg van jelölve a helyes válasz zölddel, a rossz pedig pirossal és akárhányszor lehet módosítani a jelölésünket, akkor ez nem vizsga feladat, mert mindenki 100%-osra fog vizsgázni.

Előzmény: Törölt nick (37262)
Törölt nick Creative Commons License 2023.06.25 0 0 37262

"Szerintem egy alkalommal kell, hogy kattintható legyen a válasz."

 

És ezt hogy egyezteted össze az alábbi mondattal?

 

"... és amikor egy másik lehetséges válaszra klikkelek törlődjön az előzőleg kijelölt háttér egy adott kérdésnél de ez ne legyen hatással a következő vizsgakérdésre"

 

Esetleg az tudom még elképzelni, hogy azt nézzük, hányadik próbálkozásra találta el a helyes választ.

Előzmény: Garashan (37261)
Garashan Creative Commons License 2023.06.25 0 0 37261

Szerintem egy alkalommal kell, hogy kattintható legyen a válasz.

 

@Hát ő: szerintem nem kell színnel megjelölni rögtön hogy jó-e vagy sem a válasz, mert ha csak egyszer enged egy cellába kattintani, akkor is nyithatok egy másik excelt ahol kigyüjtöm, hogy melyik a helyes válasz és egy végső kitöltésbeb csak azokat kattintom be.

Én egy rejtett fülön gyüjteném a válaszokat, szépen egymás alá. Az egész munkafüzetet szerkesztés ellen védetté tenném és csak a megjelölt cellák lennének kiválaszthatók. Azok is maximum egyszer.

Utána egy külön tanári verzióban értékelném ki a helyes válaszokat.

Előzmény: Törölt nick (37260)
Törölt nick Creative Commons License 2023.06.25 0 0 37260

V0.1 verzió:
https://data.hu/get/13780148/QA.xlsm

A válaszok szeparált gyűjtésére vonatkozó részt nem értem. Ha annyiszor kattinthatsz, ahányszor akarsz, akkor nyilván a vizsgázó addig fog kattintgatni, amíg minden válasza zöld nem lesz. Azt meg minek gyűjteni? 100% jó válasz borítékolható.

Előzmény: hát ő (37259)
hát ő Creative Commons License 2023.06.25 0 0 37259

Kedves segítő fórumozók!

Segítséget kérnék egy feladatba.

Szeretnék magamnak egy vizsgához olyan feladatlapot készíteni ami képes a következőkre.:

 

C2 cella vizsgakérdés

C3 cella 1. válasz

C4 cella 2. válasz

C3 cella 3. válasz

C4 cella 4. válasz

 

- 150 ilyen kialakítású kérdés / válasz van egymás alatt egy cella kihagyással.

Szeretném elérni hogy az általam előzőekben megadott helyes válaszra klikkeléskor az adott cella zöld színű míg a rossz válaszra klikkeléskor piros színű legyen a háttere. Minden kérdésnél csak egy lehetséges válasz lehet. Tehát csak egy válasznál legyen látható háttér, és amikor egy másik lehetséges válaszra klikkelek törlődjön az előzőleg kijelölt háttér egy adott kérdésnél de ez ne legyen hatással a következő vizsgakérdésre..

 

- A jó és rossz válaszokat szeparáltan szeretném gyűjteni. a feladat százalékos kiértékelése miatt.

 

- Szeretnék elhelyezni egy törlés gombot aminek a funkciója a hátterek törlése, új feladatmegoldás indítása lenne.

 

Olyanok válaszát keresem akik esetlegesen ha szükséges megírnak egy makrót vagy ha a feladathoz ez nem szükséges végigvezetnek a pontos folyamaton. Amennyiben ez túl bonyolult és időigényes természetesen megértem és elégedem ezt a dolgot.

 

Köszönettel.

_Nyuszi Creative Commons License 2023.06.24 0 0 37258

Ó, nem dolgozol nálunk (ebből egyértelmű).

Hetente kétszer landol ilyen feladat... :D

 

(Amit már-már lakonikus rezignáltsággal veszek tudomásul: küldje meg mindenki xy-nak a kitöltött táblázatot, aki a kapott sorokat összetolja és továbbküldi, ahol ugyanezt egy kicsit nagyobb merítésben megcsinálják. Így a kiadott feladatra lehetséges időből kb. 1 hetet vesztünk, mert nem ismerjük a közösen, egy időben szerkeszthető táblázatok, szöveges dokumentumok világát.)

Mottó: nem cél a hatékonyság

Előzmény: Garashan (37257)
Garashan Creative Commons License 2023.06.23 0 0 37257

Amúgy az valószínűleg sokat dobna a dolgon, ha küldenél egy minta táblázatot, amiben minden ugyan úgy van, ahogy majd a munka példányodban lesz. Elég maoistának kell ahhoz lenni, hogy újra gyártsuk a táblázatot, főleg, hogy a színesen nem is olvashatóak a feliratok.

Előzmény: jupi95 (37255)
Törölt nick Creative Commons License 2023.06.20 0 2 37256

Ezt képlettel nem lehet megoldani, ugyanis cellaösszevonást képlettel biztos nem fogsz csinálni. Legfeljebb azt lehetne elérni, hogy az összevonanadó celláknak ugyanaz legyen az értéke.

De nekem még az is közel lehetetlennek tűnik. Elméletileg *talán* össze lehetne fabrikálni egy képletet, de az annyira bonyolult lenne, hogy aligha él olyan ember, aki átlátja. Kicsit sem segít, hogy a táblázatokban cellaösszevonások vannak, hogy a napok az egyik táblázatban meg vannak nevezve, a másikban csak kezdőbetűk, hogy az időintervallum az egyik táblázatban 2 cella, a másikban 1, stb. stb. 

Makró lesz a te barátod.

Előzmény: jupi95 (37255)
jupi95 Creative Commons License 2023.06.20 0 0 37255

Sziasztok!

 

Egy elég komplex ügyben kérem a segítségetek.

 

Lenne az alábbi adattábla (1. munkalap), ami egyben egy órarendi lista. Az ebben lévő adatokat kellene, hogy olvassa a teremtáblázatba (2. munkalap) C4 cellája az alábbi módon:

 

1. munkalap:

 

2. munkalap (ez értelemszerűen folytatódik Kedd, Szerda, s.í.t.):

 

Az 1. munkalap G oszlopából nézze a nap indexet és keresse meg a megfelelő napját (1. sor) a táblázatnak. Aztán az 1. munkalap H-I oszlopából keresse meg a 2. munkalap B (AF) oszlopokban található időintervallumokat. Végül az 1. munkalap K oszlopából keresse meg a megfelelő terem oszlopát (2. sor) a 2. táblázatnak. Majd a megfelelő mennyiségű cellát egyesítve (ilyet csak makróval lehet?) írja be az adekvát órarendi adat sorából az 1. munkalap A, C, E, F oszlopaiból származó adatokat. Magyarán: ha hétfőn 10-től 12-ig tart egy órát, akkor a teremtábla 6-7-8. sorában jelenjen meg, hogy " Nagy József,  Szakmai gyakorlat 3., DEMA 1-2.

Erre milyen képletet tudnátok ajánlani?

 

A színeket majd feltételes formázással megcsinálom.

 

Előre is nagyon-nagyon köszi!!!

_Nyuszi Creative Commons License 2023.06.14 0 0 37254

Az eredeti táblázatra FKERES, ami végignézi a szűkített táblázatodat?

Előzmény: aulac (37253)
aulac Creative Commons License 2023.06.14 0 0 37253

Sziasztok.

Segítséget kérek.

 

Adva van egy táblázat (Írószer igénylés), ami az "A" oszlop előtt sorszámozva van. Az "L" oszlopba kellene beírni a darabszámokat.

Kimásoltam azokat a tételeket amelyikre nekem szükségem lenne, mert sokezer sor van és beírtam a darabszámokat. Ennek a táblázatnak a sorszámai megegyeznek az eredeti táblázattal.

Hogyan tudnám legegyszerűbben visszatölteni az "L" oszlopban lévő számokat, úgy hogy azok a megfelelő sorokba kerüljenek?

 

Köszönöm, ha segítetek.

 

aulac

Garashan Creative Commons License 2023.06.07 0 0 37252

Igen, az sima hivatkozás, ami a dokumentum olyan celláira mutat, amik nincsenek is zárolva.

Előzmény: local75 (37248)
Garashan Creative Commons License 2023.06.07 0 0 37251

A parasztosat úgy értettem, hogy nem a legelegánsabb a megoldás. Illetve nem lehet automatikusan lehúzni, így lehet benne felhasználói hiba.

Előzmény: djuice (37249)
djuice Creative Commons License 2023.06.07 0 0 37250

Köszi az alternatívát is!

Előzmény: Delila10 (37227)
djuice Creative Commons License 2023.06.07 0 1 37249

Nem parasztos az, csak bonyolult, de működik. Köszi!

Előzmény: Garashan (37226)
local75 Creative Commons License 2023.06.07 0 0 37248

Áhá! Szóval hivatkozást helyezett el a gombra!?

Na igen, ez eszembe sem jutott, hisz én még csak szöveges hivatkozást szúrtam be weboldalakra.

Igen, azt láttam hogy több helyen is fölöslegesen jelöl ki egész tartományt.

 

Előzmény: Garashan (37247)
Garashan Creative Commons License 2023.06.07 0 1 37247

Az nem makró. XLSX kiterjesztésű dokumentumban nem lehet makró. Ha megnézed az általam visszaküldött dokumentumot, akkor a gombon tudsz jobb egérgombot nyomni. Majd a hivatkozások szerkesztésére ha rámész, akkor pl. a Tandembox fülön az alkatrészek gombon a következő hivatkozás van: F246:F266. A védelem feloldása előtt is lehetett az F oszlopba adatot bevinni. Ezért is tudott arra hivatkozást létrehozni. Bár szerintem elég lett volna az F247-re hivatkozni simán, mert az az első sor, ahol van értelme adatot bevinni, mert így kijelöli az egész F246:F266 tartományt.

Előzmény: local75 (37243)
local75 Creative Commons License 2023.06.07 0 0 37246

A kiterjesztése xlsx.

Igen, a VBA projektet valószínűleg nem oldottuk fel.

 

Még nem volt időm a makróval foglalkozni, de akkor ezek szerint a linkelt megoldással mindig kéri a jelszót?

A beszállítóm viszont úgy oldotta meg hogy tőlem nem kéri.

Előzmény: Fferenc50 (37245)
Fferenc50 Creative Commons License 2023.06.07 0 1 37245

Szia!

A munkalapok zárolásakor meg lehet határozni, hogy milyen műveleteket lehet csinálni a felhasználónak a zárolt munkalapon. Cellákat, tartományokat lehet szabadon szerkeszthetővé tenni.

Másrészt pedig a makrókat is el lehet rejteni - ha ilyen navigációs gombok vannak benne, akkor biztosan van benne makró is, csak a VBA projekt le van védve, ezért nem látható. A munkafüzet kiterjesztése pedig vagy xlsm de inkább xlsb valószínűleg.

Üdv.

Előzmény: local75 (37243)
tekeoff Creative Commons License 2023.06.07 0 0 37244

Köszönöm. 

Előzmény: Garashan (37231)
local75 Creative Commons License 2023.06.07 0 0 37243

Köszi.

Egyébként az hogy lehet hogy az említett védelemmel ellátott munkafüzetben van több gomb is elhelyezve ami cellákhoz navigál, és nem kell beírnom semmilyen jelszót sem megnyitáskor, sem használatkor.

Ugyanakkor a VBA-ban nem látok makrót, sem semmit ami ezt a műveletet végzi. Ezt hogy csinálják? Ez nem makró?

Előzmény: Fferenc50 (37241)
Garashan Creative Commons License 2023.06.07 0 0 37242

Visszaküldtem.

Előzmény: local75 (37240)
Fferenc50 Creative Commons License 2023.06.07 0 1 37241

Szia!

A munkalapol védelmét makróból is lehet szabályozni, beállítani és feloldani.

Védelemmel kapcsolatos segítség: Worksheet.Protect method (Excel) | Microsoft Learn 

A UserInterFaceOnly paraméter beállításával eléred, hogy a makróid tudnak működni, de a felhasználók felé érvényes a védelem. Ezt a paramétert sajnos minden egyes munkafüzetnél megnyitáskor be kell állítani munkalaponként külön - külön, mert bezárással "elfelejti".    

A feloldás: Worksheet.Unprotect Password:= jelszo

Üdv.

Előzmény: local75 (37239)
local75 Creative Commons License 2023.06.06 0 0 37240

Elküldtem.

Gyakran dobja a spambe az emailjeimet a gmail, úgyhogy ott is nézd meg.

Előzmény: Garashan (37238)
local75 Creative Commons License 2023.06.06 0 0 37239

Köszi, működik.

Sajnos azonban nem minden munkalapon tudom alkalmazni, mert a makróim akadályba ütköznek.

Még a kimutatásszűrő is megakad.

 

 

Előzmény: Garashan (37237)
Garashan Creative Commons License 2023.06.06 0 0 37238

Dobj egy emailt és holnap leírom, hogy kell megcsinálni. Ennyire nyilvánosan nem szeretném kiírni.

Előzmény: local75 (37236)
Garashan Creative Commons License 2023.06.06 0 0 37237

A pipát ki kell venni, akkor nem lehet kijelölni. Illetve az objektumok tulajdonságai között be kell pipálni, hogy védettek legyenek. Bár elvileg alapértelmezetten azok.

Előzmény: local75 (37235)
local75 Creative Commons License 2023.06.06 0 0 37236

Hát, nem lenne rossz az egyiknél eltüntetni a lapvédelmet.. No, semmi rosszra ne gondolj, csak beszúrnék egy egy oszlopot hogy összesíteni tudjam a tételeket.

A megrendelt árukat, külön munkánál külön munkafüzetben szeretem kitölteni, hogy lássam mennyi a végösszeg.
És amikor elküldtem 1 emailben 3 excelt, azt mondták hogy írjam egybe, ők ezt nem összesítik. (???)

 

Mondom, bakker, nektek ezt megoldani semmibe sem telne, de pont letojta.. Így volt hogy 2 nap kihagyással küldözgettem nekik a megrendeléseket. :)

Előzmény: Garashan (37233)
local75 Creative Commons License 2023.06.06 0 0 37235

Előzmény: local75 (37234)
local75 Creative Commons License 2023.06.06 0 0 37234

Köszi

 

Talán valamit rosszul csinálok? Az alakzat ugyanúgy kijelölhető, szerkeszthető.

Beállítottam a füzetvédelmet is.

 

 

 

Előzmény: Garashan (37232)
Garashan Creative Commons License 2023.06.06 0 0 37233

Amúgy ezek a jelszavas védelmek pár perc alatt eltüntethetőek viszonylag egyszerű módon. Maga a jelszó nem fejthető vissza ilyen gyorsan, de törölni lehet és utána mindenhez teljes értékűen hozzá lehet férni.

Nagyon utáltam, amikor partnercég úgy küldött árjegyzéket, hogy nem lehetett cellákat kijelölni... Főleg amikor a több száz termékből csak 30 termék árára volt szükségem... Gyorsabb volt eltüntetni a védelmet, mint írogatni nekik, hogy küldjék el rendesen.

Megértem mondjuk az ő álláspontjukat is, hogy ezzel "védik" az áraikat, hogy ne lehessen azt mondani, hogy mást küldtek.

Garashan Creative Commons License 2023.06.06 0 0 37232

Véleményezés fül --> Védelem --> Lapvédelem

Ha aktiválva van, akkor be lehet állítani, hogy a zárolt cellákat vagy objektumokat ki se lehessen jelölni.

Valószínűleg csak a nem zárolt cellákhoz van engedélyezve a kijelölés és a módosítás.

Ahhoz hogy felold valószínűleg fog kelleni jelszó.

 

Előzmény: local75 (37229)
Garashan Creative Commons License 2023.06.06 0 0 37231

Véleményezés fül --> Védelem --> Füzetvédelem

Valószínűleg kell hozzá jelszó is.

Előzmény: tekeoff (37228)
local75 Creative Commons License 2023.06.06 0 0 37230

Na találtam 6db ilyen munkafüzetet, amelyben alakzatok, képek rögzítve vannak. Talán nem is olyan bonyolult ezt megoldani.

Azt mondjuk nem tudom hogy ha az alakzat csoportosítva van, és a csoporton belül van olyan button, amelyhez társítottam makrót, az működni fog-e?

 

Előzmény: local75 (37229)
local75 Creative Commons License 2023.06.06 0 0 37229

Az hogy lehet?

Van olyan munkafüzetem, amelyet egy partnercégtől kaptam, és a benne lévő fotókat még csak ki sem tudom jelölni. Csak néhány cellába tudok beírni, semmi mást nem tudok a munkafüzetben módosítani, csak amit ők engedélyeztek.

De tuti láttam már több ilyen munkafüzetet, amelyben rögzítve voltak a képek, csak most nem találok másikat.

 

A microsoft oldalán leírják hogyan lehet lapvédelemmel ellátni az objektumok szerkesztését, csak éppen az ég világon semmit nem csinál.

Még régebben volt egy publikus MS telefonszám, amelyen beszéltem a supporttal. Tudja valaki ezt a számot? Holnap felhívnám őket.

Előzmény: Fferenc50 (37224)
tekeoff Creative Commons License 2023.06.06 0 0 37228

Sziasztok!

 

Hogyan lehet feloldani a munkalap fülek "zártságát"? Se hozzáadni, se törölni, se átrendezni nem tudom. 

Delila10 Creative Commons License 2023.06.06 0 0 37227

Makróval

 

Sub tobbszorozes()

    Dim sor As Long, ide As Long, masol As Integer

   

    Sheets("Munka1").Select

    sor = 1

   

    Do While Cells(sor, 1) > ""

        For masol = 1 To Cells(sor, 2)

            Cells(sor, 1).Copy Sheets("Munka2").Cells(ide + 1, 1)

            ide = ide + 1

        Next

        sor = sor + 1

    Loop

End Sub

Előzmény: djuice (37225)
Garashan Creative Commons License 2023.06.06 0 0 37226

Parasztos módszert tudok rá:

Munka1 fülön van a felsorolásod, ahogy azt leírtad. Munka2-re pedig az alábbi képletek kellenek:

A1 cellába: =Munka1!A2

A2 cellába: =HA(SOR()<=SZUM(Munka1!B:B);HA(DARABTELI($A$1:A1;A1)<FKERES(A1;Munka1!A:B;2;HAMIS);A1;INDEX(Munka1!A:A;HOL.VAN(A1;Munka1!A:A;0)+1));"")

 

Ha nem az A1 cellába kerül az első kiadvány név, attól még az oda kerülő képlet még nem fog változni. De az A2 cellába írt képletem igen, méghozzá ahol az A1-re hivatkozok ott mindenhol át kell írni az új "A1"-re. Valamint a képlet elején a SOR()<=SZUM(Munka1!B:B) rész után még hozzá kell adni a szumma értékéhez annyit, ahány sorral lejjebb van az első sor. Tehát ha van egy fejléced és az első kiadvány neved a 4. sorban lesz, akkor 3-at kell hozzáadni.

Ha nagyon profik akarunk lenni, akkor be lehet építeni valahova egy ellenőrző cellát is, hogy elléggé le lett-e húzva a képlet vagy sem.

 

Makróval elegánsabban is meg lehet oldani, akkor nincsenek ilyen csúnya képletek benne :)

Előzmény: djuice (37225)
djuice Creative Commons License 2023.06.06 0 0 37225

Alábbi kérdés merült föl:

 

 

 A kiadványok sorainak annyiszor kéne ismétlődni egy átadási ívhez, amennyi a darabszám.

Ez már makrós ügy vagy van rá vmi képlet is esetleg?

Köszönöm!

Fferenc50 Creative Commons License 2023.06.04 0 0 37224

Szia!

Egy próba: Zárj be minden más munkafüzetet és úgy nézd meg.

Alakzatok ügye: Sajnos szerintem az alakzatokat nem lehet fix helyen rögzíteni, azok a munkalap görgetésével csúszkálnak. Tudom, útálni fogod, de ezt a problémát csak úgy lehet megoldani, ha Userformra helyezed az alakzatokat, mert a Userform viszont rögzíthető, lényegében a munkalap "felett" van. 

Üdv.

Előzmény: local75 (37222)
local75 Creative Commons License 2023.06.04 0 0 37223

Az alakzatok védelmét még nem sikerült megoldanom. Egyszerűen nem működik.

A lapvédelemben az Objektumok szerkesztését bejelöltem, de ugyanúgy nem történik semmi.

 

Ez így gáz, mert folyamatosan elcsúszkálnak az alakzatok.

 

Valaki ismeri ezeknek a működését?

Előzmény: local75 (37217)
local75 Creative Commons License 2023.06.04 0 0 37222

Szia!

Köszönöm szépen.

 

Átneveztem a module-okat VBA-ban, és az egyik makrómat (a makró hozzárendelésnél) nem hajlandó az egyszerű eredeti nevén megtalálni, csak a munkafüzet nevével kiegészítve.

Viszont a makró ott van a VBA-ban, és működik.

Vajon mi nem tetszik neki?

Előzmény: Fferenc50 (37221)
Fferenc50 Creative Commons License 2023.06.04 0 0 37221

Szia!

 Range("S35").Text & "-" & Format(Range("S36").Value,"mmm.dd")

Üdv.

Előzmény: local75 (37220)
local75 Creative Commons License 2023.06.04 0 0 37220

Még valami.

Szeretném ilyen formában beírni a dátumot:

2023. május 15.  -  jún. 24.

 

Most ilyen formában vannak a cellákban: 2023.06.04

Előzmény: local75 (37219)
local75 Creative Commons License 2023.06.04 0 0 37219

Segítségre van szükségem.

 

Van egy ilyen makróm:

 

ActiveSheet.Shapes.Range(Array("Rounded Rectangle 76")).Select
    Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Text = Range("S35").Text

 

Szeretném az alakzatba beírni az S36-os cella tartalmát is, és közéjük egy-egy kötőjelet 2-2 szóközzel.

 

Szóval most ez a makró beírja S35-ből a dátumot, 2023.06.04 és szeretnék még egy másik dátumot kötőjellel mögé írni, hogy így nézzen ki:

 

2023.06.04  -  2023.06.24

 

Ha egy mód van rá a cellákban való összefűzést szeretném kiváltani makróval.

djuice Creative Commons License 2023.06.04 0 0 37218

Köszönöm!

Előzmény: Fferenc50 (37215)
local75 Creative Commons License 2023.06.04 0 0 37217

Hogyan tudom az alakzatok módosítását, áthelyezését letiltani?

Már ott elakadtam hogy az Általános menüpontban, nem található a Futtatás fejlesztői módban lehetőség.

 

A másik nagy hiányosság amit észleltem hogy nem tudom az alakzatok helyzetét meghatározni.

Csak néhány gyári alakzat, diagram tudja.. Például a szeletelő. Miért nem alapvetés ez az excelben?

local75 Creative Commons License 2023.06.04 0 0 37216

Köszönöm szépen.

Ezek szerint a Range("cellaneve").Text a kulcs.

Előzmény: Fferenc50 (37212)
Fferenc50 Creative Commons License 2023.06.03 0 1 37215

Szia!

Az Excelnek is - mint minden rendszernek - megvannak a maga eszközei és szabályai. Ahhoz, hogy rendszeresen használni tudjuk, bizony meg kell ezekkel ismerkedni. Mivel elég sokat tud, ez nem kevés időt igényel - nem véletlenül vannak a tanfolyamok hozzá. (Gondolom, a javascriptet sem 2 óra alatt tanultad meg használni.)

Annyira sokrétű, hogy több évtizedes használat mellett is vannak olyan részei, amelyekkel nem is találkoztam a munkám során, így nem is ismerem. Amit ismerek, abban viszont szívesen segítek bárkinek.

További jó munkát - akár Excellel is Neked!

Üdv.

 

Előzmény: djuice (37214)
djuice Creative Commons License 2023.06.03 0 0 37214

Kis kiegészítés még a teljes megértéshez:

Szóval úgy jött elő a dolog, hogy megkért a titkárnő, segítsek már neki excelben, hogy egy névsorból azon személyek taj meg szig.számát szűrjük már le, akik versenyre jelentkeztek. (35 személy a 143-ból)

Neki megvolt kik mennek versenyre, én meg lekértem a tanulmányi rendszerből az adatokat excel exportként, de csak egybe mindenkiét tudja kihozni, s mondom akkor az fkeressel biztos megoldható lenne. Hozzá kell tenni, évek óta nem használtam semmire az fkerest, némi halvány emlékeim voltak róla, de mondom a fgv. súgó majd segít. Hát már túl porosak voltak ezek az emlékek, totál nem ugrott be ezek alapján, hogy kéne helyesen használni. Erre mondom, a titkárnő meg még ilyet nem is látott, azt se tudja mi az hogy fgv. és mire lehet használni, no aztán vak vezetett világtalant. :) 

Előzmény: djuice (37213)
djuice Creative Commons License 2023.06.03 -1 0 37213

Tehát itt megadtad, hogy 86 pont, az hanyas jegynek felel meg. Ez alapján érthető. Az összes többi körülírás, meg az excel fgv. leírása számomra vakablak a helyes működés kisilabizálása terén. És akkor mit mondjon egy titkárnő, aki annyit tud az excelről, hogy “az a kockás izé” és neki kéne megtanítani vagy magának eligazodni ilyen leírásokból. (Mondjuk az se volt normális, aki így bírt kitalálni algoritmusként egy keresési megoldást, de hát tudjuk, a windows se tökéletes.)

 

Köszi az erőfeszítést mellesleg. Ha magamnak csinálnám, lehet javascriptben hamarabb leprogramoztam volna tömbökkel a feladatot… :)

Előzmény: Fferenc50 (37210)

Ha kedveled azért, ha nem azért nyomj egy lájkot a Fórumért!