Keresés

Részletes keresés

Bali-G Creative Commons License 2023.01.30 0 0 36948

Sziasztok! 

 

Tud valki segíteni exelbe ?

Olyanba nem tudok megoldást találni ,de lehet nem is lehet vagy nincs rá...

Van egy munkafüzet,abba több lap .

Azt szertetném megcsinálni egyik lap(legyen ez Család)  B15-től  N15-ig (13 cella), a masik lap (legyen ez Laci) B7-től N7-ig ugyanazokat a számokat hozza ,ugy hogy a "Családba"hozza a "Laci"számokat!Ami nem is nehéz,DE  ha én Beszúrok egy sort 7-es sorba akkor ugye lejjebb jön egy sorral ami már nem feldi a 7 sort ,mert átugrik a B8-ra ,de nekem pont ez lenne a lényeg hogy fikszáljam a 7 -sort,bármi történik azt a 7 es sorbol merítsen másolandó adatot (Vagy Legyen mindig B7 ,max másolom oszloponként)

(A $ jelre nem találtam megoldást)

 

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

nagy2018 Creative Commons License 2023.01.30 0 0 36947

Nagyon köszönöm.

Most úgy működik a függvényed, hogy az AS-nek kisebbnek kell lenni, mint 18 és valamennyi további cella, tehát AT is, AU is és AV is ki kell legyen töltve, akkor írja ki, hogy "nincs". Nem így kellene a függvénynek működnie. Pontosítom és elnézést.

Variációk:

  1. Lehet, hogy csak AS<18 (tehát AS cella kitöltött) és ezzel együtt a többi cella, (AT, AU és AV) egyike sincs kitöltve.
  2. vagy lehet, hogy AS<18 és ezzel együtt az AT cella is ki van töltve. De ekkor az is lehet, hogy AS azért kisebb, mint 18, mert nincs is kitöltve AS cella.
  3. vagy lehet, hogy AS<18 és ezzel együtt az AU cella is ki van töltve. De ekkor az is lehet, hogy AS azért kisebb, mint 18, mert nincs is kitöltve AS cella.
  4. vagy lehet, hogy AS<18 és ezzel együtt az AV cella is ki van töltve. De ekkor az is lehet, hogy AS azért kisebb, mint 18, mert nincs is kitöltve AS cella.

Fáradozásodat köszönöm.

 



 

Előzmény: Garashan (36946)
Garashan Creative Commons License 2023.01.30 0 0 36946

Szia!

Nem voltam gépközelben a napokban.

 

A következőre jutottam:

=HA(AS1<18;HA(NEM(VAGY(ÜRES(AT1);ÜRES(AU1);ÜRES(AV1)));"nincs";"");HA(CJ1="";"";M1-CJ1) )

 

Egy dologra nem derült fény, hogy mi történjen:

Ha AS<18, de AT, AU és AV is üres. Most olyankor szimplán egy üres string a kimenet. Vagyis "".

 

Amúgy a matematikai logikában nagyon nem mindegy, hogy ÉS-t vagy VAGY-ot mondunk. Teljesen más az igazság táblája a kettőnek, így ugyan azon bemeneti paraméterek alapján más-más kimenet lehetséges.

Előzmény: nagy2018 (36940)
homerx Creative Commons License 2023.01.26 0 0 36945

a zember ott tud, ahol segit :)

Előzmény: hellsing (36944)
hellsing Creative Commons License 2023.01.26 0 0 36944

Köszönöm!

Előzmény: homerx (36943)
homerx Creative Commons License 2023.01.26 0 0 36943

en igy tudtam megoldani:

adatok ful

adatok beolvasasa - file-bol - xls-bol - kivalasztod a file-t

ekkor megnyilik egy kezelo felulet. ott kivalasztod a sheetet

alul az adatok atalakitasa gombot valasztos, ekkor megnyilik egy powerbi felulet.

ott kivalasztod a kerdeses oszlopot

majd az adattipusnal a datum lelyett szoveget valasztasz, majd a jelenlegi csereje gombra pottyintesz.

ezutan bezaras es betoltes ikonra, ami utan beolvassa a tablazatod, es a kerdeses oszlopban mar txt lesz es nem datum.

 

 

Előzmény: hellsing (36941)
homerx Creative Commons License 2023.01.26 0 0 36942

meghozza ezt a datumot jeloli rovid formaban: 4783.01.01

Előzmény: hellsing (36941)
hellsing Creative Commons License 2023.01.26 0 0 36941

'reggelt! Kaptam egy Excel 95 formátumú fájlt, amit fel kellene dolgoznom. Az egyik oszlop azonosítókat tartalmaz és néhányuk kötőjeles, pl. 4783-1. Nekem ez egyáltalán nem tűnik dátumnak, az Excel, a fájl megnyitásakor, mégis átkonvertálja. A 4783-1-ből jan.83 lesz.

 

A 4783-1 milyen logika mentén dátum, és hogy lehet a nyitáskori konvertálást megakadályozni? Próbáltam a Google-t, de nyitásra nem találtam megoldást, csak bevitelre.

nagy2018 Creative Commons License 2023.01.25 0 0 36940

Majdnem.  AT, AU vagy AV  is szám, csak nem mindig szerepel ezeknek a celláknak a valamelyikében szám.

Tehát:

1. Megnézi, hogy AS kisebb-e, mint 18

2. Utána megnézi, hogy AT vagy AU vagy AV kitöltött-e, tehát van e benne szám.

(Van olyan eset, hogy csak AS kitöltött. Van, hogy ennek a négynek valamelyik kombinációja.) 

3. Ha tehát AS<18 és/vagy AT és/vagy AU és/vagy AV kitöltött, akkor írja ki, hogy "nincs". (A másik képlet nem fut le.)

 

4. Ha viszont AS>= 18, akkor a másik képlet a =HA(CJ1="";"";M1-CJ1)  fut le. (Ilyenkor az AT, AU, AV -be tuti nincs szám, ezzel nem kell foglalkoznia.)

(A CJ értékét az egyszerűség kedvéért most mégis inkább kivettem a vizsgálandók közül.)

Nagyon  köszönöm, hogy foglalkozol vele.

 

 

Előzmény: Garashan (36939)
Garashan Creative Commons License 2023.01.25 0 0 36939

Tehát a következőre lenne szükséged?

 

(AS1<=18) ÉS [AT1 vagy AU1 vagy AV1 szám]

Ez a következőt csinálja megnézi, hogy AS1 kisebb egyenlő e mint 18 és mellé megnézi, hogy AT, AU VAGY AV közül tartalmaz e valamelyik számot.

Tehát ha AS nagyobb mint 18, akkor hamis és másik képlet fut le

Ha AT, AU vagy AV közül egyik se szám, akkor szintén hamis és az előző képlet fut le

Ha AS<=18 és valamelyik szám AT, AU vagy AV közül, akkor írja ki, hogy nincs

Ha pedig a fenti leírás alapján hamis az eredmény, akkor kellene megvizsgálni CJ1 értékét?

 

Jól értelmeztem? Mondjuk szerintem nem :-)

A lényeg, hogy írd meg, hogy pontosan mit mi után vizsgáljon és mi legyen a vizsgálat eredményétől függő képlet.

Előzmény: nagy2018 (36938)
nagy2018 Creative Commons License 2023.01.25 0 0 36938

A másik függvényhez is szeretném a segítségeteket kérni. 

A CA1 cellában a következő függvényem van: =HA(CJ1="";"";M1-CJ1)

 

Ezt kellene kiegészíteni arra, ha a AS1 cellába 18 vagy kisebb szám szerepel, illetve ha AT1 vagy AU1 vagy AV1 cellában szerepel valamilyen szám (tehát kitöltött), akkor az adott (CA1) cellába írja ki, hogy "nincs". De vizsgálja meg azt is, hogy CJ1-ben van e adat, mert akkor marad az alap =HA(CJ1="";"";M1-CJ1) függvény és nem kell a AS1, AT1, AU1, AV1 cellákkal foglalkoznia. 

 

Előre is nagyon köszönöm. Hatalmas segítség vagytok.

nagy2018 Creative Commons License 2023.01.25 0 0 36937

Köszönöm a fáradozást.

Előzmény: pimre (36933)
nagy2018 Creative Commons License 2023.01.25 0 0 36936

Elnézést, most látom, hogy valóban elírtam. Mea culpa. Nagyon szépen működik. Köszönöm szépen.

Előzmény: Garashan (36935)
Garashan Creative Commons License 2023.01.24 0 0 36935

Ha a W oszlop mindig kisebb (korábbi), mint az AA oszlop, akkor természetes, hogy "rossz" a képlet.

 

Mi ebből indultunk ki:

=HA(W2-AA2<16;"nincs";"").

Ebből rögtön látszik, hogy ha W2<AA2, akkor W2-AA2 mindig kisebb lesz, mint 16 (de még nullánál is). 

 

Átírtam a képletet:

=HA(HA(ÉS(HAHIBA(ÉV(W1);HAMIS);HAHIBA(ÉV(AA1);HAMIS));TÖRTÉV(W1;AA1);TÖRTÉV(HA(HAHIBA(ÉV(W1);HAMIS);DÁTUM(ÉV(W1)+400;HÓNAP(W1);NAP(W1));DÁTUM(BAL(W1;4)+400;KÖZÉP(W1;6;2);KÖZÉP(W1;9;2)));HA(HAHIBA(ÉV(AA1);HAMIS);DÁTUM(ÉV(AA1)+400;HÓNAP(AA1);NAP(AA1));DÁTUM(BAL(AA1;4)+400;KÖZÉP(AA1;6;2);KÖZÉP(AA1;9;2)))))<=16;"nincs";"")

 

Annyiban változott, hogy bele vettem a törtév függvényt is. Mivel nem tudjuk pontosan, hogy az adott 16 évben mennyi szökőév van, így nem tudjuk, hogy pontosan hány nap is a 16 év. Ez elvileg kiküszöböli ezt a problémát is.

Előzmény: nagy2018 (36934)
nagy2018 Creative Commons License 2023.01.23 0 0 36934

A W oszlop időben mindig korábbi, mint az AA oszlop. 

Előzmény: Garashan (36932)
pimre Creative Commons License 2023.01.23 0 1 36933

A hibás hivatkozást valóban elnéztem. Köszönöm az észrevételt. Kipróbálva azért nem vettem észre, mert a W1 kisebb volt 1900-nál, és az üres AW1 nem zavart be. Pontosabban a hiba abban a képletben volt, ami a helyesen megadott W1-ben lévő évszámot korrigálja, így nem derült ki. Valószínűleg akkor jött volna elő, ha mindkét évszám 1900 feletti.

 

A másik észrevételed "amit nem kezel a függvényed, hogy mi van, ha az egyik dátum kisebb mint 1900, de a másik nagyobb mint 1900. Akkor csak az egyik évszámot növeli meg 400 évvel." téves. Ugyanis a mindkét képletben szereplő VAGY függvény éppen azt nézi, hogy ha bármelyik kisebb 1900-nál, akkor emelje meg az évszámot 400-al. Igaz, azzal nem fárasztottam magam, hogy azt az esetet is teszteljem, amikor csak az egyik évszám 1900 alatti, de nem hinném, hogy emiatt hibásan működött volna a képlet. 

 

Az összegyúráshoz gratulálok. Ahogy írtam, nekem valahogy nem jött össze. 

Előzmény: Garashan (36930)
Garashan Creative Commons License 2023.01.23 0 0 36932

Pontosan mit szeretnél, hogy összehasonlítson az Excel?

Most ugyebár feltételezi azt, hogy az AA oszlopban lévő dátum korábbi, mint a W oszlopban lévő. Ha viszont ez is lehet későbbi, meg az is, akkor kellene még egy abszolút értéket venni és úgy összehasonlítani 16*365-el a kettő különbségét.

Előzmény: nagy2018 (36931)
nagy2018 Creative Commons License 2023.01.23 0 0 36931

Köszönöm fáradozásodat. Az általam kért 1. és 2. függvény két külön függvény, két külön cellába is íródna. Ami ezek szerint nem volt teljesen világos. A 16 az nem nap, hanem év. Átírtam ennek megfelelően az értéket. De lehet, hogy ez így mégsem jó. Nagyobb értéknél is kiírja a nincset.

 

Előzmény: Garashan (36930)
Garashan Creative Commons License 2023.01.22 0 0 36930

Szerintem az első általad megadott függvény hibás. AW oszlopra hivatkozol AA helyett. Illetve amit nem kezel a függvényed, hogy mi van, ha az egyik dátum kisebb mint 1900, de a másik nagyobb mint 1900. Akkor csak az egyik évszámot növeli meg 400 évvel.

Illetve a következő hibát vettem még észre: ha kellően kicsi dátumot írunk be, de nagyobbat mint 1900, akkor előfordulhat az, hogy "BAL(W1;4)+0<1900" igaz lesz, mert ha W1 "rendes" dátum, akkor számként kezeli az Excel és ha W1 kisebb, mint 1905.03.14, akkor a szám értéke kevesebb lesz, mint 1900.

 

Én összegyúrtam egy képletbe a két függvényt.
=HA(HA(ÉS(HAHIBA(ÉV(W1);HAMIS);HAHIBA(ÉV(AA1);HAMIS));W1-AA1;HA(HAHIBA(ÉV(W1);HAMIS);DÁTUM(ÉV(W1)+400;HÓNAP(W1);NAP(W1));DÁTUM(BAL(W1;4)+400;KÖZÉP(W1;6;2);KÖZÉP(W1;9;2)))-HA(HAHIBA(ÉV(AA1);HAMIS);DÁTUM(ÉV(AA1)+400;HÓNAP(AA1);NAP(AA1));DÁTUM(BAL(AA1;4)+400;KÖZÉP(AA1;6;2);KÖZÉP(AA1;9;2))))<16;"nincs";"")

Ez elvileg 1. körben megvizsgálja, hogy valamelyik dátum 1900-nál kisebb-e vagy sem.

Ha egyik sem kisebb, mint 1900, akkor kivonja egyszerűen egymásból őket.

Ha valamelyik kisebb, mint 1900, akkor mindentől függetlenül mindkét dátum évszámát megnöveli 400-al. Bár előtte ellenőrzi, hogy a dátum helyes dátum-e, mert ha igen, akkor más módon kell az évszámot megnövelni.

 

Ismert hiba: ha a dátum szökőévre esik. Ha jól tudom, akkor a szökőévre a következő szabályok vonatkoznak: minden 4-el maradék nélkül osztható évben van szökőév. Ez alól kivételt képeznek a század fordulók. De ha a század forduló egyben ezred forduló is, akkor van szökőév. Tehát 2000-ben volt szökőév, de 2100-ban nem lesz.

Vissza szívtam, én tudtam rosszul/rosszul emlékeztem. Nem ezredfordulónként van mégis szökőév, hanem ha 400-al is osztható maradék nélkül az évszám. Tehát ha 400-at adunk hozzá, akkor pont jó is.

 

Amúgy nem tudom, hogy a kérdező pontosan mit szeretett volna: most ha W1 maximum 16 nappal van később, mint  AA1, akkor írja a nincset.

Előzmény: pimre (36928)
nagy2018 Creative Commons License 2023.01.22 0 0 36929

Köszönöm, nézem.

Előzmény: pimre (36928)
pimre Creative Commons License 2023.01.22 0 0 36928

Az 1900-as korlát máig megvan. Ezért javaslom, hogy vegyél fel segédoszlopokat az alábbiak szerint:

 

A W1 helyett egy segédoszlopba a következőt írd: 

=HA(VAGY(BAL(W1;4)+0<1900;BAL(AW1;4)+0<1900);BAL(W1;4)+400 & KÖZÉP(W1;5;6);W1)

 

Az AA1 helyett pedog ezt:

=HA(VAGY(BAL(W1;4)+0<1900;BAL(AA1;4)+0<1900);BAL(AA1;4)+400 & KÖZÉP(AA1;5;6);AA1)

 

És ezekkel számolj. 

 

Elvileg lehet közvetlenül is, csak az már nagyon bonyolult lett, és nekem nem sikerült segédoszlopok nélkül megcsinálni. Ha valaki meg tudja oldani, azt szívesen veszem.

 

Persze képlet 1582. február 24 előtti időpontok esetén nem lesz jó, mert ekkor került bevezetésre a Gergely naptár. Előtte más volt a számítás. Egyébként a 400 évvel való növelés is azért van, mert az 1500 utáni éveket ezzel megnövelve 1900 utánit kapunk, amivel már tud számolni az Excel.

 

Az M1 és a CJ1 oszlopokat a fenti képletekkel (mutatis mutandis) tudod átalakítani.

 

 

Előzmény: nagy2018 (36926)
nagy2018 Creative Commons License 2023.01.22 0 0 36927

Az előzőben egy kis elírás: 

CJ2ben van adat, akkor helyette érvényesüljön a =HA(CJ2="";"";M2-CJ2) itt a cellák is az első sorban vannak. CJ1 és M1. Köszönöm.

nagy2018 Creative Commons License 2023.01.22 0 0 36926

Két függvényhez szeretnék segítséget kérni. Előre jelzem, hogy 2013-as magyar excelem van. 1900 előtti és 1900 utáni dátumokat kell kezeljen a függvény. Dátum beállítás jó.

 

 

1. A függvényem =HA(W2-AA2<16;"nincs";"").

AA2 és W2 év, hónap, nap dátumok. A cellák formátuma dátum. Ezt kellene átalakítani úgy, hogy erre a speciális dátumra működjön. 

 

2. A másik függvény 

HA AS1 cella értéke kisebb mint 18 és/vagy AT1 cella és/vagy AU1 és/vagy AV1 cella kitöltött, akkor a CA1 cellába NINCS kerüljön beírásra de ha a CJ2ben van adat, akkor helyette érvényesüljön a =HA(CJ2="";"";M2-CJ2) függvény.

 

Segítségeteket előre is köszönöm.

_Nyuszi Creative Commons License 2023.01.19 0 0 36925

Igazad van, elnézést!

Előzmény: Eredő Vektor (36910)
Garashan Creative Commons License 2023.01.16 0 0 36924

Te azt mondtad eredetileg, hogy mindig 10 fordulatot veszel alapul. Amit figyelembe véve a leírásodat, hogy 1000 fordulat 1kWh, így a 10 fordulat 10Wh lesz.
Tehát az adott idő alatt végzett munka (ergo elektromos fogyasztás) állandó, mindig 10Wh.
A 10Wh munka elvégzéséhez szükséges idő változik, ezt fogod mérni stopperrel. Ha pedig ezután leosztod a 10Wh munkát a stopperrel mért idővel, akkor megkapod, hogy mennyi volt az átlagos teljesítmény azon időszak alatt, amíg mérted az időt.

Csináltam egy gyors grafikont is, gyakorlatilag a Te villanyorád a piros vonalat méri, vagyis pontosabban a piros satírozást, az lenne a villamos munka. Ami a pillanatnyi villamos teljesítmény (VA [volt-amper] az y tengelyen osztva 3600-al, 1VA=1W) az idő függvényében (ez lenne az x tengely).

Te pedig arra vagy kíváncsi, hogy mekkora átlagos teljesítmény kell ahhoz, hogy ugyan annyi idő alatt ugyan annyi munkát végezzen, mint amit te mértél az előbb. Ez pedig a zöld vonal alatti satírozás lenne. Itt ha nem vágtam volna le a grafikon szélét, akkor kijönne, hogy ~0,8 az érték, aminek a mértékegysége VA/3600. Ezt ha beszoroznánk az x tengelyen leolvasott értékkel (12,56 s), akkor ki is jön a 10Wh.
Csak kényelmi okokból volt a watt 3600-ad része ábrázolva az y tengelyen, mert ha azt felszorozzuk 3600, akkor kapjuk meg a wattot, de az idő tengelyen ábrázolt secundumot amúgy is le kellett volna osztani 3600-al, hogy átváltsuk órába, így viszont meg volt spórolva egy osztás.
De a számoktól el is vonatkoztathatsz, a lényeg, hogy ha 10 korülfordulást mérsz az mindig 10Wh-nyi munka lesz, amit ha egy lineáris teljesítményű géppel akarsz kiváltani, akkor vissza kell számolnod Jimmy the Hand táblázatának megfelelően. Ergo azt mondod meg, hogy ha ugyan ennyi ideig, mint amennyit mértél mekkora teljesítményű gépnek kellett volna mennie, hogy ugyan úgy 10Wh-nyi munkát végezzen.

Előzmény: Garashan (36923)
Garashan Creative Commons License 2023.01.16 0 0 36923

Most megint belevitted magadat a málnásba....
1000 fordulat 1kWh. Jimmy the Hand táblázata alapján, ha 10 fordulatot tesz meg a számláló 1 másodperc alatt, akkor az átlagos teljesítmény 36kW.

Előzmény: Sparherd (36922)
Sparherd Creative Commons License 2023.01.16 0 0 36922

Óh, persze, ott a kulcs, 36 fordulat 1kWh - időnként értelmi fogyatékos vagyok. :-(((

Előzmény: Törölt nick (36918)
Sparherd Creative Commons License 2023.01.16 0 0 36921

Oáááá, akkor beírom, hogy más is értse:

A fordulatszám és a munka azonos érték, de más a fizikai tartalma, ezért mentem be az erdőbe - csak éppem elvesztem, nem gyűjtöttem semmit.

Nagyon köszönöm, sajnos fizikával mindig hadilábon álltam, igaz, néha az egész osztály se tudott megoldani bizonyos példákat, talán nem a negyven gyerek volt csakis az oka.

Előzmény: Törölt nick (36919)
Ketele69 Creative Commons License 2023.01.15 0 0 36920

Nagyon szépen köszönöm!

Nem is gondoltam, hogy ilyen egyszerű lesz a megoldás.

Előzmény: Delila10 (36912)
Törölt nick Creative Commons License 2023.01.15 0 0 36919

"ha pl. a 10 fordulatot pl. 23 mp alatt mérem, akkor hogyan adja ki a táblázat a fogyasztást Wh-ában?"

 

Ha fogyasztás alatt a munkát érted - mert a Wh mértékegység erre utal - , akkor az 10 fordulat alatt 10Wh lesz, akárhány másodperc alatt történik meg.

Hiszen ugye azzal kezdted, hogy 1000 fordulat = 1 kWh = 1000 Wh.

 

Az időméréssel a teljesítményt tudod meghatározni, aminek viszont W a mértékegysége, és munka/idő a dimenziója.

Előzmény: Sparherd (36917)
Törölt nick Creative Commons License 2023.01.15 0 0 36918

Nem valami ilyesmi kellene neked?

 

Előzmény: Sparherd (36913)
Sparherd Creative Commons License 2023.01.14 0 0 36917

Igen, a reciprokát írtam az első két oszlopba, azok jók, ha 10Wh van, akkor annak hatvanada van egy perc alatt, és annak hatvanada egy mp alatt.

A harmadik-negyedik oszlopban viszont a reciproka van, ha azt tízzel megszorzom, bejön az összeföggés, amit írtál.

 

De továbbra se látom a megoldást, ha pl. a 10 fordulatot pl. 23 mp alatt mérem, akkor hogyan adja ki a táblázat a fogyasztást Wh-ában?

 

Előzmény: Garashan (36915)
Sparherd Creative Commons License 2023.01.14 0 0 36916

odamegyek stopperrel, lemérem, hogy tíz fordulat mennyi idő alatt történik, megszprzpm százzal és máris tudom majd, hogy mekkora a pillanatnyi fogyasztás.

Ennyi kellene, hogy pl. 10 fordulat 23 mp alatt megvan, akkor azonnal lehessen látni, mekkora a fogyasztás, de a táblázat valamiért nem jó.

Előzmény: pimre (36914)
Garashan Creative Commons License 2023.01.14 0 0 36915

Szerintem az átváltásokkal lesz baj:

1Wh=60Wmin=3600Wsec

Előzmény: Sparherd (36913)
pimre Creative Commons License 2023.01.14 0 0 36914

Mit akarsz megtudni? Meg mihez kell az egész táblázat? Meg mihez kell a stopper?

 

Írd fel az óraállást egy adott időpontban, aztán olvasd le 1 óra, 1 nap vagy 1 hónap múlva, és a két leolvasás közötti különbség adja ki az adott időszak fogyasztását.

Előzmény: Sparherd (36913)
Sparherd Creative Commons License 2023.01.13 0 0 36913

Hali, ha valakinek most olyanja van, hogy szívesen belerúgna valakibe, jelentkezem, mert talán ettől végre észre térek.

 

Csatolom a képet, hogy érthető legyen, egy fogyassztásmérővel voltak problémák, megnéztem, hogy ezer fordulat 1kWh és leintettem mindenkit, hogy majd odamegyek stopperrel, lemérem, hogy tíz fordulat mennyi idő alatt történik, megszprzpm százzal és máris tudom majd, hogy mekkora a pillanatnyi fogyasztás.

Megcsináltam ezt a segédtáblázastot is hozzá, ránézésre egy óvodás is látja, hogy valami hülyeség, de nem jövök rá, hogy mi az. :-(((((

 

Az indoklás:

az első oszlop a mérő fordulata tizesével, mellette a percenkénti és másodpercenkénti fogyasztás, mellettük azok reciprokai, hogy a fordulatot ne kelljen számolgatni, csak rábökjek az adott sorra, hogy nagyjából annyi.

 

Delila10 Creative Commons License 2023.01.11 0 0 36912

A cellaformátum legyen a hivatkozott cellákban 0,00 és egy szóköz. Ez 2 tizedesig mutatja az eredeti szám ezred részét. 

Előzmény: Ketele69 (36911)
Ketele69 Creative Commons License 2023.01.11 0 0 36911

Sziasztok!

 

Van egy táblám rengeteg oszloppal és sorral, értékek eFt-ban. Néha a táblát elő kell állítanom (!) MFt-ban is. Ezt úgy oldottam meg, hogy az eFt-os táblát lemásoltam egy új munkalapra és hivatkozom az eFt-os táblára, ahol szám van a cellában osztom 1.000-rel.

 

Ez működik is, csak az eFt-os tábla szerkezete gyakran módosul: sorok/oszlopok jönnek-mennek, cellák egyesülnek…..ilyenkor pedig mindig utána kell állítanom a MFt-os táblát.

 

Van egyszerűbb módszer a MFt-os tábla létrehozására, illetve a változások követésére?

 

Köszönöm.

Eredő Vektor Creative Commons License 2023.01.10 0 0 36910

Nem igazán jók. Egyedül  a részösszeg fgv képes figyelmen kívül hagyni a kiszűrt cellákat.

Előzmény: _Nyuszi (36909)
_Nyuszi Creative Commons License 2023.01.09 0 0 36909

Esetleg a SZUMHATÖBB vagy DARABHATÖBB.

Ha jól értem, a végcélhoz ezek is megfelelőek lehetnek.

Előzmény: Eredő Vektor (36907)
djuice Creative Commons License 2023.01.08 0 0 36908

kérdés, hogy mely függvénnyel csinálod?”

 

Sima summa fgv. használtam volna. De végül eszembe jutott egy régi megoldás: a köv. cellához hozzáadom növekménysen az előzőt és kiválogatom a max. értékeket.

Őszintén szólva az auto szűrőket nemigen kellett még használnom, így nem tudom mire is lettek kitalálva, csak láttam hogy van az is, aztán csak jó vmire…

Előzmény: Eredő Vektor (36907)
Eredő Vektor Creative Commons License 2023.01.05 0 0 36907

Ahogy írod: Inkább "kimutatás"

Miegyébként a RÉSZÖSSZEG() függvény pontosan erre való. Tehát a kérdés, hogy mely függvénnyel csinálod? Ezzel? Mert ennek mennie kell.

Előzmény: djuice (36906)
djuice Creative Commons License 2023.01.05 0 0 36906

Sziasztok!

 

Ezt az Excel szűrőt igazából hogy lehetne helyesen használni?

 

Probléma:

Van egy majd 600 soros kiadási tételekből álló táblám és egy üres oszlopban végigmentem, felcímkéztem a tételeket egyesével, hogy kategória szúréseket lehessen csinálni köztük. (Pl. élelmiszer, műszaki cikk, vegyes, közlekedés, banki költségek stb...)

Beállítottam a fejlécre az auto szűrőt és csináltam a 600. sorban (ahol már nincs adat) egy szummázó cellát. Azt szeretném elérni, hogy mikor melyik tételkategóriát választom ki, csak azok részösszegeit adja össze, de valahogy nem működik. :( 

A végcél persze az lenne, hogy szépen kategóriánként kihozni a megfelelő tételek végösszegeit vagy ahhoz ez nem is járható út mindez? Vagy arra volna jó pl. a kimutatás?

 

Köszi!

Delila10 Creative Commons License 2022.12.30 0 0 36905

Szívesen.

 

Ez 3 függvény, egy képletbe beágyazva.

Előzmény: bé.laci (36904)
bé.laci Creative Commons License 2022.12.29 0 0 36904

Köszönöm szépen!

 

Nem ismertem ezt a képletet!

Előzmény: Delila10 (36903)
Delila10 Creative Commons License 2022.12.29 0 0 36903

A segédoszlopba írd ezt a képletet:

 

=HA(SZÁM(SZÖVEG.KERES("SP";U4));"Spec";"Nem spec")

Előzmény: bé.laci (36902)
bé.laci Creative Commons License 2022.12.29 0 0 36902

Sziasztok!

 

Szeretnék egy kis segítséget kérni.

 

Adott egy táblázat U oszlopa, ahol cikk kódok találhatóak. Ezek közt vannak speciális elemek, melyeket az "SP" betűjel is jelöl.

 

Sajnos ezek több helyen is lehetnek a cikkódban, tehát változó számú karakter lehet előttük és mögöttük.

 

Egy segédoszlopban hogy tudnám megjeleníteni, hogy az adott sor U oszlopában levő cellában speciális vagy nem speciális cikkszám/elem található, vagyis hogy a cikkód tartalmazza-e az"SP" kifejezést.

 

Hogy tudom paraméterezni a HA függvényt? A "*SP*"-vel próbálkoztam, de nyilvánvalóan hiába.

 

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

 

 

 

 

 

 

 

 

Delila10 Creative Commons License 2022.12.27 0 0 36901

Szívesen. :)

Előzmény: berde (36900)
berde Creative Commons License 2022.12.27 0 0 36900

Köszönöm a segítséget ! 

Előzmény: Delila10 (36899)
Delila10 Creative Commons License 2022.12.27 0 0 36899

Egy rövid kis makró megoldja.

Ha nem az A oszlopban vannak ezek az adatok, az "A"-t írd át mindkét helyen az oszlopod betűjelére.

A füzetet makróbarátként kell mentened, amennyiben később is futtatni akarod a makrót.

 

Sub BoldSzamok()

    'Az A oszlopban lévő adatokat formázza

    Dim sor As Long

   

    sor = 2 'az első adatot tarlamazó sor

    Do While Cells(sor, "A") <> ""

        Cells(sor, "A").Characters(Start:=8, Length:=4).Font.Bold = True

        sor = sor + 1

    Loop

End Sub

Előzmény: berde (36898)
berde Creative Commons License 2022.12.27 0 0 36898

Tisztelt fórumozók a következő kérdésem lenne az excelben történő cellán belülei formázásra . A cella mindig két betú és 10számal kerül kitültésre pl: HU3132356207 .Azt szereteném hogy minden 6,7,8,9 szám karakter félkövér lenne pl HU3132356207 . hogy oldaható ez meg ? tudtok benne segíteni ? 

köszönerttel BS 

Delila10 Creative Commons License 2022.12.13 0 0 36897

adatot -> adatod

Előzmény: Delila10 (36896)
Delila10 Creative Commons License 2022.12.13 0 0 36896

Ha a többi adatot is ilyen, mint a feltett ábrában, akkor a képlet

 

=HA(ÉS(KÖZÉP(CA1;6;1)=" ";KÖZÉP(CA1;16;1)="");KÖZÉP(CA1;7;9);"")

Előzmény: NyB84 (36891)
m54-b Creative Commons License 2022.12.13 0 0 36895

A CA és CB oszlopokat átmásolod Wordbe, ott futtatod a következő makrót

 

Sub betu_szam_masol()

For i = 1 To ActiveDocument.Tables(1).Rows.Count
ActiveDocument.Tables(1).Cell(i, 1).Select

    Selection.Find.ClearFormatting
    With Selection.Find
        .Text = "^$^$^$^#^#^#^#^#^#"
        .Replacement.Text = ""
     End With
    With Selection
    .Find.Execute
      If Selection.Find.Found Then
        Selection.Copy
        ActiveDocument.Tables(1).Cell(i, 2).Select
        Selection.Paste
      End If
    End With
 Next i
 
End Sub

Az én teszt táblámban működött. Kissé lassú, de egy alkalomra jó lesz.

 

Előzmény: NyB84 (36891)
pimre Creative Commons License 2022.12.13 0 0 36894

Sajnos nem foglalkoztama konkrét megvalósítással, és most időm sincs elmélyedni benne, de valami ilyen RegExp kifejezést alkalmazék a hasonlításra: "/s[0-9]{3}[A-Z]{5}/s"

Előzmény: pimre (36893)
pimre Creative Commons License 2022.12.13 0 0 36893

Nem a regex lenne erre az ideális?

Előzmény: Fferi50 (36892)
Fferi50 Creative Commons License 2022.12.13 0 0 36892

Szia!

Az azonosítók mindig pirossal vannak vagy csak a szemléltetés kedvéért lett piros?

Ha mindig piros, akkor makróval ki lehet szedni.

Ha nem piros, akkor valamilyen szabályt kellene hozzá találni, akkor működhet függvénnyel.

Üdv.

Előzmény: NyB84 (36891)
NyB84 Creative Commons License 2022.12.13 0 0 36891

Sziasztok!

 

Egy olyan problémával fordulok hozzátok, hogy van egy viszonylag nagy (1-2000 sorból álló) excel táblázatom, melynek a CA oszlopában lévő cellák olyan stringek, melyek egy 9 karatkerből álló azonosítót tartalmazhatnak (de nem minden cella esetében).
Ezek az azonosítók 3 betűből és 6 számból állnak (pirossal jelölve). Tudnátok olyan függvényt / makrót javasolni, mellyel ezeket a CA oszlop celláiban rejtőző XXX000000 formátumú szövegrészeket a CB oszlopban "ki tudnám nyerni"? Előre is köszönöm a tippeket.

 

NyB84 Creative Commons License 2022.12.13 0 0 36890

Sziasztok!

 

Egy olyan problémával fordulok hozzátok, hogy van egy viszonylag nagy (1-2000 sorból álló) excel táblázatom, melynek a CA oszlopában lévő cellák olyan stringek, melyek egy 9 karatkerből álló azonosítót tartalmazhatnak (de nem minden cella esetében).
Ezek az azonosítók 3 betűből és 6 számból állnak (pirossal jelölve). Tudnátok olyan függvényt / makrót javasolni, mellyel ezeket a CA oszlop celláiban rejtőző XXX000000 formátumú szövegrészeket a CB oszlopban "ki tudnám nyerni"? Előre is köszönöm a tippeket.

m54-b Creative Commons License 2022.12.13 0 0 36889

m54 USB:

 

Működik USB-ről IS! DE nem kell neki USB. A gépeden bárhova kicsomagolod és kész.

 

 

Előzmény: futatata (36888)
futatata Creative Commons License 2022.12.13 0 0 36888

Nagyon-nagyon köszönöm mindenkinek az összes reagálást, nem értem mindegyiket, néhány információt tudok csak írni, hátha megértjük egymást.

 

36861-ben leírtam néhány példát, többen írtátok, hogy ezek nem jók.

Jó lenne, ha megírnátok, hogy mi és miért nem jó, mert pont az most a jó, hogy új évben újat lehet csinálni, mert a GDPR miatt minden évben új kell, az előző évieket törölni kell.

 

Egy példa, a tagdíj befizetés.

Volt, aki kinyomtatta a tagnévsort, és aki befizette a tagdíjat, azok nevét kihúzta a listáról és csak azt írta be, hogy aznap mennyi pénz folyt be és hányan fizettek.

Az utolsó néhány nevet azután kinyomtatta és ment a személyes nyomásgyakorlás, hogy "miattatok kellett még egy lapot kinyomtatni, mert ti még nem fizettetek".

De volt, aki több évre fizetett tagdíjat, azt adományként kezelték és csillagozás volt, hogy jövőre nem kérnek töle pénzt.

Volt aki egy üres papírt tett ki, csak "dátum és tagdíj" felirattal, aki fizetett, valami macskakaparást tett oda, utólag találd ki, hogy ki volt az - vagy, ha odaírta, hogy "Imre", akkor melyik Imre volt?

 

Aki értetlenkedett: igen, office és webtárhely meg internet előfizetés és még valami néhány éves adomány volt, idén lejár és már a webezés is probléma, és senki se nézte a weboldalt, az is megszűnt, marad a PC.

 

 

Természetesen elolvastam a fórumban korábban írtak egy részét és mélyen meghajlok a tudásotok előtt, nagyon profi programozók lehettek. Én csak nyomkodom a gombokat.

 

Annak örülök, hogy sikerült elérnünk, hogy a 36861-ben írtak nincsenek külön, mert korábban minden külön helyen volt, jellemzően szövegként megírva, kinyomtatva, amire a jelenlévők tollal megjegyzéseket írtak, vagy aláírtak, jó esetben újra be lett gépelve, amit írtak, de többnyire "nem tudtuk elolvasni" címszóval kimaradt, és ami ki lett nyomtatva, azt úgy kellett a papírok között visszakeresni.

 

Arra jöttem rá, hogy a problémák döntő része mindig abból van, hogy nem tudják, hogy korábban ki csinálta, mert személyes beszélgetések voltak.

 

36861-et újra megnézve ugyan azt látom, amire korábban rájöttem:

Mindenhol szerepel legalább egyszer egy név, aki csinált valamit, így ez a fontos.

 

Néhány esetben - például a játszmák - két név kell.

Vagy a gyűléseknél is, többnyire két név kell, hogy ki volt a levezető elnök, és ki írta le, hogy mi történt.

 

Azután vannak a bonyolultabb dolgok, amikor kettőnél több név is lehet, például jelenléti ív.

Ezt meg lehet csinálni úgy, hogy van egy jelenléti ív, és aki akkor ott van, aláír, és van sok név.

De meg lehet csinálni úgy is, mint a tagdíjbefizetést, hogy ott a név lista, és aki ott van, annál ott a pipa, hogy ott volt, és akkor adott névhez adott dátum tartozik a megjegyzéssel, hogy ott volt.

 

Szóval, nekem ez így teljesen érthető, ha megírnátok, hogy nektek miért nem, talán megokosodnék.

 

m54 USB:

Köszönöm, tehát akkor elvileg bármilyen windows alatt működik, ami USB-t kezel?

Nincsen kizárás, hogy ilyen kütyü, meg olyan böngésző, meg a setup-ban le kell tiltani a kukikat vagy be kell írni valamit valahova, egyszerűen megy?

 

SQL:

köszönöm, de az is angolul van, és weben, idő kell hozzá.

 

ZX:

Igen, nekem nagyon jónak tűnik az a megoldás, ha egy listám van csak kinyomtatva, hogy a 26 betűhöz milyen 26 féle adat tartozik, és az adott névhez melyik típuső adatba kell beírni az információt. (Illetve csak húszhoz, mert mondjuk 6 már foglalt az illető neve, a dátum, és más miatt)

 

Ott az a jó, hogy ki lehet választani, hogy milyen adatokat akarsz egyszerre látni.

A fenti példáknál maradva, ha a tagdíjbefizetés van, akkor az egyik képernyőn azt lehet látni, hogy a nevek abc sorrendben és a dátumok, hogy mikor fizették be a tagdíjat.

Egy másik képernyőn pedig ay van, hogy adott dátumnál kik fizették be a tagdíjat,

Nyílván, ha valakire vagyok kíváncsi, akkor az elsőt nézem. Ha az érdekel, hogy melyik nap mennyien fizettek, akkor a másodikat.

Legalábbis nekem így logikus.

 

VÉGÜL:

Köszönöm még egyszer mindenkinek, csak írjátok meg, hogy a 36861-el mi a baj?

 

m54-b Creative Commons License 2022.12.13 0 0 36887

Futatata leírása alapján próbáltam elképzelni valamit, és az elképzelésemhez szabtam a kabátot, miszerint van az egyes táblák között összefüggés, és összetett lekérdezéssel megkapja amit akar.

Lehet nincs, és nem is kell összefüggés, és nincs igény az összetett dologra. Beszédes tábla nevek alapján csak egy egyszerű lekérdezés kell, az adott táblából.

Kapott megnézhető dolgot, aztán dönt, átalakítja, ha kell a munkalapjait, vagy jó ami van, és ahhoz szabja a munkát.

Előzmény: pimre (36886)
pimre Creative Commons License 2022.12.13 0 0 36886

"(A kiindulási dolgot, miként eddig mindenki jelezte, én sem látom át, miből mit szeretne futatata elérni.)" Én is ezért írtam a kérdésemet a 36883-ban.

Előzmény: m54-b (36884)
m54-b Creative Commons License 2022.12.13 0 0 36885

 c:\usb-webserver\mysql\data (ha a c:\usb-webserver\

Előzmény: m54-b (36884)
m54-b Creative Commons License 2022.12.13 0 0 36884

Nem.

 

Az adatbázist itt tárolja c:usb-webservermysqldata (ha a c:usb-webserver könyvtárba van telepítve).

 

Volt egy Excel fájlom

 

 

ezt elmentettem csv-be, majd a PHPMyadmin-ba belépve

 

létrehoztam egy új adatbázist, és

 

 

rányomtam arra, "Importálás" a fentiek beállításával létrehozta az új táblát, amin lehetett már lekérdezni.

 

Jimmy the Hand esetleg kiigazít, ha ez így hülyeség.

Ez persze csak egy primitív, egy táblás, egyszerű lekérdezés volt.

(A kiindulási dolgot, miként eddig mindenki jelezte, én sem látom át, miből mit szeretne futatata elérni.)

Előzmény: pimre (36883)
pimre Creative Commons License 2022.12.13 0 0 36883

Ez most a viccelődés része, ugye? A 36879-36881-es hozzászólásokat is figyelembe véve.

Előzmény: m54-b (36882)
m54-b Creative Commons License 2022.12.13 0 0 36882

Nem csak USB-ről megy, létrehozol a gépeden egy könyvtárat (mondjuk webszerver néven), oda kitömöríted a letöltött zip-et. Nem kell semmit telepíteni, konfigurálni.

 

Az usbwebserver.exe-t elindítva kapsz egy ilyen ablakot:

 

A pHPMyadminra klikk, és a böngészőben megjelenik a belépés, majd a kezelő felülete.

Egyelőre elég, ha megnézed ;-)

 

SQL alapok: https://www.w3schools.com/sql/default.asp

Lehet gyakorolni is!

 

Pl. egy lekérdezés

 

A karikázott részt lehet szerkeszteni

Majd a "Run SQL" megjeleníti az eredményt.

Előzmény: futatata (36879)
Törölt nick Creative Commons License 2022.12.13 0 0 36881

Van egy mondás, miszerint akinek kalapácsa van, az mindent szögnek néz.

Ebben a szellemben, bár a feladat megfogalmazása számomra totál homályos, de amit levettem belőle az alapján továbbra is azt mondom, hogy ez egy klasszikus adatbázis-feladat. Szakmai vakság vagy sem, de nem tudom elképzeli más megközelítésben. Az a ZX Spectrum-os Masterfile tünemény is tutira valami adatbázis kezelő volt.

 

Milyen lehetőségeid vannak akkor? Hát, rengeteg. Akik téged felvilágosítottak az adatbázisok viselt dolgairól, azokat küldd el továbbképzésre. Persze a nagyvállalati, milliósoros adathalmazok kezeléséhez szerveres megoldás dukál, de a kisebb feladatokat bőven meg lehet oldani saját gépre telepíthető, minden szükséges dolgot tartalmazó adatbázis-kezelő szoftverrel. Ilyen például a Microsoft Access, amely már akkor is velünk volt, amikor a DBase még élt, és azóta is itt van. Az Access ugyan fizetős, de ha beírod gugliba, hogy "free ms access alternatives", akkor kapsz egy tonna találatot. Itt van mindjárt pl. a méltán népszerű LibreOffice programcsomag adatbázis-kezelője, a Base.

https://hu.libreoffice.org/termekbemutato/base/

https://hu.libreoffice.org/assets/HU_files/Basebevezeto31.pdf

Ez azért jó, mert amennyire én látom, korrekt magyar nyelvű leírása van. De távol álljon tőlem, hogy ebbe az irányba küldjelek, válogassál nyugodtan.

 

Abban majdnem biztos vagyok, hogy nem létezik a világon olyan szoftvertermék, amit kirántasz a fiókból, és egyből azt tudja, ami neked kell. Tehát, bármit is választasz, vagy a folyamataidat kell hozzáalakítanod a kiválasztott szoftverhez, vagy a szoftvert alakítod hozzá a folyamataidhoz.

Ez utóbbinak nagyjából a következő, elengedhetetlen lépései vannak:

- kitalálni, hogy milyen riportokat akarsz látni a végén (riport = adatok megjelenítése a saját céljaidnak megfelelően összerendezett formában)

- kitalálni, hogy az előbb meghatározott riportokhoz milyen adatok rögzítésére van szükség -> ez lehet több vagy kevesebb, mint amit jelenleg rögzítetek

- megtervezni, hogy a rögzítendő adatokat hogyan célszerű táblákba rendszerezni, milyen táblák legyenek, azokban milyen mezők, és a táblák között milyen kapcsolatok vannak

- létrehozni a táblákat

- létrehozni a riportok alapjául szolgáló lekérdezéseket

- létrehozni a riportokat

- feltölteni az egészet adatokkal

- tesztelni, javítani, tesztelni, javítani... míg jó nem lesz.

 

A rossz hír az, hogy nem tudod megspórolni a befektetendő energiát. Vagy te magad tanulod ki az adatbázis létrehozásának csínját-bínját, vagy megfizeted azt, aki megcsinálja. Az utóbbi valószínűleg nem játszik, mert ha az Excelen akar a klub takarékoskodni, akkor nyilván külső szakértőre sincs keret. Vagy jön Sly (https://port.hu/adatlap/film/mozi/samaritan/movie-215172) és megcsinálja ingyen.

 

Na de most kicsit megakadtam, mert nem értek valamit. Ha az ember egyszer megvette a Microsoft Office-t, akkor az legálisan ott van, és még évtizedekig használható lesz. Nem értem, mért kellene lecserélni. Ugye nem azt akarod mondani, hogy a klubotok előfizet Office 365-re?

Előzmény: futatata (36878)
Fferi50 Creative Commons License 2022.12.12 0 0 36880

Szia!

Bármilyen lekérdezést is szeretnél végezni, valamilyen szabályt kell alkotnod az adatok bevitelénél és tárolásánál. Szabályok nélkül nem lehet egyértelmű válaszokat kapni.

Excelben is lehet viszonylag egyszerűen "lekérdezés szerkesztőt" készíteni, makró nélkül, függvényekkel is.

Minták alapján tudnánk talán többet is segíteni. 

Sajnos a feladat leírásod alapján - legalábbis én - nem tudok használható megoldást javasolni a már leírtakon túl.

Üdv. 

Előzmény: futatata (36878)
futatata Creative Commons License 2022.12.12 0 0 36879

(Csináljam meg?

 

Hát, megnéztem, hollandusul és angolul van, de mintha menükből lehetne kezelni, de nem írja, hogy min kell futtatni, csak azt, hogy usb-ről kell újraindítani - saját egyedi oprendszere van?

 

Ha valóban egyszerű és csinálnál rá egy minimális példát amit követve megnézném, mit és hogyan, nagyobb önbizalmat adna, meg talán lenne valkai, aki értene is hozzá.

Előzmény: m54-b (36876)
futatata Creative Commons License 2022.12.12 0 0 36878

Hát, az biztos, hogy 1980-as években már volt egy kb. 10kb-os program rá Zx Spectrumra, mint megtudtam, magyarosítva is lett, Masterfile volt eredetileg a neve, a magyar verzió MasterfileH lett.

 

Fejleszteni nem kell, készen van, a 26 angol betű mindegyikére lehet definiálni beviendő adatot, és a 26 betű és 10 szám-ra definiálni a képenyőn a listákat, hogy a 26 féle adatból azon a képernyőn mi jelenjen meg.

 

Feltételeztem, hogy van ilyen PC-re is, de közben kiokosítottak, hogy az utolsó ilyen használható program PC-re a DbaseIII Plusz volt, majd kitalálták, hogy adatbázis milliárdos üzlet és csak szervereken lehet futtatni.

Valamit mondtak, hogy Paszkál és C és talán Piton programokban is lehet ilyet programozni, de nehéz rá embert találni és macerás, és akkor nincs végleges program, amit lehet futtatni, csak a forráskód.

 

Nekünk egy kis egyszerű kellene, a 26 féle adat az bőven elegendő - talán tíz azonnal le lesz foglalva, a többin meg lehet gondolkozni.

 

Illetve még egy tippet kaptam, hogy van egy sqlite program, de azt is valami más programban kell programozni és csak a forráskódja ingyenes nincsen hozzá ingyenes programozási kézikönyv.

 

Talán az emulátor jó lenne, majd rákérdezek valakire, hogyan működik és mit kell csinálni, és hogyan használjuk a programot, weben láttam, hogy van sokféle program, kérdés, melyik működik és milyen oprendszeren.

 

Azért annak örülnék, ha lenne valami egyszerűbb program PC-re is, nem értem, ha egyszer kis játékgépekre volt, akkor PC-re, laptopra miért nincs.

 

Ja, még egy válasz, sajnos Zx Spectrumot nem éri meg venni, mert a billentyűzete gyakran tönkremegy és drága cserélni. Meg, ugye, a programokat magnókazettán kell tárolni, amik már erősen eltűntek a boltokból.

Előzmény: Törölt nick (36870)
futatata Creative Commons License 2022.12.12 0 0 36877

Igen, köszönöm, egy icipicivel fiatalabb vagyok, a nevet azért választottam, mert tavaly márciusban helyi focibajnokságban győztünk, de bal szélre tettek, és amikor szöktettek és utolértem a labdát, egy ütemet ki kellett hagynom, mert nem bal lábas vagyok, hogy jobbel tudjam középre adni a ladbát és ilyenkor utolértek és leszereltek.

Erre fel ápr 1-i tréfaként elterjesztették rólam, hogy "a tata rendkívül gyorsan kergeti a labdát, de mire utoléri, elfelejti, hogy miért is tette."

 

A többire is válaszolok este, vagy holnap, ha megmarad a pozitív kapcsolat a fórumon.

Előzmény: pimre (36869)
m54-b Creative Commons License 2022.12.12 0 0 36876

Az adatbázis (bár csak messziről láttam) a Spektrumnál járhatóbbnak tűnik.

https://www.usbwebserver.net/webserver/ Komplett webszerver, Apache2, PHP, Mysql.

Phpmyadmin tudja importálni az Excel-t, csv-t. Már csak a 'select' paramétereit kell beállítani ;-))

Van sok fórum ezzel kapcsolatban. Szerintem nem nehezebb megtanulni mint az Accesst. "Hordozható" lesz.

(Csináljam meg? Határidő gyöngyvirágok elhervadása és az első szilvapálinka lefőzése közt. Esetleg kis csúszással jövő karácsony...)

 

Előzmény: Törölt nick (36870)
pimre Creative Commons License 2022.12.12 0 0 36875

Még egy utolsó észrevétel: Az a ZX Spektrum biztos nem Excel adatállományokkal dolgozott. Hiszen akkoriban még nem is volt Excel. De még DBase sem. Szóval nagy meglepetés érné a kedves kérdezőt, ha a kezébe kerülne egy ZX Spektrum, meg a csodaprogram:-)

 

Előzmény: Törölt nick (36872)
Eredő Vektor Creative Commons License 2022.12.12 0 0 36874

Oh... megvan SK. Hozzászólogat itt-ott.

Előzmény: Eredő Vektor (36873)
Eredő Vektor Creative Commons License 2022.12.12 0 0 36873

Meg Python!

Tényleg, hol van SK?

Előzmény: Törölt nick (36870)
Törölt nick Creative Commons License 2022.12.12 0 0 36872

"Azt már meghatározták: ZXSpectrum :-)"

 

Ja, nézegettem is a használtkütyü-piacot, elvileg lehet kapni működő ZX Spectrumot, de nyomtatót nem találtam hozzá.

Előzmény: pimre (36871)
pimre Creative Commons License 2022.12.12 0 0 36871

"Az kéne legyen az első lépés, hogy meghatározzák a környezetet, amiben fejleszteni kell."

 

Azt már meghatározták: ZXSpectrum :-)

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

"Ennek még mindig "Kimutatástábla" szaga van."

 

Ha Sánta Kutya itt lenne, rögtön mondta volna, hogy adatbázis :)

 

"Aztán ki tudja, hogy egy most beállított tábla ugyanúgy fog-e működni bármelyik office verzióban."

 

Úgy van. Az kéne legyen az első lépés, hogy meghatározzák a környezetet, amiben fejleszteni kell.

Előzmény: pimre (36866)
pimre Creative Commons License 2022.12.12 0 0 36869

"a "ZXSpectrum" korcsoportjából többen vannak szerintem a topikban." Persze, jómagam is az vagyok, ha 71 év annak számít:-)

A tata szót azért írtam, mert a nicknévben is ez van:-). Remélem, nem sértődik meg  a kérdező futatata. Egyébként nekem nagyon tetszik ez a nicknév.

 

Előzmény: Eredő Vektor (36867)
Törölt nick Creative Commons License 2022.12.12 0 0 36868

"Óvatosan az ilyen kifejezésekkel"

 

Névválasztása alapján indokolt lehet... hacsak nem a híres kisváros egyik amatőr sportegyesületének képviselőjét tisztelhetjük.

Előzmény: Eredő Vektor (36867)
Eredő Vektor Creative Commons License 2022.12.12 0 0 36867

Tata? :)

Óvatosan az ilyen kifejezésekkel, mert szerintem a "ZXSpectrum" korcsoportjából többen vannak szerintem a topikban. :D

Előzmény: pimre (36866)
pimre Creative Commons License 2022.12.12 0 0 36866

"Ennek még mindig "Kimutatástábla" szaga van." Igazad lehet, de:

 

1. a feladat megfogalmazása alapján az a sejtésem, hogy a tata nem fogja tudni maga megcsinálni a kimutatástáblát.

2. A klubvezető bejelentette hogy takarékossági okokból jövőre az excel helyett valamelyik ingyenes office-ra fognak áttérni. Aztán ki tudja, hogy egy most beállított tábla ugyanúgy fog-e működni bármelyik office verzióban.

Előzmény: Eredő Vektor (36865)
Eredő Vektor Creative Commons License 2022.12.12 0 0 36865

>A szöveges részeknél is be lehet venni egy oszlopot, hogy ki érintett benne, és máris ott a személy oszlopa.

 

Ennek még mindig "Kimutatástábla" szaga van.

 

Több munkalapot is bele tudsz tenni egy ilyenbe - azzal a feltétellel, hogy a sémáik azonosak.

Előzmény: futatata (36863)
Törölt nick Creative Commons License 2022.12.12 0 1 36864

Vagy telepíts egy ZX Spectrum emulátort a gépedre, és kérd el a senior ismerősödtől azt a csodaprogramot.

Előzmény: futatata (36863)
futatata Creative Commons License 2022.12.11 0 0 36863

Van megoldás, csak nem excel, hanem valami olyan pici program, ami Zx Spectum-on is volt az 1980-as években, ahol az adatokat tetszőlegesen lehet oszloponként megjeleníteni különböző, előre megtervezett lapokon.

 

Ahogy fferi is írta, szerintem is a lényeg a személyek oszlopa, mert az igaz, hogy talán félszáz különböző táblázat van, de amikor keresni kell, akkor mindig valakinek a nevével kapcsolatban kell keresni.

 

A szöveges részeknél is be lehet venni egy oszlopot, hogy ki érintett benne, és máris ott a személy oszlopa.

 

Már csak azt az angol programot kellene megtalálni PC-re, amit talán jó harminc éve Zx Spectrumra megírtak.

Előzmény: pimre (36862)
pimre Creative Commons License 2022.12.10 0 0 36862

Nem látok megoldást.

 

Egyrészt Excel makró jöhetne szóba, de ha jövőre a klubban lecserélik az Excelt egy ingyenes office verzióra, akkor semmi garancia, hogy a makró működni fog. Arra meg nem hinném, hogy vállalkozna valaki (én biztos nem), hogy más programmal kezelje az Excel munkafüzeteket.

 

Másodszor: Az nem derül ki, hogy van-e egy munkalapotok a, amin az összes név szerepel (névlistának nevezném, és ebből lehetne kiválasztani a neveket. Persze bővülhet.), és az sem, hogy azokon a lapokon, ahol név szerepel, az biztosan azonos valamelyik névvel a névlistából. Aztán az Imre, Pista, Laci, Zoli stb. keresztnevek ugyan, de nem alkalmasak azonosításra. Még a teljes nevek sem biztosan, ha éppen Nagy Laciból ketten is vannak.

Ezenkívül neveket tartalmazó oszlop csak az első két lapon van (befizetések, és klubnapi jelenlét), a többin nem. Az, hogy szorul, Laci, vagy Pista távozott stb. nem kezelhető.

 

Szóval szerintem add fel a dolgot. Hacsak valaki nem jelentkezik, hogy segít.

Előzmény: futatata (36861)
futatata Creative Commons License 2022.12.09 0 0 36861

Nekiálltam, de rájöttem, hogy felesleges, néhány példa alapján talán látható, hogy az lenne a legjobb, ha lenne egy biztos oszlop, ahol ki lehet választani a neveket mindenhol, mert többnyire csak a szövegben szerepelnek, elírással és keresési problémákkal.

 

Olyan program kell, ahol menüből van kiválasztva a név, és név és dátum szerint lehet egy listát csinálni, hogy az illető mikor volt jelen, és mikor mit csinált.

 

A példák szövegesen (a vesszők az oszlopokat jelölik):

 

pingpong klub
 
befizetések
dátum, név, összeg, megjegyzés
 
klubnapon jelenlét
dátum, név
 
állapotfelmérés
dátum, eszköz neve, állapota, felmérést végző
kedd, összecsukható ppasztal, bal oldal jobb alsó sarokban felületi karcolás és baloldalt jobb kerék időnként szorul, Laci
 
eszköz esemény
dátum, kód, eszköz neve, esemény
csütörtök, pph1, 1.számú ppháló, Imre elvitte hétvégére
 
gyűlés
dátum, helyszin, téma, levezető elnök, jegyzőkönyvvezető
kedd, klubterem, heti gyűlés, Laci, Zoli
 
gyűlés lefolyása
idő, megnevezés
11, gyűlés elkezdve 4 fő jelen (Imre, Pista, Laci, Zoli)
11.30, alapszabálymódosítás elfogadva egyhangúlag
11.40, Pista távozott
11.45, összecsukhato ppasztal sérülését senki se vállalta, észleleskor jelen voltak: Laci, Imre, Olga, Palika, a sérülés házilag nem javítható
11.45, határozat: ppasztal sérülését vezetőségi gyűlésen felvetni, javításra árajánlatot kérni, határozat egyhangúlag elfogadva
12, Emese érkezik
12.30, Imre beszámolója hétvégi versenyről, beszámolót weboldalra kitenné, javaslat egyhangúlag elfogadva
13, gyűlés lezárva
 
játszmák
dátum, játékos1, játékos2, eredmény
szombat, Imre, Laci, 3:1 (11:9, 11:8, 6:11, 11:4)

Előzmény: pimre (36859)
hellsing Creative Commons License 2022.12.09 0 0 36860

Help. Technikai magyarázat kellene. Van egy 58.000 sor × 18 oszlopos munkalapba beszúrt táblázatom, aminek 3 oszlopa máshonnan szedi össze az infót. Ha fkeressel csinálom, akkor egy 3 oszlopot használó rendezés (dátum, szakterület, orvos, az utóbbi kettő máshonnan jön) kb. 3s, ha xkeres-t, akkor inkább 30 másodperc. A munkafolyamat egy lépéseként kiszűrök az 58k sorból kb. 42k-t és törlöm. Fkeres: 5-6s, xkeres: kb. 3 PERC(!!!).

 

A próba során semmi más nem változott, csak az eredetileg fkeressel megírt keresést átírtam xkeresre. A vas biztos nem akadály: Intel i9-10900KF + 64GB RAM, nvme SSD-k (bőséges szabad tárhellyel).

 

Mi a különbség a háttérben, a két függvény működésében, ami ekkora eltérést okoz?

pimre Creative Commons License 2022.12.06 0 0 36859

Off: "Csak most tudok válaszolni, mert a fórum csak egy választ enged." De ötpercenként írhatsz egyet: "Újonnan regisztrált felhasználóink az első száz hozzászólásuk elérése előtt öt percenként küldhetnek be egy-egy hozzászólást. A századik hozzászólás elérésével ez a korlátozás megszűnik"

On:  "..excelben pillanatok alatt felül lehet írni bármilyen cellát" Pillanatok alatt letiltható az összes olyan celle, amit nem akarsz, hogy felülírjanak.

A többiről majd akkor, ha küldesz mintákat. 

Előzmény: futatata (36858)
futatata Creative Commons License 2022.12.06 0 0 36858

Csak most tudok válaszolni, mert a fórum csak egy választ enged.

 

A megoldást abban látom, hogy legalább a taglista legyen egységes, és utána legyenek egyedi adatok tevékenységek szerint, de amennyire tudom, az ilyeneket makroprogramozással kell megoldani, amihez nagyon kevesen értenek és verziófüggő.

 

Jobb lenne valami egyszerűen kezelhető program, főleg az emberi tényező miatt, excelben pillanatok alatt felül lehet írni bármilyen cellát.

 

Az fkeres és pár hasonló függvényt ismerem, de nehéz fejben tartani, hogy mikor és hol milyen változatára van szükség az egyedi táblázatok miatt. Egy még nálam is idősebb mosolyogva mutatta a Zx Spectrumát, hogy azon milyen egyszerű az adatokat kezelni, és a kilenc számjegyre van kilenc féle megjelenítés szinte azonnali listák, nincs felülírási lehetőség, valami olyasmi lenne jó nekünk, csak PC-re.

Előzmény: Fferi50 (36853)
pimre Creative Commons License 2022.12.06 0 0 36857

Ettől függetlenül akár Excel, akár Libre Office, vagy egyéb lesz a klubban a függvények várhatóan működni foggnak. Viszont a 6835-ös hosszászólásodban adott leírásod nem alkalmas arra, hogy bárki konkrét segítséget tudjon adni. Ahogy pedig egy későbbi hozzászólásodból kiderül "minden fül, vagy munkalap egyedi", akkor végkép nem lesz általános megoldás. Hanem munkalaponként (más szóval fülenként) más és más.

Ha küldenél egy mintát minden munkalapról, akkor talán lehetne kezdeni vele valamit. Egyébként ismered, és tudod használni az Excel függvényeket? Hogy ha majd bővül a listád, azt is kezelni tudd.

Előzmény: futatata (36856)
futatata Creative Commons License 2022.12.06 0 0 36856

A klubvezető mondta, takarékoskodni kell.

 

Előzmény: pimre (36855)
pimre Creative Commons License 2022.12.06 0 0 36855

"... jövőre megszüntetik az excelt, ingyenes office lesz helyette..." Ezt honnan szedted?

Előzmény: futatata (36851)
futatata Creative Commons License 2022.12.06 0 0 36854

Biztositani kell, hogy megfelelő személyről legyen szó, mert mindenki úgy ír, hogy ő tudja, hogy mi történt, de más nem nagyon.

Pl. beírják, hogy Imre elvállalt valamit, csak aki írta, az fél évig nem jött és három Imre is volt, nem tudni, melyikről volt szó.

 

Talán valami más program kell, ahol az adatbevitelnél ott van az összes név egy listában, de úgy, hogy ne lehessen se felülírni, se törölni őket, csak kiválasztani, és hasonlóan kellenek más dedikált cellák adatbevitelre, és csak a legvégén kell egy megjegyzés, ahova lehet irni minden egyebet.

 

Vagy valami más programra lesz szükség, ahol az adatbevitelnél vannak előre definiált cellák elvárt tartalommal, azok alapján lehet majd más nézeteket vagy listákat csinálni.

Előzmény: pimre (36852)
Fferi50 Creative Commons License 2022.12.05 0 0 36853

Szia!

Továbbra is azt javaslom, hogy a közös lapon egy cella, ahol adatérvényesítéssel kiválasztható a kívánt tag.

Ezután az adatokat a megfelelő cellában FKERES vagy más kereső függvénnyel meg tudod automatikusan kapni.

A közös lap képletezését egyszer kell megcsinálni űrlap szerűen elhelyezve az adatokat.

Üdv.

Előzmény: futatata (36851)
pimre Creative Commons License 2022.12.05 0 1 36852

?????

Előzmény: futatata (36851)
futatata Creative Commons License 2022.12.05 0 0 36851

Köszönöm a javaslatokat, de minden fül, vagy munkalap egyedi, és jövőre megszüntetik az excelt, ingyenes office lesz helyette, azalatt úgyse működne.

 

Hogyan lehetne megcsinálni, hogy amellett, hogy megmaradnak a külön fülek, de legyen egy közös, ahol tagonként lehet látni minden adatot?

 

Előzmény: futatata (36835)
Eredő Vektor Creative Commons License 2022.12.02 0 0 36850

Szia,

az eredetiben nem vittem be a teljes oszlopot. de a cca. 20ezer sorral is lassú

Előzmény: Fferi50 (36849)
Fferi50 Creative Commons License 2022.12.02 0 0 36849

Szia!

Azt nem értem, ha huszonezer sorod van, miért kell a teljes oszlopot belevenni a képletbe - úgy persze, hogy belassul.

Ha konkrét tartományra használod a képletet, akkor biztosan sokkal gyorsabb.

Üdv.

Előzmény: Eredő Vektor (36848)
Eredő Vektor Creative Commons License 2022.12.02 0 1 36848

Kösz még egyszer. Az egyedi azonosítóhoz tartozó max_szintet összehúztam pivotban, innen másik képlettel bekerült a helyére. Tökéletes a tiéd is és abból indultam ki - csak így Pivottal kezelhetőbb az egész.

Köszi.

Előzmény: Garashan (36846)
Eredő Vektor Creative Commons License 2022.12.02 0 1 36847

Persze, ez közben megvan. Persze nem lehet B:B tartomány tömbképletben 220 sorszámmal meglőve.

Iszonyú lassú:( pedig jó a gép. Ezt leszámítva müxik. Még pivottal próbálkozok, hátha össze lehet húzkodni valamit.

Köszönöm, sokat segítettél. De ha valakinek más gyorsabb ötlete... :)

Előzmény: Garashan (36846)
Garashan Creative Commons License 2022.12.02 0 0 36846

Akkor próbáld ki ezt:
{=SZUM(HA(MAXHA(A:A;B:B;EGYEDI(B:B))=E2;1;0))}
Ez elvileg ugyan azt csinálja.

Előzmény: Eredő Vektor (36844)
Eredő Vektor Creative Commons License 2022.12.02 0 0 36845

Ha más nem tud erre sima beépített fgv kombinációt ajánlani, kénytelen erre felhasználói függvényt írni:(

Már mint, úgy értem, hogy kénytelen LESZEK erre felhasználó függvényt írni.

Előzmény: Eredő Vektor (36844)
Eredő Vektor Creative Commons License 2022.12.02 0 0 36844

Köszönöm, hogy foglalkoztál vele.

Sajnos a tömb elemeinek felsorolása nem lehetséges az eredetiben, mert 20ezer sor van az eredetiben párezer "azonosító"-val.

Még esetleg úgy működne a Te példád, hogy csinálok az egyedi azonosítókkal egy tömböt és azt rakom be ennek a helyére...

 

De sajnos nem nagyon lehetnek ilyen segédtáblák, amiket karban kell tartani a többi adat változása miatt.

 

Ha más nem tud erre sima beépített fgv kombinációt ajánlani, kénytelen erre felhasználói függvényt írni:(

 

Én próbálkoztam MAXHA, DARABHATÖBB, GYAKORISÁG fgv-ek egybeolvasztott tömbképleteivel, de nem sikerül. :(

 

Itt valami más matek kell

Előzmény: Garashan (36842)
Garashan Creative Commons License 2022.12.02 0 0 36843

A képkivágás lemaradt...

Előzmény: Garashan (36842)
Garashan Creative Commons License 2022.12.02 0 0 36842

Szia!

Én így oldanám meg:

A képlet a következő, hogy ne kelljen annyit gépelni: =SZUM(HA(MAXHA(A:A;B:B;{"a";"b";"c";"d";"e"})=E2;1;0))
De tömbképlet, így CTRL+SHIFT+ENTER segítségével kell lezárni. Utána szépen lehúzható.

Egyedül a tömb elemeinek a felsorolását nem tartom elegánsnak. Illetve ha minden igaz, akkor a MAXHA függvény csak a 2019-es Officetól érhető el.

Előzmény: Eredő Vektor (36841)
Eredő Vektor Creative Commons License 2022.12.02 0 0 36841

Sziasztok,

Az egyszerű kérdésem megtalálható a munkafüzetben:

 

https://www.dropbox.com/scl/fi/91clex2sk40aso38wzyhy/Munkaf-zet1.xlsx?dl=0&rlkey=t1b0bfry1i2eswniogedg7m2u

 

de itt a képe is:

 

proszim Creative Commons License 2022.12.02 0 0 36840

Sziasztok


Excelben is azt kell csinálni, mint papíron, hogy a móduszt megelőző o-közt egyenlővé kell tenni a módusz osztályközhosszával, vagy nem?

Köszi a választ!

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

Én ilyet tudok. Ez egy sima vonaldiagram.

 

Előzmény: fruely (36838)
fruely Creative Commons License 2022.11.30 0 0 36838

Sziasztok!

 

Egy adott pillanatban egy termékre vonatkozó éppen futó projekteket szeretném excel diagramban megjeleníteni.

 

 

3 oszlop lenne:

 

- projekt neve

- projekt indulási dátuma 

- projekt befejezési dátuma

 

 

A diagram 

 

- y tengelye a projektek tengelye

- x tengely az idő tengely de dátumokat mutatva.

 

 

Csatolva egy kép, hátha az még segít a megérésben.

 

 

Hogy tudom ezt megvalósítani?

 

 

Előre is köszi

Cs.

 

Eredő Vektor Creative Commons License 2022.11.30 0 0 36837

pivot - avagy kimutatástábla is a barátod lesz szerintem.

Előzmény: futatata (36835)
Fferi50 Creative Commons License 2022.11.29 0 0 36836

Szia!

Vannak az Excelben jól működő kereső függvények: FKERES, VKERES, INDEX, HOL.VAN, újabb verziókban XKERES is.

Ezeket kellene tanulmányoznod.

Üdv.

Előzmény: futatata (36835)
futatata Creative Commons License 2022.11.29 0 0 36835

Excelben tárolt adatokat kellene átszervezni, van erre módszer, vagy program rá?

 

Jelenleg úgy van megoldva, hogy minden fül egy csoport adatait tartalmazza, oszlopos csoportosítással, az első pár oszlop az események dátum és foglalkozási téma szerint, résztvevőkkel, majd egy oszlop kimarad, ott a taglista, megint egy oszlop üres és jön az eszközlista, majd a vállalt és elvégzett feladatok és így megy tovább.

 

Kellene egy olyan gyűjtés, hogy adott tagnál legyen lista, hogy mikor volt jelen és milyen feladatban vett részt, mert csak egyedi kereséssel lehet kideriteni.

 

BMW535D Creative Commons License 2022.11.29 0 0 36834

köszönöm, ezt azért már meg kell emészteni, visszaszólok hogy sikerül-e...

Előzmény: Törölt nick (36831)
BMW535D Creative Commons License 2022.11.29 0 0 36833

bocsánat nem voltam, igen ugyanaz

Előzmény: Törölt nick (36829)
maciti Creative Commons License 2022.11.29 0 0 36832

Köszi a felvilágosítást...

Előzmény: Delila10 (36830)
Törölt nick Creative Commons License 2022.11.28 0 0 36831

Szóval, ha mindig ugyanaz a szó ("ablak"), és csak futó sorszámot kell tenni hozzá, akkor:

 

- írd be az első releváns cellába, hogy "ablak_1"

- a következő releváns cellába képlet: { ="ablak_" & NAGY(SZÁMÉRTÉK(KÖZÉP($A$1:A1,SZÖVEG.KERES("_",$A$1:A1&"_")+1,1000)),1)+1}

A piros $A$1 helyére írd annak a cellának a címét, ahol az "ablak_1" érték van. A kék A1 helyére pedig a közvetlenül a második releváns cella fölött lévő cella címét.

Ha tehát az ablak_1 a B5-ben van, az ablak_2-nek pedig a B12-be kell kerülnie, akkor a képlet B12-ben így néz ki:

{ ="ablak_" & NAGY(SZÁMÉRTÉK(KÖZÉP($B$5:B11,SZÖVEG.KERES("_",$B$5:B11&"_")+1,1000)),1)+1}

 

A kapcsos zárójel azt jelenti, hogy a képletet Crtl+Shift+Enter billentyűkombinációval kell bevinni.

Utána a képlet szűrt tartományban is lehúzható.

 

A módszer nem működik akkor, ha az adott oszlopban egyéb eredetű, alulvonást tartalmazó adatok is vannak.

Előzmény: Törölt nick (36829)
Delila10 Creative Commons License 2022.11.28 0 0 36830

Az Application.WorksheetFunction jelentése, hogy munkalapfüggvényről van szó, a CountI pedig egy ponttal hozzáfűzve a DARABTELI függvény eredeti, angol megfelelője. Innen már tudod.

Előzmény: maciti (36818)
Törölt nick Creative Commons License 2022.11.28 0 0 36829

Mindig ugyanaz a sorszám előtti előtag?

Előzmény: BMW535D (36828)
BMW535D Creative Commons License 2022.11.28 0 0 36828

De, excel, az a gond hogy betettem egy szűrőt, tehát bizonyos soroknál szeretném csak hogy sorszámozzon, most kipróbáltam úgy hogy csináltam egy üres excelbe egy függőleges számsort és bemásoltam az eredetibe. Ez jó is lenne, de azért mert a szűrő benne van és nem látszanak amiket nem akarok sorszámozni, ha kiveszem a szűrőt, azt is számozza.

 

Amúgy gondolom azért nem volt hajlandó sorszámozni mert szűrve voltak a vízszintes sorok

Előzmény: pimre (36827)
pimre Creative Commons License 2022.11.28 0 0 36827

Mit jelent az, hogy "letöltött adatbázisban"? Az nem Excel munkafüzet? Küldj egy mintát, ha nem titkos! Ha igen, töröld ki az érzékeny adatokat, és úgy küldd el!

Előzmény: BMW535D (36826)
BMW535D Creative Commons License 2022.11.28 0 0 36826

hát egy üres excelben nekem is megy, de a letöltött adatbázisban nem, valami formázási gond, de hogy mi a fene

Előzmény: m54-b (36824)
BMW535D Creative Commons License 2022.11.28 0 0 36825

köszönöm, megpróbálom megint...

Előzmény: m54-b (36824)
m54-b Creative Commons License 2022.11.28 0 0 36824

2007-es Office szintén.

 

Még választási lehetőség is van.

Előzmény: Eredő Vektor (36823)
Eredő Vektor Creative Commons License 2022.11.28 0 0 36823

Nalam megy. Exel 2019.

Beirom, hogy ablak_1. Jobb alsó sarkot "megfogom" jobb egergombbal. Lehuzom, majd a felugro menuben "kitoltes adatsorral"

Előzmény: BMW535D (36819)
BMW535D Creative Commons License 2022.11.28 0 0 36822

Egy olyan lehetőség nincs hogy nem kell egy másik cella hozzá? Adatbázisról van szó, azért kérdezem

Előzmény: Törölt nick (36820)
BMW535D Creative Commons License 2022.11.28 0 0 36821

megpróbálom úgy, köszönöm szépen

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

Szerintem mennie kellene úgy is, ahogy próbáltad, de ha nem, akkor így:

- A oszlopban a számok

- B1-be képlet :   ="ablak_" & A1

- B1 képletét lehúzod, ameddig kell

- B oszlop kijelöl, másol

- A oszlop kijelöl, irányított beillesztés, érték

 

Előzmény: BMW535D (36819)
BMW535D Creative Commons License 2022.11.28 0 0 36819

Sziasztok, abban tud valaki segíteni hogyha egy függőleges cellába számsort szeretnék létrehozni úgy hogy szöveg is van hogy lehet?

És szóköz nélkül. Pl ablak_1, ablak_2, stb. Megpróbáltam hogy csinálok egy párat 4-ig és az egészet kijelölve lehúzom, de az nem nyerő. Az ablak_1-re írja át az egészet.

maciti Creative Commons License 2022.11.28 0 0 36818

Szia Delila10!

Ez nagyon jó!

Ha kérhetném ezt megmagyaráznád: Application.WorksheetFunction.CountIf(Sheets("Kiinduló").Range("A1:A" & usor), ComboBox1.Value) = 0

Köszönöm a segítséget, tényleg nagyon jó lett... Már kezdtem lemondani róla...

Előzmény: Delila10 (36817)
Delila10 Creative Commons License 2022.11.26 0 0 36817

Modullapon:

Sub Start()

    Dim usor As Integer

    usor = Sheets("Kiinduló").Range("A" & Rows.Count).End(xlUp).Row

    UserForm1.ComboBox1.RowSource = "Kiinduló!A1:A" & usor

    UserForm1.Show

End Sub

 

 

Userform modullapján:

Private Sub ComboBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

    Dim usor As Integer

    usor = Sheets("Kiinduló").Range("A" & Rows.Count).End(xlUp).Row

    If Application.WorksheetFunction.CountIf(Sheets("Kiinduló").Range("A1:A" & usor), ComboBox1.Value) = 0 Then

        usor = usor + 1

        Sheets("Kiinduló").Range("A" & usor) = ComboBox1.Value

        ComboBox1.RowSource = "Kiinduló!A1:A" & usor

    Else

        MsgBox ComboBox1.Value & " értéket választottad ki."  ’ide azt írsz, amit akarsz

    End If

End Sub

 

Private Sub CommandButton1_Click()

    '***********************

End Sub

 

A ComboBox Style legyen 0, ahogy már előbb írtam.

Előzmény: maciti (36816)
maciti Creative Commons License 2022.11.25 0 0 36816

Szia!

Ez így jó lenne csak lehet, hogy nem fejeztem ki magam egyértelműen.

Azt szerettem volna, hogyha az írható verziót alkalmaznám, és olyan adat kellene ami nincs a listában, akkor ugyanabba a Comboboxba be lehessen írni.

Az már kissé utópisztikusnak tűnik, hogy hozzáírja a listához?!

Előzmény: Delila10 (36815)
Delila10 Creative Commons License 2022.11.25 0 0 36815

Nem szükséges az inicializálás (a viszonylag lassú ciklus miatt), ha a Boxproba makró

 

Sub Boxproba()

    Dim usor As Integer

    usor = Sheets("Kiindulás").Range("A" & Rows.Count).End(xlUp).Row

    UserForm1.ComboBox1.RowSource = "Kiindulás!A1:A" & usor

    UserForm1.Show

End Sub

 

A lap neve Kiindulás.

Előzmény: maciti (36813)
Delila10 Creative Commons License 2022.11.25 0 0 36814

Az írhatónál a Style tulajdonság legyen 2 - fmStyleDropDownList, a nem írhatónál 0 - fmStyleDropDownCombo.

Előzmény: maciti (36813)
maciti Creative Commons License 2022.11.24 0 0 36813

Szia!

Azért nem lenne jó, mert ez csak egy kis részlet az egész űrlapból, csak nem akartam az egészet átküldeni...

Előzmény: Eredő Vektor (36812)
Eredő Vektor Creative Commons License 2022.11.24 0 0 36812

Szia,

Ehelyett sima adatérvényesítés? Ugyanazt a célt szolgálja, mert megvan benne, amit ez a makró csinálna.

Előzmény: maciti (36811)
maciti Creative Commons License 2022.11.24 0 0 36811

Sziasztok!

 

Ismét segítséget szeretnék kérni. Arról van szó, hogy egy userformon lévő comboboxot úgy szeretném kialakítani, hogy amikor nincs benne a listában a megfelelő adat, akkor be tudja írni a felhasználó.

 

A próbálkozásaim során vagy a listából lehet választani, vagy beírni lehet. Amikor ComboBox1.List tulajdonságot megadom, akkor nem lehet beírni csak azt ami szerepel a listában.

 

Hogyan kellene ezt beállítani?

Tudna valaki segíteni?

 

Link:

https://data.hu/get/13506343/ComboBoxProba.xlsm

Eredő Vektor Creative Commons License 2022.11.23 0 0 36810

Van :)

Egy mysql kód php-ba ágyazva. Böngészőből működtetve

Előzmény: MJaniBk (36808)
mr_ricsi Creative Commons License 2022.11.22 0 0 36809

Köszönöm a segítséget! Eltaláltad: 4-5 szóköz van a cellákban.

Előzmény: Eredő Vektor (36787)
MJaniBk Creative Commons License 2022.11.20 0 0 36808

Sziasztok!

 

Olyan kérdésem lenne, hogy létezik-e olyan applikáció telefonra, amely egy Excel táblázatból olvas ki adatokat?

Olyanra gondolok, hogy nem kell megnyitni az Excel táblázatot, csak egy aplikáció, amibe beírom a keresett adatot és az ahhoz tartozó cellákból meg tudom jeleníteni az adatokat.

 

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

pimre Creative Commons License 2022.11.19 0 0 36807

Működik, kösz.

Előzmény: m54-b (36806)
m54-b Creative Commons License 2022.11.18 0 0 36806

Próbálom érthetőbben ;-)

 

Elkészíted a körlevelet, de az egyesítés helyett a makrót futtatod.

 

Sub mentes_oldalankent()
    ChangeFileOpenDirectory "C:\korlevel\" 'vagy ami tetszik
ismet:
i = i + 1 'ezt nem tudom miként lehet a Wordben, a wdDefaultLastRecord hülyeséget ad vissza. Lehet lekérdezni az Excelből, de nekem egyszerűbb így.

    With ActiveDocument.MailMerge.DataSource
     .ActiveRecord = i
     fajl_neve = .DataFields("név").Value & "_" & .DataFields("keresztnév").Value 'ide amit szeretnél, ami van
    End With
On Error GoTo vege
    With ActiveDocument.MailMerge
        .Destination = wdSendToNewDocument
        .SuppressBlankLines = True
        With .DataSource
            .FirstRecord = i
            .LastRecord = i
        End With
        .Execute Pause:=False
    End With
    If Dir(fajl_neve & ".docx") <> "" Then
        fajl_neve = fajl_neve & "_" & i 'ha létezik az a fájlnév, akkor sorszámot ad hozzá
    End If
    ActiveDocument.SaveAs FileName:=fajl_neve & ".docx", FileFormat:= _
        wdFormatXMLDocument, LockComments:=False, Password:="", AddToRecentFiles _
        :=True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts _
        :=False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
        SaveAsAOCELetter:=False
    ActiveWindow.Close
GoTo ismet
 
vege:
End Sub

 

 

Felraktam a mintát: eletmod.ininet.hu/korlevel_2.zip

Előzmény: pimre (36804)
pimre Creative Commons License 2022.11.18 0 0 36805

Mert az Adobe így bont szét oldalakra egy pdf-et. A teszt.pdf-ből ez lesz:

 

 

 

Előzmény: pimre (36804)
pimre Creative Commons License 2022.11.18 0 0 36804

Kösz, én félreértettelek a válaszomban, azt hittem, hogy erre van kész megoldás a Word körlevélkezelőben a Befejezés és egyesítés menüponthoz kapcsolódóan. De ahogy látom, nem erre gondoltál. Majd megpróbálom a napokban értelmezni a makrót a "felvett makró... a körlevél egyesítéskor" megjegyzésed függvényében. Egyelőre nem látom át, hogy ezt hol kellene elindítanom. Hiszen a körlevélkezelőt én csak a Wordben ismerem, Excelben ilyenről nincs tudomásom.

 

Egyébként az én elképzelésem arra vonatkozott, hogy a körlevélkezelővel elkészült egyesített dokumentumot szétszedem önálló dokumentumokra makró nélkül (PDF-ből ez könnyen megoldható az Adobe segítségével), majd utólag neveztetném át őket makróval a forrás Excel fájl segítségével.

 

Előzmény: m54-b (36801)
m54-b Creative Commons License 2022.11.18 0 0 36803

Kiegészítés

 

Ha az adatoknál a nevek "név" nevű mezőben vannak

 

Sub nevek()

For i = 1 To 3
    With ActiveDocument.MailMerge.DataSource
     .ActiveRecord = i 'wdFirstRecord
     MsgBox .DataFields("név").Value
    End With
Next i

End Sub

Előzmény: m54-b (36802)
m54-b Creative Commons License 2022.11.18 0 0 36802

Az a fránya \!

 

ChangeFileOpenDirectory "C:\korlevel\" 'ahova menteni akarod

Előzmény: m54-b (36801)
m54-b Creative Commons License 2022.11.18 0 0 36801

Kulcs (felvett makró... a körlevél egyesítéskor):

 

 

for i = 1 to levelek_szama     'ezt az Excel adatokból tudod, a nev(i).docx-t szintén

 

    With ActiveDocument.MailMerge
        .Destination = wdSendToNewDocument
        .SuppressBlankLines = True
        With .DataSource
            .FirstRecord = i  'ezeket változtatod a ciklusban, csak egy oldalt állít elő
            .LastRecord = i
        End With
        .Execute Pause:=False
    End With
    ChangeFileOpenDirectory "C:korlevel" 'ahova menteni akarod
    ActiveDocument.SaveAs FileName:="nev(i).docx", FileFormat:= _
        wdFormatXMLDocument, LockComments:=False, Password:="", AddToRecentFiles _
        :=True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts _
        :=False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
        SaveAsAOCELetter:=False
    ActiveWindow.Close

next i

Előzmény: pimre (36800)
pimre Creative Commons License 2022.11.18 0 0 36800

Ennek a technikája engem is érdekelne. Nem tudtam róla, hogy létezik ilyen. Ha ismerném, már rég használnám.

Előzmény: m54-b (36799)
m54-b Creative Commons License 2022.11.18 0 0 36799

Gondolom a körlevél egyes dokujait akarja átnevezni, valami Excel érték alapján. Én megfontolnám a dokuk elmentésénél a fájlneveket eleve azon Excel adat alapján megadva.

Két legyet egy csapásra.

Előzmény: pimre (36797)
Eredő Vektor Creative Commons License 2022.11.18 0 0 36798

Total commanderben lehet tömegesen fájlokat átnevezni. (Fájlból is ráküldhető, illetve egyedileg szerkeszthetőek a fájlnevek egy txt-ben, amivel aztán felülírja a fájlneveket.)

Előzmény: minimorisz (36796)
pimre Creative Commons License 2022.11.18 0 0 36797

Szerintem ez csak makróval oldható meg. Ez sem lenne könnyű. Tudni kellene hozzá a következőket:

 

1. Mi az egyes Word-be lementett fájlok neve (feltételezem, hogy valami sorszám különbözteti meg őket egymástól)?

2. Ezek a nevek hogyan hozhatók össze az Excel fájlodban lévő adatok valamelyikével. Van valami sorszám oszlop, vagy egyszerűen az Excel táblában elfoglalt sorrendi hely határozza meg ezt?

3. Ha ezek megvannak, akkor honnan (az Excel tábla melyik oszlopából) vegye a program az új név képzéséhez szükséges adatot?

4. A meglévő fájlnév melyik részészéhez fűzze hozzá az egyedi név kiegészítést?

 

Ha ezeket megadod, végiggondolom, mit lehetne csinálni. Jó lenne, ha mintát adnál. 3-4 fájlt, és az Excel tábla fejlécét 3-4 hozzátartozó sorral.

 

Természetesen nem kellenek a valós adatok, ha nem nyilvános információt tartalmaznak. Azaz a doc fájlok akár üresek is lehetnek, elég, ha a nevükből kiderül egy közös, meg a fájlonként eltérő rész. Az Excel tábla sorai is elég ha annak az oszlopnak az adatait tartalmazzák, amivel össze kell hozni a Word dokumentumot.

Előzmény: minimorisz (36796)
minimorisz Creative Commons License 2022.11.18 0 0 36796

Sziasztok!

 

Szeretnék segítséget kérni abban, hogy egy körlevelet szeretnék szétbontani oldalakra, ezeket külön wordbe lementeni. Ez idáig meg is van, azonban az egyes fájlokat tömegesen szeretném átnevezni egy excel adatai alapján, amiből gyakorlatilag a körlevél egyedi adatait vettem. Előre is nagyon köszönöm a segítséget.

Tyorotyere Creative Commons License 2022.11.16 0 0 36795

 

Köszönöm szépen! Túl gondoltam a dolgokat :D De igen ennyire egyszerű ... 

Előzmény: Fferi50 (36793)
Tyorotyere Creative Commons License 2022.11.16 0 0 36794

De! :D Én gondoltam túl a dolgot! .... 

Előzmény: Törölt nick (36792)
Fferi50 Creative Commons License 2022.11.16 0 0 36793

Szia!

Ha sima számként írják be az órát pl. az A1 cellába, akkor B1 képlete: =A1/3

A cella formázása lehet általános vagy szám.

Üdv.

Előzmény: Tyorotyere (36791)
Törölt nick Creative Commons License 2022.11.16 0 0 36792

Mondjuk B2-be

=A2/3

képlet nem jó? Vagy ez egy beugratós kérés?

 

 

Előzmény: Tyorotyere (36791)
Tyorotyere Creative Commons License 2022.11.16 0 0 36791

 

Sziasztok!

 

A segítségeteket szeretném kérni. Klub vagyunk és nálunk 3 óra segítés ér 1 alkalmat. Tehát ha 10 óra segítést ír be valaki a táblázatba akkor 3,33-t ér, vagy ha valaki 2 órát ír be akkor 0,66 -t. Remélem jól számoltam.

 

Szükségem lenne egy ilyen átalakító képletre ami attól függetlenül kiszámolja ezt, hogy 3 nál nagyobb vagy kisebb értéket ír be valaki. Mondjuk úgy gondoltam, hogy az első oszlopba beír valaki 10 órát akkor a mellette lévő cellába kiszámolja az értéket.

 

Sajnos csak az alapokhoz értek excel terén és a makrókhoz egyáltalán nem. Tudnátok segíteni? Köszönöm!

thomas5000 Creative Commons License 2022.11.14 0 0 36790

Köszönöm szépen!

Előzmény: Eredő Vektor (36788)
Vax Creative Commons License 2022.11.14 0 0 36789

Pl. a SPACE egy ilyen karakter. DE mire lehet jó az ilyen navigációs cella? Engem már többször megzavart ha egy cellába indokolatlanul beírtak egyet a szó elé, vagy mögé. Persze már rutinom van, és észreveszem, csak érteni nem értem.

Előzmény: Eredő Vektor (36787)
Eredő Vektor Creative Commons License 2022.11.14 0 0 36788

Előzmény: thomas5000 (36783)
Eredő Vektor Creative Commons License 2022.11.14 0 0 36787

Ott van valamilyen nem látható karakter a cellában. ilyesmire külön opció nincs. Hogy pontosan mi okozza, ahhoz látni kéne a táblát.

Előzmény: mr_ricsi (36786)
mr_ricsi Creative Commons License 2022.11.14 0 0 36786

Sziasztok!

 

Kaptam egy excel táblát, amiben ha a a Ctrl + nyilakkal mozgok, akkor az "A" oszlopban lefelé mozogva az utolsó adatot tartalmazó cella után nem a legutolsó (1048576) cellára ugrik, hanem megáll a 10000 számú cellánál. Oszloponként változó, hogy melyik cellában áll meg. A legtöbb oszlopban a legutolsó cellára ugrik, míg további kettő oszlopban a 6000. cellára.

 

Azt szeretném kérdezni, hogy milyen módon lehet ilyen "navigációs cellákat" elhelyezni a táblákban?

Fferi50 Creative Commons License 2022.11.14 0 0 36785

Szia!

A kimutatás erre megfelelő eszköz. Oldalrovatok - Termék, fejrovatok - Boltok - Szűrő - Dátum vagy Szeletelő - Dátum

Üdv.

Előzmény: Param2121 (36784)
Param2121 Creative Commons License 2022.11.13 0 0 36784

Ez már jobb javaslatnak tűnik, de akkor is problémás, hogy beszúrásokat kell csinálni, vagy felülírhatnak sorokat.

 

Egyenlőre azt találtam ki, hogy A-dátum, B terméknév (meglévőeket ki lehet választani), C bolt (szintén kiválaszthatóak, és ezt ritkán kell bővíteni), D ár.

Az adatbevitel így megvan, bár a dátum problémás, mert azt elírhatják, és máris morognak, hogy többször kell ugyan azt a dátumot beírni.

Ebből egy lista lesz, most tanakodunk, hogyan lehet ebből táblázatot csinálni, ahol látható, hogy adott termék adott napon hol mennyi volt (már, ha voltak aznap minden boltban).

Előzmény: Fferi50 (36777)
thomas5000 Creative Commons License 2022.11.13 0 0 36783

Ez a második munkalap.

 

Előzmény: thomas5000 (36782)
thomas5000 Creative Commons License 2022.11.13 0 0 36782

Sziasztok!

 

Feltételes formázáshoz szeretnék segítséget kérni.

 

Van két munkalapom. Lényege, hogy a 2. munkalap B oszlopában "IGAZ" áll, annak az A oszlopába levő értéket keresse meg az 1. munkalap A oszlopában, és A-D-ig azt a sort színezze zöldre.

 

Nem tudom ez mennyire érthető így. Előre is köszönöm a segítségeket!

 

ZolKa Creative Commons License 2022.11.12 0 0 36781

Köszönöm szépen!

Előzmény: Törölt nick (36780)
Törölt nick Creative Commons License 2022.11.11 0 0 36780
Előzmény: ZolKa (36779)
ZolKa Creative Commons License 2022.11.11 0 0 36779

Kipróbálom, köszi szépen!

Megpróbálok rákeresni.

Előzmény: Sánta Kutya (SK) (36774)
Hrabotica Creative Commons License 2022.11.11 0 0 36778

köszönöm szépen, működik!

Előzmény: Eredő Vektor (36773)
Fferi50 Creative Commons License 2022.11.10 0 0 36777

Illetve A oszlop dátum B oszlop terméknév C-D-E a boltok.

Utána akár kimutatást is csinálhatsz a táblázatból.

Előzmény: Param2121 (36775)
Fferi50 Creative Commons License 2022.11.10 0 0 36776

Szia!

Szerintem fordítsd meg a táblázatot.

A sorokban (A oszlop) írod a dolgok neveit.

A B-D oszlopokban pedig az egyes boltok árait a termék sorának megfelelően.

Üdv.

Előzmény: Param2121 (36775)
Param2121 Creative Commons License 2022.11.10 0 0 36775

Segítséget kérek, hogyan lehet egy táblázatban három paramétert kezelni.

 

Egyszerűnek tűnt, az ember bemegy a három kedvenc boltjába adott napon és felírja, hogy melyikben mennyibe kerül az a pár dolog, amiket gyakran szokott venni. Azután a táblázat létrehozásakor elakadtam.

Az addig megy, hogy az A oszlopban a dátum van, a B-M oszlopokban a dolgok nevei - na de akkor csak az egyik boltban lévő dolgok árait tudom a B-M oszlopok A oszlopnak megfelelő sorába beírni, hová írom a másik két boltét?

 

 

Sánta Kutya (SK) Creative Commons License 2022.11.10 0 0 36774

Hogy beépül vagy nem, azt nem tudom. Annyit csinál, hogy ha rákattintasz a valami.xlsx-re, akkor kiad egy homokórát, aztán egyszer csak megnyit egy csak olvasható xls verziót a temp könyvtárban valami hülye néven, és azt elmentheted magadnak rendes xls-ként.

Előzmény: ZolKa (36768)
Eredő Vektor Creative Commons License 2022.11.10 0 0 36773

a 3. & 4. & 5. cellákat fűzd össze egy segédoszlopban az első oszlopban a többi elé. (& jellel is összefűzhető, vagy az "összefűz" függvénnyel)

 

Amikor megadod a keresési paramétereket külön cellákban, azokat is fűzd össze az fkeres keresési feltételében: FKERES($B$1&$C$1&$D$1;másik tábla;2;0)

Így már megtalálja az fkeres

 

Előzmény: Hrabotica (36772)
Hrabotica Creative Commons License 2022.11.10 0 0 36772

Sziasztok,
már egy ideje agyalok az alábbin:

Van egy táblám amiben sorban az oszlopokban a következők vannak:

  1. Cikkszám
  2. leírás
  3. vastagság
  4. szélesség
  5. hossz

Ezek fel vannak töltve adatokkal.

Egy másik táblában pedig (adatok nélkül) a következő 4 cella van egy sorban:

  • A1: cikkszám, B1:vastagság, C1:szélesség, D1:hossz

Azt szeretném elérni, hogy ha a B1-C1-D1 cellákban megadom a méreteket, és ezekhez egyidejű egyezőséget talál egyszerre az első tábla soraiban, akkor az A1-be az ennek megfelelő cikkszámot húzza be.
Azaz ha beírom hogy pld. B1:1, C1: 100, D1: 1000 és van olyan cikkszámom ahol a méretek 18x100x1000 akkor annak a cikkszámát hozza be az A1-be.

Próbálkozom az Fkeres-Ha-Hol.van függvényekkel de vagy valahogy nem érek el biztos hatást. mit csinálok rosszul?
köszönettel

maciti Creative Commons License 2022.11.10 0 0 36771

Szuper!

 

Köszönöm szépen a segítséget!

Előzmény: Fferi50 (36770)
Fferi50 Creative Commons License 2022.11.10 0 0 36770

Szia!

A Numberformat a cella (Range)  tulajdonsága, ezért csak azt az eredményt kapod vissza, hogy a cellád formátuma nem az általad beírt.

A Textbox szövegének formázásához a Format függvényt kell használnod.

Textbox1.Text=Format(Range("A1").Value,"0.0")

Üdv.

Előzmény: maciti (36769)
maciti Creative Commons License 2022.11.10 0 0 36769

Sziasztok!

Szeretnék egy kis segítséget kérni.

Egy UserForm ablakban lévő text box -ba szeretném beírni egy cella tartalmát, de jó lenne megformázni, pl 1 tizedesjegyre. Nem sikerül, mert "False" jelenik meg a Textboxban, amint formázni akarom a cellát.

 

TextBox1.Text = Range("A1").NumberFormat = "0.0"""

 

Tudna valaki segíteni, hogy miként lehet megformázni?

 

 

Minta:

 

https://data.hu/get/13491200/Mintapelda.xlsm

ZolKa Creative Commons License 2022.11.08 0 0 36768

Nem tudtam, hogy a 2007 gyenge verzió.

Offline kulcsos.

 

Ez a .xlsx konverter beépül a 2000 -be?

Előzmény: Sánta Kutya (SK) (36764)
ZolKa Creative Commons License 2022.11.08 0 0 36767

Nem túl erős a gép amin van, azért váltottam a 2007 -re, mert úgy gondoltam nincs akkora erőforrásigénye.

Előzmény: pimre (36763)
Sánta Kutya (SK) Creative Commons License 2022.11.08 0 0 36766

Ez jó ötlet.

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

Lehet, hogy a telefonos aktiválás még működik.

Én munkahelyen próbálkoztam többször Windows XP aktiválásával, az automata módszer interneten keresztül nem működött, de a betelefonálós igen.

Előzmény: Sánta Kutya (SK) (36764)
Sánta Kutya (SK) Creative Commons License 2022.11.08 0 0 36764

Ide figyelj, az Excel 2007 egy közismerten elbaltázott verzió, ennek a szalagos elrendezésnek az összes gyermekbetegségével. A lehető legrosszabb választás az összes közül. Azonkívül nem tudom, milyen a licenckulcsa, ha interneten kell aktiválni, mint a 2010-et, amivel én próbálkoztam egyszer, akkor már nem engedi. A 2000 még offline kulcsos volt.

 

Nekem ezen a gépen Excel 2000 van a saját céljaimra, plusz a Microsoft által kiadott hivatalos konverter, amivel olvasni tudom az xlsx-et, menteni már csak xls-ként, és ha valamiért muszáj xlsx-et kezelnem, akkor Libre Ofiice-t használok. Az ráadásul biztosan nem akad össze a meglévő Office-telepítésemmel.

Előzmény: ZolKa (36762)
pimre Creative Commons License 2022.11.07 0 0 36763

Egyetértve az előttem szólóval: Értem, hogy váltani akarsz, de akkor miért a következő legrégebbire? Miért nem a 2016, vagy 2019-es verzióra? Mert azt megértem, hogy nem az Office 365-re, ami előfizetős.

Előzmény: ZolKa (36762)
ZolKa Creative Commons License 2022.11.07 0 1 36762

Azért akarok váltani mert nem kezeli az .XLSX formátumot a 2000.

Előzmény: hellsing (36756)
ZolKa Creative Commons License 2022.11.07 0 0 36761

Köszi Neked is és Mindenkinek!

Úgy néz ki megoldódik.

Előzmény: m54-b (36754)
Eredő Vektor Creative Commons License 2022.11.04 0 0 36760

Fájl/Beállítások/Adatvédelmi központ/Adatvédelmi központ beállításai/Dokumentumfelügyelő

 

 

Ha sok munkafüzet van, akkor makróval végig kell nyitni majd bezátni az adott könyvtárban szereplő fájlokat.

 

A kulcs kb. ez a sor lesz a törléshez:

ActiveWorkbook.RemovePersonalInformation = True

Előzmény: hinarhaju (36759)
hinarhaju Creative Commons License 2022.11.04 0 0 36759

Sziasztok!

 

Az excel munkafüzet nyitásakor beírja a tulandonság ablakba, hogy ki nyitotta és módosította ulojára. Ezeket az adatok minden egyes excel fájlban egyesével töröltem. Nincs erre más megoldás? 

Sánta Kutya (SK) Creative Commons License 2022.11.02 0 0 36758

15 :-)

Előzmény: hellsing (36756)
hellsing Creative Commons License 2022.11.02 0 0 36757

Találtam egy mindennél egyszerűbb megoldást: xkeres (xlookup, Excel 2016 óta). Akármelyik oszlopban keres, és akármelyikből visszaadja az értéket, így nem gond, ha a keresett értéktől balra van a visszaadandó. Van beépített hibakezelő ("ha nincs meg") ága is, és többféle keresési és egyezési módja. Vízszintesen is működik. Más függvények, pl. a SUM paramétereiként is használható, mintha címet adna vissza (pl. kezdő és záró dátum közötti összesítés). Vissza tud adni egy értéket egy vízszintes és egy függőleges keresés metszéspontjából stb.

 

Besz@rás, a függvények terén nem láttam ekkora fejlesztést évtizedek óta. Tisztára fkeres/vkeres on steroids.

 

https://support.microsoft.com/en-us/office/xlookup-function-b7fd680e-6d10-43e6-84f9-88eae8bf5929

Előzmény: Törölt nick (36726)
hellsing Creative Commons License 2022.11.02 0 0 36756

OFF: A 22 éves Excelről a 17 évesre szerintem nem éri meg váltani. Ha több gondot okoz a váltás, mint amennyi új eszközt ad, maradj az Excel 2000-nél.

 

:ON

Előzmény: ZolKa (36751)
Törölt nick Creative Commons License 2022.10.29 0 0 36755

Szerintem nincs jelentősége annak, hogy ki mit tekint normálisnak, mivel az Excel működésén úgy sem tudunk változtatni. Vagy visszatérsz a 2000-es verzióhoz, ami még normálisan működött, vagy maradsz az újabbnál, és elfogadod, hogy az meg nem normálisan működik, és keresel olyan kerülő megoldást, ami megfelel a céljaidnak.

Bennem például az is felmerült, hogy feltételes formázás segítségével színnel ki lehetne emelni a számként nem értelmezhető adatokat.

 

Előzmény: ZolKa (36753)
m54-b Creative Commons License 2022.10.28 0 0 36754

Szemlélet kérdése.

 

A    =SZUM(A1:A4) azt jelenti, hogy add össze az összeadhatóakat az A1-A4 között.

A    =A1+A2+A3+A4 pedig azt, hogy add össze az egyes cellák értékét.

Előzmény: ZolKa (36753)
ZolKa Creative Commons License 2022.10.28 0 0 36753

Ez normális működés, ha a SZUM fügvény tartományaban nem értelmezhető érték van akkor nem #ÉRTÉK hibát ad hanem egyszerűen nem veszi figyelembe azt a cellát?

 

Ha simán összadom a cellákat és valamelyik értkéke nem értelmezhető ott #ÉRTÉK hibát ad.

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

Én nem ismerek olyan lehetőséget, ami egy beépített Excel függvény működését megváltoztatná. Talán más tud ilyenről. Illetve egyéb kerülő megoldások lehetnek még.

Előzmény: ZolKa (36751)
ZolKa Creative Commons License 2022.10.27 0 0 36751

Az a baj, hogy van egy táblázatom amiben rengeteg SZUM függvény van. Idáig Excel 2000 -et használtam ott tökéletesen működött. Most az egésszet át kellene írnom?

 

Illetve arra szeretném használni, hogy csak rákattintok SZUM gombra és egy mezőben összeadom a számokat SZUM -al. Így viszont nem biztonságos, mert ha valamelyik számnál mondjuk van egy szóköz nem hoz hibát és az a cella nem fog szerepelni az eredményben.

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

ha mondjuk az összeadandó cellatartomány A1:A8, akkor ez a képlet jó lehet:

 

{=SZUM(ÉRTÉK(A1:A8))}.

 

A kapcsos zárójel azt jelenti, tömbfüggvény. Csak annyit írj be, hogy

=SZUM(ÉRTÉK(A1:A8))

és aztán sima Enter helyett Ctrl+Shift+Enter-rel vidd be.

Előzmény: ZolKa (36749)
ZolKa Creative Commons License 2022.10.27 0 0 36749

Sziasztok!

 

Olyan problémám van Excel 2007 -ben, hogy ha egy mező értékeit össze akarom adni SZUM függvénnyel és van benne egy olyan cella aminek az értéke nem értelmezhető akkor nem adja az #ÉRTÉK! hibát, hanem azt a cellát kihagyja és csak a többi helyes értékű cella értékét adja össze.

Ez a hiba sima összeadásnál nem áll fenn. Hogyan tudnám ezt az ellenörzést bekapcsolni a függvényeknél is?

 

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

Kapsel Creative Commons License 2022.10.27 0 0 36748

Köszi a tippet, megpróbálkozok vele.

Előzmény: Eredő Vektor (36747)
Eredő Vektor Creative Commons License 2022.10.27 0 0 36747

Az ilyen és hasonló transzponálásokat az oszlopok elemi értékekre bontásával szoktam elvégezni, vagy sor-oszlop transzponálással

A teljes képmérethez kattints rá:

 

Előzmény: Kapsel (36746)
Kapsel Creative Commons License 2022.10.27 0 0 36746

Sajnos nem, az xml egyik oszlopának celláiban "table" van. Ha ezt xml táblázatként nyitom (vagy a queryben kibontom), akkor az történik, hogy az adott sorból ugyanannyi plusz sort generál, ahány paraméter/sor van a cellában található "table"-ben.

Az én esetemben ez egy termék lista és a "table" a termék paramétereit tartalmazza, szóval az eredeti sor valahoga így néz ki:

 

A termék cikkszám | Kakaós kalács | "table"

B Termék cikkszám | Nagymama lekvárja | "table"

 

Kibontás után ebből a két sorból lesz sok:

 

A termék cikkszám | Kakaós kalács | Tömeg | 1kg

A termék cikkszám | Kakaós kalács | Íz | kakaós

B Termék cikkszám | Nagymama lekvárja | Tömeg | 500 gramm

B Termék cikkszám | Nagymama lekvárja | Ízesítés | barack

 

Amit én szeretnék megoldani automatikusan (merthogy többezer termékről van szó), az az, hogy ne új sor legyen minden egyes paraméter miatt, hanem új oszlop, valaogy így:

 

A termék cikkszám | Kakaós kalács | Tömeg | 1kg | Íz | kakaós

B Termék cikkszám | Nagymama lekvárja | Tömeg | 500 gramm | Ízesítés | barack

 

A következő lépés pedig az lenne, hogy (miután teljesen különböző termékekről van szó, tehát a paraméterek is eltérőek), hogy az azonos paramétereket, azonos oszlop alá rendezni.

Előzmény: Eredő Vektor (36745)
Eredő Vektor Creative Commons License 2022.10.27 0 0 36745

Szerintem az xml-t ha "xml táblázat"-ként nyitod meg - akkor kibont mindent, ahogy írod.

 

Előzmény: Kapsel (36744)
Kapsel Creative Commons License 2022.10.26 0 0 36744

Sziasztok, van itt valaki esetleg, aki profi power query-ben?

Az a problémám, hogy egy XML fájl betöltése után van pár oszlop, amelyek beágyazott táblát (table) tartalmaznak.
No ezeket a táblákat szeretném úgy "kibontani", hogy azok tartalma ugyanazon sorban, új oszlopokat létrehozva jelenjenek meg szépen sorban, egymás után.

A "sima" expand azt csinálja, hogy új sorokat szúr be...

Nem tudom, hogy érthető-e a probléma leírása...

Metell Creative Commons License 2022.10.21 0 0 36743

Köszönöm a linkeket, belevetem magam...

Előzmény: Eredő Vektor (36742)
Eredő Vektor Creative Commons License 2022.10.21 0 0 36742
Előzmény: Metell (36738)
hinarhaju Creative Commons License 2022.10.21 0 0 36741
Előzmény: Metell (36740)
Metell Creative Commons License 2022.10.21 0 0 36740

Próbáltam, igen. Egyrészt a karakterkészlettel vannak problémák, nem tudom eltalálni, hogy melyiket állítsam be, amikor az Excel visszafejti.

Ilyen probléma Word esetében nincs, az nem kérdez rá a karaterkészletre, és azonnal tudja. (Persze az azonnal az túlzás, mert nagyobb fájloknál elszöszöl rendesen...)

Wordből pedig ctrl_A után másolható, és simán megy Excelbe. (Ez persze nem pont így igaz, mert eléggé memóriaigényesnek tűnik a feladat.)

 

Előzmény: hinarhaju (36739)
hinarhaju Creative Commons License 2022.10.21 0 0 36739

Szia,

 

Az újabb excelnél van olyan lehetőség, hogy pdf-et tud beolvasni. Adatok/Adatok beolvasása/Fájlból - pdf

Ezt nézted?

Előzmény: Metell (36738)
Metell Creative Commons License 2022.10.21 0 0 36738

Jó reggelt!

Nagy, de strukturált pdf fájlokat pakolok át Excel-be kézzel. 

Először copy-paste Word-be, onnan pedig ugyanúgy Excel-be. Közvetlenül nem megy.

Szeretném ezt a folyamatot kissé automatizálni, valamilyen makrós megoldással, vagy VBA programmal.

Biztosan létezik valami egyszerű megoldás. Remélem.

Tudtok segíteni?

Sánta Kutya (SK) Creative Commons License 2022.10.20 0 0 36737

Legalább egyben fagy le az egész. Szép új világ.

Előzmény: hellsing (36736)
hellsing Creative Commons License 2022.10.19 0 0 36736

Nem, azt írják, hogy megmarad a Word, Excel, stb., csak a Microsoft 365-ben, előfizetéssel. Gondolom a tökük tele van az illegál telepítésekkel. A végén nem is lesz majd telepíthető app, csak böngészőben fog futni. Láttunk már ilyet, Google Workspace-nek hívják.

 

Ez a húzás nagy lökést adhat a LibreOffice-nak és társainak.

Előzmény: m54-b (36735)
m54-b Creative Commons License 2022.10.19 0 0 36735

2026 ősz Én ilyen hosszútávra már nem készítek tervet. Pedig viszonylag optimista vagyok...

 

De alapjában azt írják, hogy megmarad a Word is, az Excel is, csak más nevek lesznek.

Értem én, hogy harcolnak a bevételért, de ezek nagyon aljas trükkök. Minden eddigi ilyen intézkedéssel a becsületesek szívták meg.

Majd lesznek tizedárú "hitelesítő" szerverek, vagy a 127.0.0.1-en üzemelők ;-)))

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

"Ennyi volt a 365 pályafutása nálam... "

 

Akkor ez egy rossz hír:

https://pcforum.hu/hirek/25173/32-ev-utan-megszunteti-office-nevu-irodai-csomagjat-a-microsoft

 

Nekem is be kell szereznem egy Office 2021-et, amíg lehet kapni, azzal még pár évig ki tudom húzni.

Előzmény: m54-b (36730)
m54-b Creative Commons License 2022.10.19 0 0 36733

"Megnyitja a fájlt, makrót nem lehet használni, szerkeszteni nem lehet. "

 

Offline, vagy Microsoft fiókba bejelentkezés nélkül.

Előzmény: pimre (36732)
pimre Creative Commons License 2022.10.19 0 0 36732

Én az Office 2019-et használom. Úgy tudom, hogy mindenben azonos a 365-el, de nem igényel online futtatást. "Megnyitja a fájlt, makrót nem lehet használni, szerkeszteni nem lehet. ". Két éve azért kipróbáltam próbaüzemben, és makrót tudtam használni. Viszont Onedrive használatával gondok adódtak. Mivel a programom rendszeresen hozott létre új fájlokat, majd egy részüket használat után bezárta, egy részüket törölte is, a program rendszeresen elakadt. Nyilván a fájl bezárás/törlés ütközött a Onedrive még folyamatban lévő mentésével, vagy egyéb teendőivel. Biztos kezelhető lett volna a dolog, de akkor nem foglalkoztam vele.

Előzmény: m54-b (36730)
m54-b Creative Commons License 2022.10.19 0 0 36731

Revo Uninstaller (van portable is) nagyon hasznos program, tudom ajánlani. Rengeteg szemetet eltávolít, amit a sima uninstall hátrahagy (registry bejegyzések, fájlok).

Induláskor rögtön szolt, hogy annyira rátelepedett a 2007-re, hogy az sem fog működni. Telepítője van, sp3 letöltve, a Windows update még foglalkozik a 2007-es Office-val.

Most minden a régi.

Előzmény: m54-b (36730)
m54-b Creative Commons License 2022.10.19 0 0 36730

A 365-os Office ezek szerint. Agyrém!

Az éjjel feltelepítettem. Ha nem vagyok bejelentkezve, lényegében semmit nem lehet csinálni. Megnyitja a fájlt, makrót nem lehet használni, szerkeszteni nem lehet. Nyomtatás lehetséges.

Mivel kell a 2007-es is (pl. küldi az ismerős a könyvét, hogy megjelenés előtt nézzem át, ezt-azt javítsak. Más verziók használatával örökké gondok voltak. Kétlem, hogy megoldották (egy-két oldalas dokunál nem szokott gond lenni, de egy terjedelmesebb mű esetén, táblázatokkal, képekkel, soha nem ment rendesen. Szóval elindítom a 2007-t. Konfigurálja magát ~ egy perc. Utána működik, de klikkel indítva a következő fájlt, újra konfigurálás... A fájl menüből rendesen meg lehet nyitni, akkor nincs konfigurálás. Ha véletlenül bezárod a Wordöt kezdi ismét a konfigurálást. Excel klikkel nem is nyitja meg a fájlt, csak magát az Excelt.

Hagyod futni ezeket állandóan, akkor elmegy. Egy üres dokut megnyitsz, beleírsz valamit, és ha véletlenül a bezárásra nyomsz a rákérdezésnél meggondolhatod.

Forgalomdíjas net esetén, ha nem csatlakozol, vagy ha leáll a szolgáltató ott vagy a szép, új 365-el és annyi.

A "megbízható helyek" listájára felvettem a "dokumentumok" könyvtárat, akkor már rákérdezett a makrókra (online esetén).

(Július elején fél Kanadában leállt az internet. Mondjuk a kisebbik gond ilyenkor az Office, ha még a bankkártyákkal is gond van.)

Ennyi volt a 365 pályafutása nálam... 

 

Előzmény: pimre (36721)
Fferi50 Creative Commons License 2022.10.17 0 0 36729

Szia!

Sajnos igen. Nézd meg az FX gomb alkalmazásával a képlet eredményét - azt fogod látni, hogy frissítés.

Egyébként a frissebb - 2019-től és 365 - Excelben létező XKERES függvény már megoldja ezt  problémát egy menetben.

Üdv. 

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

"Az Eltolás függvény ugyanúgy Volatile mint az Indirekt"

 

Komolyan? Hm...

Öröm hülyét csinálni magamból :)

Előzmény: Fferi50 (36727)
Fferi50 Creative Commons License 2022.10.17 0 1 36727

Szia!

Én pedig inkább az INDEX HOL.VAN párost javasolnám:

=INDEX(A:A;HOL.VAN(MIN(B:B);B:B;0))

Indoklás:

Az Eltolás függvény ugyanúgy Volatile mint az Indirekt, vagyis minden egyes új képletnél kiszámolódik az értéke, azaz lassú. Persze kevés adatnál ez nem igazán észrevehető, de nagyobb tömegű feldolgozásnál már igen.

Üdv.

Előzmény: Törölt nick (36726)
Törölt nick Creative Commons License 2022.10.17 0 1 36726

Javasolnám az indirekt helyett az eltolást:

 

=ELTOLÁS($A$1;HOL.VAN(MIN(B:B);B:B;0)-1;0)

 

mert:  https://fastexcel.wordpress.com/2016/04/25/indirect-excels-most-evil-function/

Előzmény: hellsing (36725)
hellsing Creative Commons License 2022.10.17 0 0 36725

Összehoztam ezt: =INDIREKT("A"&HOL.VAN(MIN(B:B);B:B;0)), de ha van jobb módszer, jöhet.

Előzmény: hellsing (36724)
hellsing Creative Commons License 2022.10.17 0 0 36724

Hjälp! Hogy lehet FKERES módra megszerezni egy adatot, ha az oszlopok fordított sorrendben vannak (és nem helyezhetem át)? Mondjuk a legfiatalabb kolléga neve kellene, de a név előbb van (A oszlop), mint a születési idő (B oszlop), így az FKERES(MIN(A:A);A:B;2;HAMIS) (ha az A lenne a szül. idő és a B a név) nem pálya.

m54-b Creative Commons License 2022.10.17 0 0 36723

Működik, majd elrakjuk jövőre!

 

Én átléptem a dolgot ;-)

(Az ősi megoldás és magyarázat Ez nem bug, ez feature!)

Előzmény: pimre (36720)
pimre Creative Commons License 2022.10.16 0 0 36722

Na megnéztem, hogy működik a dolog. A HideCaret függvény cursor eltüntető  hatása akkor érvényesül, ha elmegy a fókusz a textboxról. Erre jó az msgbox, de a fókusz áthelyezése egy comman buttonra. 

Viszont a ShowCaret telejsen szükségtelen. Abban a pillanatban, hogy a fókuszt ráküldjük a textboxra, ismét megjelenik a villogó cursor.

Előzmény: pimre (36720)
pimre Creative Commons License 2022.10.16 0 0 36721

A Microsoft mindig meg tud lepni egy túlbiztosítáásos hülyeséggel. Az áltqalam küldött linkeket mindig le szoktam tölteni, ellenőrizve, hogy nem rontottam-e el valamit. Így tettem az előbbi hozzászólásban megadott linkkel is. Le is töltötte a fájlt, de megnyitáskor egy új híbaüzenetet adott:

 

 

Eddig az volt, hogy megengedte eldöntenem, hogy engedélyezem. Erre most egy hosszú cikkre küld, ráadásul angolul. Nekem talán nem lesz probléma, de miért kell így kicseszni a felhasználókkal!!!

Most is be van állítva a makrók tiltása értesítéssel, de a beállítások közt egyelőre nem találok univerzális megoldást. 

pimre Creative Commons License 2022.10.16 0 0 36720

Csak nem hagyott nyugodni a dolog, mert érdekes volt. SIkerült csinálni egy tesztprogramot, aminél a kikapcsolás működik: https://drive.google.com/file/d/14hhVk-84CkukFSTTgmXCRgItTWXDF9P3/view?usp=sharing

 

A program a modulból indul, és a textbekér függvény kapcsolja ki a cursort. Egy furcsaság: Sokáig azt hittem, hogy nem működik, de aztán amikor msgbox-al ellenőriztem a függvény visszaadott értékét, akkor egyszerre csak jó lett. Próbáltam várakoztatással 10 mp-ig, arra nem reagált. Ezért benne hagytam. A visszakapcsolás is működik, de csak akkor, ha ismét ráállítjuk a setfocust. Az unload parancsra tett brake-el ellenőrizhető.  

 

Ami az msgbox kiváltását illeti, emlékszem, hogy sok éve hasonló problémánál Jimmy adott megoldást, nevezetesen a programmodulba elhelyezett észrevehetetlen idejű várakoztatás meghívásával. Most nincs időm előkeresni, de ha az irány jó, akkor majd előkeresem.

Előzmény: m54-b (36717)
Törölt nick Creative Commons License 2022.10.16 0 0 36719

Nem átlátszó, hanem csak a kis kockát takarja le :) A Checkbox teljes mérete lehet akkora mint egy focipálya, de ebből a kis négyzet, amibe a pipa kerül, csak 2x2 mm. Csak a kis négyzetet azt kell letakarni, a többit nem. De ezzel leszálltam a témáról.

Előzmény: m54-b (36718)
m54-b Creative Commons License 2022.10.16 0 0 36718

Átlátszó Label? Mindegy, nem működött (nekem).

Előzmény: Törölt nick (36715)
m54-b Creative Commons License 2022.10.16 0 0 36717

Ezeket a Caret-os dolgokat megtaláltam, de csak hibaüzeneteket sikerült létrehoznom

 

pl. https://social.msdn.microsoft.com/Forums/en-US/7d4536ed-d4be-4cff-80f1-b2d69e230027/hide-caret-of-a-textbox?forum=Vsexpressvb

Előzmény: pimre (36716)
pimre Creative Commons License 2022.10.16 0 0 36716

Ezt találtam: https://www.vbforums.com/showthread.php?405192-How-to-turn-on-and-off-the-cursor-in-the-textbox

Ki akartam próbálni, de nekem type mismatch-al leáll. Lehet, hogy ezt a CARET dolgot másképp kellene kezelnem, mint ahogy írják, de hátha neked sikerül.

 

Igaz, hogy elvileg win32-re íródott, de van, akinek win10 alatt is működik (csak XP-n nem): https://www.anycodings.com/1questions/3851262/hidecaret-has-no-effect-on-windows-xp-x64

 

Előzmény: m54-b (36714)
Törölt nick Creative Commons License 2022.10.16 0 0 36715

Bár már mindegy, de a letakarást így gondoltam:

 

 

 

 

A torta a checkbox része, ha a tortára kattint a user, azt a Checkbox fogadja.

 

 

Előzmény: m54-b (36714)
m54-b Creative Commons License 2022.10.16 0 0 36714

Nem rossz! De már kidobtam az egész billentyűfigyelést. T.i. a szülő form tartalmazza azt. Ha valaki azt akarja használni, akkor ne menjen az egerészős részre. A letakarás viszont nem jó, mert akkor az egér nem a CheckBoxon van, hanem a Labelon, arra külön kellene rakni egy egérklikk figyelőt.

Mindenesetre köszönöm!

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

Mi lenne, ha TextBox helyett CheckBox-t használnál? Az fogadja a fókuszt is, a billentyűzetet is, az egérkattintást is, és ugyanúgy bele lehet tenni a képet mint egy textbox-ba.

Annyi az extra, hogy magát a CheckBox kockát le kell takarni egy megfelelő háttérszínű, border nélküli Label-lel.

Előzmény: m54-b (36712)
m54-b Creative Commons License 2022.10.16 0 0 36712

Köszönöm!

Próbáltam, de a gond az, hogy a textbox1-ben figyelem az egér klikkelést (és a billentyűzetet is), tehát átkerül a fókusz oda.

 

Ilyen a form. Ha nem klikkel, akkor egy időzítő növeli a szóközök számát.

Meghagytam (volna) lehetőségnek a szóköz, és még 3 másik bill. figyelését.

 

Maradok én is a kerülő megoldásnál. A bill. figyelés nem létszükséglet, csak az egéré. Lehagyom a bill. figyelést, és akkor nem kell a textbox.

 

(A form-on van kilépésgomb, induláskor arra kerül a fókusz. A bill. figyelés nem megy, mert lenyeli a kilépőgomb. A fókuszt nem lehet label-re állítani, ezért a textbox.)

 

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

Hirtelen csak egy kerülő (és eléggé sufnituning-szagú) megoldást tudtam összehozni.

Tettem a Form-ra 2 textbox-ot, TextBox1 és TextBox2. A kettő közül a TextBox2 (piros nyíl) szélessége 0.

 

 

Kód:

 

Private Sub TextBox2_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    TextBox1.Text = TextBox2.Text
End Sub

Private Sub TextBox1_Enter()
    TextBox2.SetFocus
End Sub

 

Így amikor belépnél a látható TextBox1-be, valójában a TextBox2-be lépsz be, és amit a 2-be beírsz, az megjelenik az 1-ben.

A 2-ben - bizonyára - ott villog a kurzor, de a 0 szélesség miatt nem látszik.

Előzmény: m54-b (36710)
m54-b Creative Commons License 2022.10.15 0 0 36710

Userformon levő textboxban hogyan lehet elrejteni a cursort (ne villogjon)?

maciti Creative Commons License 2022.10.13 0 0 36709

Köszönöm!

Új oszlopokat varázsoltam és máris működik...

Az "ARÁNY" is jó lett! Most már!

Köszi a segítséget!

Előzmény: Eredő Vektor (36708)
Eredő Vektor Creative Commons License 2022.10.13 0 0 36708

a számított mező csak azokkal az értékekkel működik, amelyeket az Értékek" dimenzióba vannak húzva. Nálad a "HA" fgv logikai értéke sorok dimenzióban. Ez így nem fog menni.

 

Az érték hibát azért hozza, mert "" (üres sztring) kerül az ÉRTÉK dimenzióba az "ARÁNY" nevű  számított mezőnél. De ha ez kijavítod, akkor sem lesz jó a fentiek miatt.

Előzmény: maciti (36706)
Eredő Vektor Creative Commons License 2022.10.13 0 0 36707

Miért nem inkább segédoszlopokban számolod ki ezeket - a meglévők mellett. Majd ezt foglalod pivotba.

?

Előzmény: maciti (36706)
maciti Creative Commons License 2022.10.13 0 0 36706

Sziasztok!

Az előbbihez kapcsolódva...

A fájlt feltöltöttem ide:

https://data.hu/get/13460216/rendeles_minta.xlsx

 

 

Előzmény: maciti (36705)
maciti Creative Commons License 2022.10.13 0 0 36705

Sziasztok!

Szeretnék egy kis segítséget kérni. Egy táblázat adataiból készítettem kimutatást. Ehhez még tettem 3 számított mezőt, (IttVan, NincsItt, Ráta) de nem akar összejönni. A képletet mintha nem érzékelné... Próbáltam többféle módon megírni, idézőjellel, aposztroffal, a szöveg helyett számot is próbáltam, de nem működik. Van valakinek ötlete, mit szúrtam el?

 

Ez az adatbázis:

 

 

Ez az eredmény:

 

Én pedig azt szeretném, ha így nézne ki:

 

A számított mezők beállításai:

 

Remélem elég jól körülírtam, hogy mi a problémám...

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

 

lacika521 Creative Commons License 2022.10.11 0 0 36704

Ja, elfelejtettem bemutatkozni, Delila vagyok.

Előzmény: lacika521 (36703)
lacika521 Creative Commons License 2022.10.11 0 0 36703

Már régen nem enged a fórummotor a saját jelszavammal belépni. Most, idegen tollakkal lépek be, és válaszolok, hátha ide tévedsz.

A számformátumokhoz ezt nézd meg, itt kiderül, mit jelent a #, és mit a 0.

https://excel-bazis.hu/tutorial/egyeni-szamformatumok-haladoknak

Előzmény: QUNarmy (36682)
Törölt nick Creative Commons License 2022.10.09 0 0 36702

Az Inputbox Cancel gombra False értéket ad vissza. (Emiatt lényeges, hogy a változó Variant-ként legyen deklarálva.)

Előzmény: m54-b (36701)
m54-b Creative Commons License 2022.10.09 0 0 36701

Ez még jobb

 

If StrPtr(i) = 0 Then Exit Sub

megadhatsz üres értéket is, csak a "Cancel", vagy a jobb felső "x" (bezárás) esetén lép ki.

Előzmény: thomas5000 (36700)
thomas5000 Creative Commons License 2022.10.09 0 0 36700

Ahhh. Köszönöm szépen.

Előzmény: m54-b (36699)
m54-b Creative Commons License 2022.10.09 0 0 36699

 If i = "" Then Exit Sub

Előzmény: thomas5000 (36698)
thomas5000 Creative Commons License 2022.10.09 0 0 36698

Sziasztok!

 

Egy olyan InputBox-ra lenne szükségem, ami bekér egy adatot, és amit odabeírok, az megjelenne a P27 cellában.

Viszont miután ezt megtörténik, újra jöjjön fel a bekérő message, amire újra adok értéket, és újra beírja a P27 cellába.

Tehát loop kéne. Amit meg is csinálok, viszont nem tudok belőle kilépni. Az lenne a jó, ha a cancel megnyomásával is ki tudnék lépni belőle, és az ESC megnyomásával is.

 

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

 

Sub InputBox_Kiad()

Dim i As Variant

i = InputBox("Radio ID", "Radio Information", "Type Here")

Range("P27").Value = i
Loop
End Sub

 

 

Valami ilyet ollóztam össze a netről, csak hát nem tudom hogy kéne neki kilépés feltételt adni. Állandóan hibába futok, és meguntam kicsit.

Eredő Vektor Creative Commons License 2022.10.06 0 0 36697

tudsz. 

Fájl / Megnyitás / Tallózás / a felugró ablak jobb felső sarkában lévő mezőbe írva tudsz keresni fájlokat.

(Ez igazából oprendszer, nem excel)

Előzmény: Szekely11 (36693)
Szekely11 Creative Commons License 2022.10.06 0 0 36696

nagyon köszi! Meglett! :D 
További szép napot! 

Előzmény: m54-b (36695)
m54-b Creative Commons License 2022.10.05 0 0 36695

[ALT] + [F7]-re adja ki ezt az ablakot

Előzmény: m54-b (36694)
m54-b Creative Commons License 2022.10.05 0 0 36694

Én a Total Commander-t használom erre.

 

 

 

Amit keres: * (minden fájt), vagy *xlsx csak excel fájlok

A "Szöveg" mezőbe a keresett szó

 

Ha körülbelül tudod a dátumot, akkor a "Bővített" fül alatt beállítod

 

Aztán a "Keresés indítása".

 

Elvileg tudja a fájlkezelő is (tudomásom szerint), de én kikapcsoltam az "Indexelés"-t, nem tudom ellenőrizni.

Előzmény: Szekely11 (36693)
Szekely11 Creative Commons License 2022.10.05 0 0 36693

Sziasztok, excelben valahogy tudok keresni anélkül hogy megnyitnám? 
(azért lenne ez fontos nekem mert ezer mappa és ennél több almappa között valahol lapul egy tábla amiben tudom hogy milyen egyedi kulcsszavak lapulnak, erre valahogy tudok úgy keresni mint a fájlkezelőben a fájl nevekre?) 

Fferi50 Creative Commons License 2022.10.04 0 0 36692

Szia!

SZUMHATÖBB függvény jó lehet erre, pl.

=Szumhatöbb(B:B;D:D;D2;A:A;A2)

Üdv.

Előzmény: jupi95 (36685)
Metell Creative Commons License 2022.10.04 0 0 36691

Yesssss!

Működik. Köszönöm szépen, erre vágytam. :)

Előzmény: m54-b (36690)
m54-b Creative Commons License 2022.10.04 0 0 36690

Makró?

 

Sub behuzas()

For i = 1 To 5
Cells(i, 1).Select
With Selection
    x = .IndentLevel
End With
Cells(i, 2).Value = x
Next i

End Sub

 

Az eredmény:

 

Előzmény: Metell (36689)
Metell Creative Commons License 2022.10.04 0 0 36689

Talán sikerült. 

Szóval ha nem voltam elég béna, akkor tud valaki segíteni, hogy miként nyerem ki azt az értéket?

Üdv

Metell Creative Commons License 2022.10.04 0 0 36688

Bocsánat, kűzdök vele, hogy át tudjam küldeni a szépen magrajzolt kérdést....

Metell Creative Commons License 2022.10.04 0 0 36687

Sziasztok! Van vagy 100 cella, amiben a behúzás mértéke adja meg a tartalomnak egy beépülési listában elfoglalt szintjét. Erre az adatra lenne szükségem a szint száma miatt, de nem tudom kiolvasni. 

Vizualizálom a dolgot:

Kellene valami képlet, vagy megoldás, amivel a jelölt értéket ki tudom nyerni. Tudtok segíteni?

 

 

Törölt nick Creative Commons License 2022.10.04 0 0 36686

pivot tábla?

Előzmény: jupi95 (36685)
jupi95 Creative Commons License 2022.10.04 0 0 36685

Sziasztok, szeretnék segítséget kérni, hogy milyen képlettel tudnám kiszámítani az alábbi táblázatban, hogy az adott személy nevéhez, adott naphoz tartozóan összesen hány perc szerepel?

 

Előre is nagyon köszi!

QUNarmy Creative Commons License 2022.09.29 0 0 36684

Ezt néztem tegnap, de ebből nem oldottam volna meg a feladatot

Előzmény: E.Istvan (36683)
E.Istvan Creative Commons License 2022.09.29 0 0 36683
Előzmény: QUNarmy (36682)
QUNarmy Creative Commons License 2022.09.29 0 0 36682

Kösznömö működik.

 

Hogy legközelebb ne legyen gondom hasonlókkal eltudnád magyarázni mit jelent az excel számára a #?

 

# ##0;"minimum: "-# ##0

 

Hogy ezt az egész képletet miként értelmezi ő?

 

Előre is köszi a segítséget :)

Előzmény: Delila10 (36679)
Törölt nick Creative Commons License 2022.09.28 0 0 36681

jelöld ki a teljes területet (példádban C7:T7), aztán így add meg a feltételes formázás képletét:

=C7=MIN($C$7:$T$7)

Előzmény: hellsing (36680)
hellsing Creative Commons License 2022.09.28 0 0 36680

Help! Feltételes formázással szeretném kiemelni egy terület legkisebb értékét. Próbáltam feltételként képletet megadni (pl. =min(c7:t7)), és formázásként zöld hátteret adi, de nem történik semmi. Van egyedi legkisebb érték a megadott területen.

 

Hogy lehet megoldani?

Delila10 Creative Commons License 2022.09.28 0 1 36679

Szia!

 

A D3 cellát formáztam. A feltételes formázás képlete =D3=-50, a számformátum pedig 

# ##0;"minimum: "-# ##0

 

Előzmény: QUNarmy (36678)
QUNarmy Creative Commons License 2022.09.28 0 0 36678

Sziasztok,

 

cellaformázásnál lehet olyat, hogy ha a cella értéke -50 de formázással a "minimum:" szót eléraknám, akkor úgy jelenítse meg, hogy minimum:-50

 

Mert beírom a formázáshoz, hogy "minimum:"0, de ekkor úgy formázza, hogy -minimum:50

 

Törölt nick Creative Commons License 2022.09.26 0 1 36677

Nem baj, hogy nem küldted el mind a 22 ezer sort, úgyse pötyögtem volna be mindet :)

Viszont ajánlom figyelmedbe a topikleírásnak azt a részét, amikor a kérdező feltölt egy minta táblázatot a Data.hu-ra, vagy akárhová. Némileg leegyszerűsíti a válaszadó dolgát.

 

Ami a kérdésedet illeti, nos ez kicsit bonyolultabb, mert itt már szűrni is kell. Ezt csak két segédoszloppal tudtam megoldani.

Illetve, közben rájöttem, hogy a 100000 helyett az üres sztring is megteszi, így valamivel esztétikusabb is lett a kép:Képletek:

H2 =HA(B2<>"Szabad";"";HA(VAGY(A1<>A2;E1<>E2);SOR();""))

I2 =HA(B2<>"Szabad";"";HA(B2<>B3;SOR();HA(ÉS(A2=A3;E2=E3;D2=C3);"";SOR())))

J2 =INDEX(A:A;KICSI($H:$H;SOR()-1);1)

K2 =INDEX(C:C;KICSI($H:$H;SOR()-1);1)

L2 =INDEX(D:D;KICSI($I:$I;SOR()-1);1)

M2 =INDEX(E:E;KICSI($H:$H;SOR()-1);1)

 

Az első sofőr adatait nem írtam be végig, ezért a 14:57-16:40 Oroszlány sor hiányzik az eredményből, de a többi megegyezik az elvárttal.

 

A képletek helyes működéséhez A oszlop majd  C oszlop szerint emelkedő sorrendben kell lenniük az adatoknak, valamint az adatoknak a teljes időszakot megszakítás nélkül le kell fedniük.

intervallumoknak folytonosaknak kell lenniük. Például, ha a 10:20-as tatai érkezés időpontját megváltoztatod 10:10-re, viszont a következő indulás 10:20-kor van, akkor keletkezik 10 perc, ami nincs lefedve, és ettől kicsit meg fog borulni a táblázat. (Amúgy az adataidban van is egy ilyen szünet 12:25 és 12:54 között, amikor a sofőr valahogy átkerült T-ből TB-be.)

A G oszlopot javaslom meghagyni üresen, hogy a forrásadatok esetleges sorba rendezése ne kuszálja össze a H:M oszlopok tartalmát.

Előzmény: Gábor790 (36675)
Gábor790 Creative Commons License 2022.09.26 0 0 36676

Előzmény: Gábor790 (36675)
Gábor790 Creative Commons License 2022.09.26 0 0 36675

Elnézésed kérem, tökéletesen igazad van! A Te megoldásod tökéletes volt, valószínű hogy én adtam meg kevés információt, ezért most beillesztem ide a 22 ezer soros excel első részét. 

 

Az "A" oszlopban un. forda kódok vannak, amik 1 napi feladatot jelentenek, összetartoznak. Másik kód már másik emberhez tartozik, ezért annak az ideje független az előzőtől. A "B" oszlopban csak a "szabad" szövegűeket kell figyelembe vegye, ez alapján amit egy külön oszlop(ok)ban szeretnék eredményül kapni, az a szabad jelzésü, szabad kapacitás rendelkezésre állását, időtartamtól időtartamig és helyszínnel. Vagyis ebben a példában:

 

5:16-5:25 Oroszlány

8:54-12:25 Tata

12:54-13:10 Tatabánya

13:39-13:55 Tata

14:57-16:40 Oroszlány

5:40-5:42 Oroszlány

7:34-7:45 Komárom

 

Köszönöm ha segítesz és elnézést ha értelmetlenül fogalmaztam az előzőekben!

Gábor

Előzmény: Törölt nick (36666)
Eredő Vektor Creative Commons License 2022.09.25 0 0 36674

Ha jól emlékszem, csoportban kijelölt munkalapok is besorolodnak nyomtatasba

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

 

Egyszer még hasznos lehet, ha most nem is...

 

 

Előzmény: Sánta Kutya (SK) (36672)
Sánta Kutya (SK) Creative Commons License 2022.09.24 0 0 36672

Igen, ezt is megfontoltam, de nem ismerek olyan opciót, hogy egyben lehessen nyomtatni az összes munkalapot.

Egyébként egy Word körlevélben is egymás alá kerülnének egy dokumentumba. :-) Kinyomtatják, aztán eldobják a dokumentumot, őket csak a papír érdekli.

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

Én nem másolgattam volna egymás alá a különböző emberek dokumentumait, hanem minden szerződést külön munkalapra. Ha teljes munkalapot másolsz (Worksheet.Copy), ott tuti biztosan megmarad minden formázás.  A munkalapot aztán elnevezném a dolgozóról (ha belefér a kolléga neve 32 karakterbe), és mehet minden szerződés/munkalap egy közös, a programtól és a sablonoktól független új munkafüzetbe. Bár ez utóbbi attól is függ, hány érintett dolgozó van. Pl. 500 munkalap egy munkafüzetben már nem annyira barátságos, de 40-50 még simán belefér.

Előzmény: Sánta Kutya (SK) (36667)
Sánta Kutya (SK) Creative Commons License 2022.09.23 0 0 36670

Igen, de nem egyenként beállítgatni akartam, hanem tartományszinten átmásolni a formázást.

Habár végszükség esetén, gondolom, ugyanezzel a tulajdonsággal le is kérdezhető az eredeti, és ciklusban át lehet másolni... Ez nem jutott eszembe. Csak nem értem, hogy ha van az oszlopszélességre paraméter a PasteSpecialban, akkor miért nincs a sormagasságban. Köszi!

Előzmény: Fferi50 (36669)
Fferi50 Creative Commons License 2022.09.23 0 0 36669

Szia!

A sormagasságot a Range objektum  RowHeight tulajdonságával állíthatod. Ahogyan kézzel is, itt is csak az egész sor magassága állítható.

Üdv. 

Előzmény: Sánta Kutya (SK) (36667)
Sánta Kutya (SK) Creative Commons License 2022.09.23 0 0 36668

Viszont összességében a próbálkozással, kereséssel, helyszíni beüzemeléssel eltöltöttem több mint tíz órát. Szerintetek sok ez egy ilyen feladatra? Sajnos a VBA-ban nincs akkora rutinom, folyton szintaxisok után kell keresgélni a korábbi makróimból meg a Google barátomtól.

Előzmény: Sánta Kutya (SK) (36667)
Sánta Kutya (SK) Creative Commons License 2022.09.23 0 0 36667

Hát nagyon szépen köszönöm mindenkinek a segítséget, a dolog működik, bár ma volt egy álmatlan éjszakám. Rájöttem, hogy nem való az nekem, hogy egyszerre programozzak Wordöt és Excelt, és ha hiba van, azt se tudjam, melyikben kell keresni, és a feladat igazából nem is igényli.

 

Van egy adatforrás, amiben a megfelelő három oszlopban x-ekkel jelölik, hogy kinek kell az adott típusú dokumentumot kitölteni. Van egy másik táblázat, amit a dolgozóknak nem kell szerkeszteniük, ebben vannak a makrók, az első munkalapon három gomb a három feladathoz. A következő kettőre bemásoltam azt a két mintát, amit Excelben kaptam, kigyomlálgattam belőlük a pontokat ("NEVE:......................." helyett most "NEVE: " van stb.). A harmadikon manuálisan létrehoztam azt, amit PDF-ben kaptam. Ezen szerencsére csak két változó mezőt kell kitölteni. A makró megnyitja csak olvasásra az emberek adatait. Egy ciklus végigmegy a gombnak megfelelő oszlopon, és ahol talál x-et vagy bármi mást, annak az embernek az adataival kitölti az űrlap tartományának a másolatát, vagyis pl. a fenti "NEVE: " helyett a régi érték és a beírandó adat konkatenációja lesz, így nem kellett külön cellát keresni az eredménynek. A számként megadott adatokat szépen meg is formázza. A trükk az, hogy a második embertől kezdve egy oldaltöréssel indít, és utána másolja az űrlapot (range). Ez is volt az első ötletem. Tehát tulajdonképpen leprogramoztam Excelben egy konkrét körlevelet, mezőről mezőre, a másik kettő ezek után már könnyen ment. Ez a dokumentum megtekinthető és nyomtatható. Nem atombiztos, nem adnám be szakdolgozatnak, de két embernek kell használnia, és nekik elmondtam, mire figyeljenek.

 

Ami az érdekes, hogy a formázott másolás nem viszi át a cellaméreteket. Találtam egy olyan paramétert, amitől átviszi az összes oszlopszélességet, de nem találtam meg az ennek megfelelő sormagasságot, így az eredeti hiába fér ki szépen egy oldalra, az eredmény nem mindig, de ezen trükközéssel lehet segíteni.

Törölt nick Creative Commons License 2022.09.22 0 0 36666

Biztos öregszem, de nem értem, hogy mit szeretnél. Tudod, én nem ismerem a folyamatot, amit ezzel a táblázattal modellezel. Maximum találgatni tudnék, de ott megvan az esély, hogy tévedek. Annál meg nincs elszomorítóbb (kicsit keményebben fogalmazva: bosszantóbb), mint amikor félreértek egy kérdést, és adok egy tökéletes megoldást egy nem létező problémára.

 

Nem zárom ki, hogy valaki más itt a fórumon kicsit kevésbé kemény fejű mint én, és ennyi infóból is megoldja neked. De ha tőlem vársz választ, akkor kérlek mutass egy előtte-utána állapotot, tehát hogy miből mit szeretnél kapni. Az is elbírna egy kis részletezést, hogy mit jelent a "csak azokra van szükségem" kifejezés? És miért van most egy helyett két helység-jellegű oszlop? Ezeknek nincs kihatása az eredményre? Meg aztán... ezek után óhatatlanul felmerül a kérdés: nincs még véletlenül néhány egyéb tényező, amit elfelejtettél megemlíteni?

Előzmény: Gábor790 (36663)
m54-b Creative Commons License 2022.09.22 0 0 36665

Szerintem ez a végleges megoldás, aminél már csak szebbet lehet készíteni.

 

Így néz ki az Excel

 

 

Ez benne a makró:

 

Sub korlevel()

Dim wordnev(3) As String
wordnev(1) = "korlevel-1.docm"
wordnev(2) = "korlevel-2.docm"
wordnev(3) = "korlevel-3.docm"
utvonal = ActiveWorkbook.Path
utvonal = utvonal & "\"
adatok = ActiveWorkbook.FullName

For i = 1 To 3
    strfilename = utvonal & wordnev(i)
    strFileExists = Dir(strfilename)

   If strFileExists = "" Then
        MsgBox "Nem található a " & strfilename
        hiba = True
   End If
Next i
  If hiba Then Exit Sub
 
For i = 1 To 3

Set wordapp = CreateObject("Word.Application")
wordapp.Visible = True
Set worddoc = wordapp.Documents.Open(utvonal & wordnev(i))
'wordapp.Activate
With worddoc
    .MailMerge.OpenDataSource (adatok), Connection:="Provider=Microsoft.ACE.OLEDB.12.0;User ID=Admin;" & _
        "Data Source=StrMMSrc;Mode=Read;Extended Properties=""HDR=YES;IMEX=1"";", _
        SQLStatement:="SELECT * FROM `Munka1$`", SubType:=wdMergeSubTypeAccess
    .MailMerge.HighlightMergeFields = True
    .MailMerge.ViewMailMergeFieldCodes = False
    .MailMerge.DataSource.ActiveRecord = wdLastDataSourceRecord
End With
wordapp.Run "korlevel_befejez"
Set worddoc = Nothing
Set wordapp = Nothing
DoEvents
Next i

MsgBox ("Kész!")

End Sub

 

Ez a Word docm

 

 

Benne a makró:

 

Sub korlevel_befejez()
'
 ez_a_doc = ActiveDocument.FullName

    With ActiveDocument.MailMerge
        .Destination = wdSendToNewDocument
        .SuppressBlankLines = True
        With .DataSource
            .FirstRecord = 1
            .LastRecord = wdDefaultLastRecord
        End With
        .Execute Pause:=False
    End With
    
Documents(ez_a_doc).Close SaveChanges:=wdDoNotSaveChanges

End Sub

 

A három körlevél létrehozásakor mindegyikbe ez a makró kerül.

Adatforrásnak az Excel fájlt kell megadni.

Beszúrni a megfelelő mezőket.

 

A piros nyíllal jelölt helyre a következőt:

 

 

 

 

"Mezőnév" az aktuális dokumentumhoz tartozó (Excel) oszlop, ami alapján szűrünk.

 

 

 

Remélem érthetően írtam. Ha kell közzéteszem a mintáimat.

Előzmény: Sánta Kutya (SK) (36641)
Gábor790 Creative Commons License 2022.09.22 0 0 36664

A kép lemaradt.

 

 

Előzmény: Gábor790 (36663)
Gábor790 Creative Commons License 2022.09.22 0 0 36663

Kérnék még egy kis további segítséget, ha lehet, valószínű neked ez 2 perc lesz megoldani. A problémám, hogy kell egy plusz szűrőt berakni az oszlopokra, mert van egyéb tevékenység is. Tehát így néz ki jelenleg az adatállomány egy része, csak azokra van szükségem, amik az A oszlopban "Szabad" jelölést kaptak, a többi ugyanaz mint amit legutóbb leírtam. Jó volt a megoldásod, csak ez a szűrő sajnos bezavart nálam.

 

Ezeket használtam:

 

F oszlop: =HA(A2="Szabad";HA(B2-E1=0;SOR();100000);"100000")

G oszlop: =INDEX($B:$B;KICSI($F:$F;SOR(B1));1)

H oszlop: =ELTOLÁS(INDEX(E:E;KICSI($F:$F;SOR(B1)+1);1);-1;0)

I oszlop: =INDEX(D:D;KICSI($F:$F;SOR(D1));1)

 

Köszönöm ha segítesz!

Üdv: Gábor

 

 

Előzmény: Törölt nick (36636)
pimre Creative Commons License 2022.09.21 0 0 36662

Kösz, de az a próbálkozás sok-sok évvel ezelőtt volt, azóta Excel adatforrással tökéletesen működik. Már nem állnék át a word-re.

Ráadásul Office 2010 óta (vagy már 2007 is?) nem csak a munkafüzetet, hanem a munkalapot is meg kell adni a csatolásnál. Ez azzal az előnnyel jár, hogy hasonló témában kicsit eltérő címzettípusoknál (pl. Sánta Kutya 3 sablonja) lehet ugyanazt a munkafüzetet használni adatforrásnak. Ezt word-el nem tudnám megcsinálni.

 

Azért lehet, hogy egyszer tepasztalatszerzés céljából kipróbálom.

 

Előzmény: m54-b (36661)
m54-b Creative Commons License 2022.09.21 0 0 36661

próbálkoztam Word táblázatot használni adatforrásnak, de nem jött össze

 

Ha csak a táblázatból áll a Word, akkor könnyű, pont mint az Excel. A táblázat első sora a mezőnevek legyen.

 

A körlevélnél a "Meglévő lista használata",

 

Megnyitod a Word dokut, aztán mehet tovább.

(Ez a 2007-es Office-ra vonatkozik, újat még nem használtam.)

 

Előzmény: pimre (36654)
Sánta Kutya (SK) Creative Commons License 2022.09.21 0 0 36660

Bejöttem a megrendelőhöz, de nem fogok tudni végezni munkaidőben. Szerintetek ha otthon egy nem aktivált Office 2010-ben dolgozom, akkor az a makró fog itt működni az Office 365-ben?

Sánta Kutya (SK) Creative Commons License 2022.09.21 0 0 36659

Nem, ez egy O365, és a korlevel.xlsx-be köt bele.

Előzmény: m54-b (36658)
m54-b Creative Commons License 2022.09.21 0 0 36658

Ha Excel makróval megnyitott Word dokud van, akkor a 2007-es Office-ban jogosultsági hibával nem lehet menteni az Ecelt. Nem ilyesmi van a háttérben?

Előzmény: Sánta Kutya (SK) (36655)
m54-b Creative Commons License 2022.09.21 0 0 36657

Lehet.

 

Így néz ki az Excel

 

 

Ez pedig a Word, amikor az adatforrást választod

 

 

 

Kiveszed a pipát "Az első adatsor..."-nál. Aztán a

 

 

Ezt kapod

 

 

Csak a tényleges adatokat hagyod meg. A mező beszúrásnál lesznek a gondok, mert nincs fejléc, nézned kell az Excelt.

 

Az F1, F3 az üres első sori cellák.

 

Makróban nem tudom, egy felvett makró megfelelhet erre.

Előzmény: Sánta Kutya (SK) (36653)
pimre Creative Commons License 2022.09.21 0 0 36656

És nem működik a tartalom engedélyezés? Lehet, hogy a rendszergazda blokkolta?

Előzmény: Sánta Kutya (SK) (36655)
Sánta Kutya (SK) Creative Commons License 2022.09.21 0 0 36655

Kb. begolyózok ettől az akárhányas hiperszper új Office-tól. Most azt írja ki, hogy a menteni kívánt fájltpust (Excel 2007 vagy újabb) A továbbfejlesztett blokkolási funkció blokkolta... Hogy szüljön sünt, aki ezt kitalálta. Nem véletlenül használok a privát gépemen Office 2000-et. :-)

pimre Creative Commons License 2022.09.21 0 0 36654

Nekem még sose jutott eszembe, hogy kipróbáljam. Valahogy nem tünt logikusnak De az is lehet, hogy olvastam valahl, és elhittem. Viszont most rákerestem, és ezt találtam: https://informatika.gtportal.eu/?f0=w7_korlevel_101 

 

és ebben: "Az adatforrás lehet: Word táblázat, Excel táblázat, Access tábla, stb...
A táblázat első sora az oszlopfejléc rekord, vagyis a mezőneveket tartalmazza. Ezeket a mezőneveket használjuk a törzsdokumentumban. A következő sorok a levélben felhasznált adatok, az adatrekordok. Ha végeztünk a táblázat kitöltésével, akkor azt is mentjük a háttértárra."

 

Ami engem illet, sok évvel ezelőtt próbálkoztam Word táblázatot használni adatforrásnak, de nem jött össze. Hamar feladtam. Az Excel meg adta magát. Access meg nálam szóba sem jött.

Előzmény: Sánta Kutya (SK) (36653)
Sánta Kutya (SK) Creative Commons License 2022.09.21 0 0 36653

Vajon működhet, hogy a harmadik sorban vannak a mezőnevek, vagy mindenképpen az elsőben kell?

Előzmény: pimre (36648)
m54-b Creative Commons License 2022.09.21 0 0 36652

(Ezzel a módosítással érvénytelen lesz az a kiindulási feltétel, hogy "ne legyen más Word duku megnyitva" érvényét veszíti. Nem kell eldönteni mit zárjon be az Excel makró.)

Előzmény: m54-b (36651)
m54-b Creative Commons License 2022.09.21 0 0 36651

Elnézést, még nem ébredtem fel igazán. Kiegészítés a Wordhöz:

 

 

    With ActiveDocument.MailMerge
        .Destination = wdSendToNewDocument
        .SuppressBlankLines = True
        With .DataSource
            .FirstRecord = wdDefaultFirstRecord
            .LastRecord = wdDefaultLastRecord
        End With
        .Execute Pause:=False
    End With
    
Documents("korlevel-jav.docm").Close SaveChanges:=wdDoNotSaveChanges '  <-- ez is kell bele!

Exit Sub

Előzmény: m54-b (36650)
m54-b Creative Commons License 2022.09.21 0 0 36650

Excel két sor kivesz:

 

wordapp.Run "korlevel_befejez"

'worddoc.Close SaveChanges:=wdDoNotSaveChanges
'wordapp.Quit
Set worddoc = Nothing
Set wordapp = Nothing


End Sub

 

Word egy sor berak:

 

    With ActiveDocument.MailMerge
        .Destination = wdSendToNewDocument
        .SuppressBlankLines = True
        With .DataSource
            .FirstRecord = wdDefaultFirstRecord
            .LastRecord = wdDefaultLastRecord
        End With
        .Execute Pause:=False
    End With


  Exit Sub  '<-- ez az
 

 

Ezekkel a törzsdoku bezáródik, csak a kitöltött körlevél marad nyitva, a makrók tovább nem játszanak.

 

Előzmény: Sánta Kutya (SK) (36641)
pimre Creative Commons License 2022.09.21 0 0 36649

ld. m54-b olvtárs 36628 sorszámú bejegyzését.

Előzmény: Redlac (36647)
pimre Creative Commons License 2022.09.21 0 0 36648

Persze azért a tervezés feladatát nem úszod meg.

 

1. Az Excel fájlban létre kell hoznod az elkészítendő levelekbe kerülő mezőket, és neveit az első sorban megadni. Lehetőleg rövid és/vagy könnyen megjegyezhetó mezőnevekkel.

2. A korlevel-jav.docm fájlban a kiküldendő levél formázását is meg kell tervezned, és a megfelelő helyekre a program által elhelyezendő mezők neveit neked kell beletenned. Erre én nem látok más módot, mint a WORD dokumentum megnyitása (és a hozzá tartozó Excel fájl mint adatforrás megadása) után a Levelezés->Adatmező beszúrása funkcióval beszúrogatni a mezőneveket.

Előzmény: pimre (36646)
Redlac Creative Commons License 2022.09.21 0 0 36647

Mi ez az m54-b program?

Előzmény: pimre (36646)
pimre Creative Commons License 2022.09.21 0 0 36646

Igen. m54-b programja nagyon jó, mert kényelmesebbé teszi és automatizálja a Word körlevél funkció használatát, valamint lehetővé teszi az Excelből történő elindítását.

Előzmény: Sánta Kutya (SK) (36644)
Redlac Creative Commons License 2022.09.21 0 0 36645

Aztaaa, de remek ötlet, köszi :-)

Előzmény: Gábor790 (36640)
Sánta Kutya (SK) Creative Commons License 2022.09.21 0 0 36644

Magyarán ez felel meg a normál körlevélfunkciónak.

Előzmény: pimre (36643)
pimre Creative Commons License 2022.09.21 0 0 36643

Szerintem ezt csak m54-b tudja átírni, mégpedig úgy, hogy a program a Word körlevél funkcióban ne a Dokumentumok nyomtatása, hanem a Dokumentumok szerkesztése külön funkciót hívja meg, ezen belül a Mind opcióval:

 

 

Ez elkészíti az összes levelet egy dokumentumba, de külön-külön oldalakon, amit aztán tetszőleges néven és helyre lehet menteni. Meg lehet nézni, hogy nem hibáztunk-e el valamit, majd lehet küldeni nyomtatóra. És ha esetleg félbemaradt a nyomtatás (pl papír elakadás miatt), nem kell az egészet újra nyomtatni, hanem lehet az elakadás helyétől újraindítani.

 

Előzmény: Sánta Kutya (SK) (36641)
pimre Creative Commons License 2022.09.21 0 0 36642

A Ctrl-C alaphelyzetben ilyet nem csinál. Lehet, hogy előtted valaki átdefiniálta, ami elég kellemetlen hülyeség lenne. A gép újraindítása után is ugyanez van? 

Előzmény: ftp13 (36639)
Sánta Kutya (SK) Creative Commons License 2022.09.21 0 0 36641

Hol kell átírni, hogy ne indítsa el automatikusan a nyomtatást, csak generálja le a doksit? Rá akarnak nézni még egyszer nyomtatás előtt. Az a plusz egy gombnyomás nem számít.

Előzmény: m54-b (36628)
Gábor790 Creative Commons License 2022.09.21 0 0 36640

csinálj egy segédoszlopot és az összefűz függvénnyel egyedi azonosítót hozz létre. Így az azonosító az lesz, hogy "3jegyűazonosító+kész" és erre keresel az Fkeressel.

Előzmény: Redlac (36638)
ftp13 Creative Commons License 2022.09.21 0 0 36639

 

Excel 2007-ben megnyomom a ctrl+C   -t és a bedob egy ablakot hogy "beszúrás módja." és 4 opciót választhatok ki

Ctrl+x az rendesen kivágja a cellát és a ctrl+v vel be is tudom illeszteni, csak az a fránya ctrl+c nem működik, mint régen tette.

 Ötlet?

 

 

Redlac Creative Commons License 2022.09.20 0 0 36638

Sziasztok!

 

Egy fkeres jellegű függvényt keresek, de nem jövök rá.

Van egy táblám, amiben 3 jegyű azonosítószámok alapján kell az adott sort azonosítani, majd a megfelelő oszlopban lévő értéket eredményül adni. Eddig sima ügy, ez egy fkeres.

Azonban elképzelhető, hogy a 3 jegyű azonosítók többször is előfordulnak az oszlopban, és nekem csak ahhoz a sorhoz tartozó eredmény kellene, ahol a megfelelő oszlopban a "Kész" szerepel. Mivel az fkeres az első találatig keres, így az első megtalált egyezésnél beadja az eredmény függetlenül annak tartalmától.

 

Van lehetőség arra, hogy ha a több találatban megvan a megadottat érték, akkor azt adja eredményül? 

Gábor790 Creative Commons License 2022.09.20 0 0 36637

köszönöm szépen a segítséget!

Előzmény: Törölt nick (36636)
Törölt nick Creative Commons License 2022.09.19 0 1 36636

Egy segédoszloppal az alábbi megoldást tudom kínálni.

 

Képlet E2-ben:                =HA(VAGY(C2 <>C1;A2<>B1);SOR();100000)

Képlet F2-ben:                =INDEX(A:A;KICSI($E:$E;SOR(A1));1)

Képlet G2-ben:               =ELTOLÁS(INDEX(B:B;KICSI($E:$E;SOR(A1)+1);1);-1;0)

Képlet H2-ben:               =INDEX(C:C;KICSI($E:$E;SOR(A1));1)

 

Előzmény: Gábor790 (36635)
Gábor790 Creative Commons License 2022.09.19 0 0 36635

igen, így van, tehát ez helyett:

 

05:14 - 05:30 - Tata, 

05:49 - 06:05 - Almásfüzítő

07:03 - 07:10 - Tata,

07:52 - 08:00 - Tata, -->

08:00 - 08:15 - Tata, --> ez a két sor összefügg, hiszen annyi a kezdő idő, mint az előző befejezője és azonos a helyszín

 

ezért ezt szeretném kapni:

05:14 - 05:30 - Tata, 

05:49 - 06:05 - Almásfüzítő

07:03 - 07:10 - Tata,

07:52 - 08:15 - Tata, 

 

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

Jól értem, azt akarod, hogy az ugyanazon helyszínen lévő, több sorban feltüntetett, ámde összefüggő időtartamok legyenek 1 sorba összevonva? És akkor az eredményül kapott táblázat legyen ugyanolyan szerkezetű, mint az eredeti, csak az összevonások miatt kevesebb sorból álljon?

Előzmény: Gábor790 (36633)
Gábor790 Creative Commons License 2022.09.19 0 0 36633

 

Köszönöm, az A és B nem járműveket jelent. 

 

Inkább hozok egy másik példát.

 

05:14 - 05:30 - Tata, 

05:49 - 06:05 - Almásfüzítő

07:03 - 07:10 - Tata,

07:52 - 08:00 - Tata,

08:00 - 08:15 - Tata,

 

Az első hárommal nincs gond, mert nem összefüggő az idő. Azonban látni kell, mert az összes szabadidőt listáztatni szeretném. Az utolsó két sornál viszont csak a 7:52-8:15-re lenne szükségem. 

Erre is jó lehet a megoldásod?

 

Előzmény: Eredő Vektor (36632)
Eredő Vektor Creative Commons License 2022.09.19 0 0 36632

adatok: a1:d5 (tól, ig, jarmu, helyszin)

 

keplet:

a8: =MINHA($A$1:$A$5;$C$1:$C$5;C8;D1:D5;D8)

b8:  =MAXHA($B$1:$B$5;$C$1:$C$5;C8;D1:D5;D8)

c9: jarmu

d9: helyszin

 

a $rogziteseket szükség szerint módosítsd.

 

Ha nincs ez a függvény az exceledben, akkor régebbi verziód van. Ekkor is megoldható. külön-külön egymásba ágyazva a min és ha függvényekkel

 

 

 

 

 

Előzmény: Gábor790 (36631)
Gábor790 Creative Commons License 2022.09.19 0 0 36631

Üdv mindenkinek,

 

segítséget szeretnék kérni, a problémám a következő, adott a következő minta táblázat, különböző okok miatt áll egy jármű, különböző időpontokban egy helyszínen. 

Ebből a táblából szeretnék egy olyat, hogy mikor (mettől meddig és hol) tartózkodik egy-egy jármű, azonban látható, hogy igazából 8:54-10:20-ig ugyanúgy áll, tehát össze kellene vonni az időket, hogy ne 4 sorba szerepeljen mint az eredetiben, hanem 1 sorban, 8:54-10:20 .. A csak helyszín vizsgálat nem elég, mert más-más időpontban is tartózkodhat ott.

 

5:16 5:25 A' helyszín

8:54 9:14 B' helyszín

9:14 9:15 B' helyszín

9:15 10:00 B' helyszín

10:00 10:20 B' helyszín

 

Remélem érthetően fogalmaztam meg a problémát, kérem a guruk segítségét.

 

köszönöm

Sánta Kutya (SK) Creative Commons License 2022.09.16 0 0 36630

:-D

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

Elnézve, hogy mi minden megy itt a másik két vonalon, szerintem legyen akkor Python program :)

Előzmény: Sánta Kutya (SK) (36627)
m54-b Creative Commons License 2022.09.16 0 0 36628

Javítottam a dolgon eletmod.ininet.hu/korlevel_jav.zip

 

Sikerült megoldani, hogy ne dobja el az adatkapcsolatot, kidobtam a bonyolító könyvjelzőzést, közvetlenül a mezők kerülhetnek a Word dokuba.

 

Változatlan a C:\korlevel\ a bedrótozott helye.

Előzmény: Sánta Kutya (SK) (36624)
Sánta Kutya (SK) Creative Commons License 2022.09.16 0 0 36627

Köszönöm, nézem ezt is. :-)

Előzmény: Fferi50 (36625)
Fferi50 Creative Commons License 2022.09.16 0 0 36626

Teszteltem, már letölthető.

Hibakezelés nincs a makróban, így ha nincs bejelölve nyomtatandó sor, akkor úgy fog tűnni, mintha nem csinálna semmit.

 

Előzmény: Fferi50 (36625)
Fferi50 Creative Commons License 2022.09.16 0 0 36625

Szia!

Itt egy nagyon primitív példa - hogyan lehet(ne) Excelben megoldani. A module1-ben levő nyomtatni makró végigmegy az x-el bejelölt oszlopokon és a kategóriának megfelelő "sablon" munkalap nyomtatási formáját mutatja meg. A nyomtatási kép természetesen élesben kihagyható, csak szemléltetésül maradt benn. A makrót természetesen a saját képedre kell formázni. A Sablon munkalapokon látható az FKERES-sel kitöltés eredménye.  (A module2 törölhető, csak véletlenül maradt benn.)

A Data.hu-ról nem azonnal tölthető le, várni kell a vírusellenőrzésre.

Üdv.

Előzmény: Sánta Kutya (SK) (36623)
Sánta Kutya (SK) Creative Commons License 2022.09.16 0 0 36624

Nézem, köszönöm!

Előzmény: m54-b (36620)
Sánta Kutya (SK) Creative Commons License 2022.09.16 0 0 36623

Születési dátumnak lennie kell. Viszont fel tudok venni az Excelben egy oszlopot, ami a SZÖVEG() függvénnyel szöveggé alakítja. Vagy beleírom a makróba, hogy ne kelljen figyelni az oszlop kitöltésére.

Előzmény: Törölt nick (36619)
pimre Creative Commons License 2022.09.16 0 0 36622

Igen, én is sokat szívtam, mire megtaláltam a megoldást 2015-ben (emlékeim szerint akkor még Office 2003-at használtam, bár nem tudom, hogy a probléma ezen múlt-e). Mivel minden tavasszal kell készítenem ilyen körleveket, azt tapasztaltam, hogy ez néhány év múlva megoldódott. 2019 márciusában ezt jegyeztem fel:

 

"Alapesetben a dátumokat a körlevél készítő amerikai formában adja ki (hónap/nap/év). Ezt régebben (2015-ig)a DDE formátumra való átállítással kezeltem. Viszont most már ez nem működik,mert a DDE-vel nyitva nem kérdez rá, hogy melyik munkalapokat szeretném a körlevélhez rendelni, így nem működik rendesen.

Viszont ha a munkalap adott oszlopának első dátumához aposztrófot teszek, akkor az Excel fájl mentésekor egy számomra érthetetlen hibaüzenet jelenik meg, viszont az oszlop összes többi dátumát később jól formázza."

 

Aztán 2019-ben használtam a MERGEFIELD beállítást. Erről akkor ezt írtam fel emlékeztetőnek: 

 

"A születési idő mezőnél a formátumkódot a következőképp kell beállítani:

Az eredeti ez: { MERGEFIELD "Születési idő" }, ezt  javítjuk az alábbira:

 

({ MERGEFIELD "Születési idő" @"yyyy.MM.dd"* MERGEFORMAT })"

 

Úgy emnlkészem, hogy tavaly már erre sem volt szükség.

 

Most mindenesetre leállok a Word körlevél témáról, és délután megnézem m54-b megoldását Excelből. Hátha az egyszerűbb a WORD megoldásnál. 

Előzmény: Törölt nick (36619)
m54-b Creative Commons License 2022.09.16 0 0 36621

(A C:\korlevel\ van bedrótozva.)

Előzmény: m54-b (36620)
m54-b Creative Commons License 2022.09.16 0 0 36620

Egy minta: eletmod.ininet.hu/korlevel.zip. Az adatok-makros.xlsm lenne a kiinduló. Ott a három oszlop szerint szűrni és elmenteni korlevel-1.xlsx, korlevel-2.xlsx stb. + 3 Word .docm a korlevel-1.docm mintájára.

Természetesen a megfelelő adatokat módosítani. Elég trehány mű jelenleg, de majd, ha megfelel, gyomlálod, telerakod hibakezeléssel.

Feltételezi, hogy nincs megnyitva Word dokumentum. Nyomtatni pdf-be nyomtattam, lehet, hogy azon a részen is kell valamit molyolni.

Előzmény: Sánta Kutya (SK) (36616)
Törölt nick Creative Commons License 2022.09.15 -1 0 36619

Még annyi jutott eszembe, korábbi körleveles tapasztalatokból, hogy ha van - és miért ne lenne - dátum jellegű az adatok között, az cumigyanús.

Nekem legalábbis körlevélben sosem sikerült a dátumokat reprodukálhatóan a kívánt (magyar) formátumba hozni. Mindig hó/nap/év formában hozta, akármit állítgattam.

De persze lehet ez is csak az én hozzá nem értésem miatt volt.

Előzmény: pimre (36618)
pimre Creative Commons License 2022.09.15 0 0 36618

"... és csinálni három Word-doksit makrórögzítővel, ami megnyitja a megfelelő törzsdokumentumot a táblázat megfelelő munkalapjával, és létrehozza a körlevelet."

 

Ha mégis körlevélben gondolkodsz, akkor éppen fordítva kell. A Word dolgozik, az Excel fájl a munkalapokkal (esetedben 3) be van zárva. Az eléréséről a Word gondoskodik.

 

A Wordben csinálsz törzsdokumentumot (A te esetedben 3 különbözö fog kelleni, mert - ha jól értem - 3 különböző levéltípusod lesz némiképp különböző tartalommal). A törzsdokumentumban adod meg a mezőneveket a levélnek azon a helyén, ahol nem fix szöveg van, hanem az Excel munkalap adott oszlopának tartalma lesz az egyes levelekben (a mezőnév az Excel munkafüzet adott munkalapján lévő oszlop fejlécének elnevezése). Amikor ez megvan, a Wordben indítod el a lapok nyomtatását. Célszerű nem rögtön nyomtatóra kérni, hanem egy fájlba, ami a külön lapoknak megfelelően nyomtatja az Excel munkalap egyes soraihoz tartozó leveleket.

 

Természetesen formázhatod a Wordben a levele. Ezen belül a mezőnevek i a szokásos módosn formázhatók. És ha egyszer létrehoztad a törzsdokumentumot, és összekapcsoltad az Excel munkafüzet adott munkalapjával, akkor a későbbiekben nem kéri újra, hanem használja, amig csak nem állítod át másra.

Előzmény: Sánta Kutya (SK) (36616)
Fferi50 Creative Commons License 2022.09.15 0 0 36617

Szia!

"Ha jól értem, még mindig egyenkénti feldolgozásról beszélsz."

Hiszen a szerződéseket személyenként kell kitölteni, hogyan másként lehetne.

Beteszik az x-eket (vagy valamilyen más jelölést, akár a 3 félét is egy menetben), hogy kinek milyen szerződést kell nyomtatni, aztán a makró pedig kitölti és kinyomtatja.

"az Excel nem sablon, hanem táblázat, amit eddig kinyomtattak és golyóstollal kitöltöttek."

Akkor most nem kell golyóstollal kitölteni, hanem a megfelelő cellába beteszi a makró az adatokat és kinyomtatja a táblázatot azokkal együtt. Nem kell sablonnak menteni természetesen, elég ha ugyanúgy ott van, mint eddig.

Próbálom a folyamatot leírni:

Előkészítés egyszeri alkalommal a nyomtatható táblázatokban:

A néven kívüli változó cellákba beírni az  FKERES függvényeket (maradjunk ennél), amelyek a név alapján kitöltik az adatokat.

Ezt mindhárom típusú szerződés táblázatban meg kell tenni.

A nyomtatások előtt: kijelölni a nyomtatandó személyeket pl. 1 első, 2 második, 3 harmadik fajta szerződés kell. Természetesen lehet csak egyik fajtát kijelölni, ekkor is javasolt a különböző számozás/vagy betűjel a típusok megkülönböztetésére.

Elindítani a makrót, ami a következőt csinálja:

a) a típusnak megfelelő nyomtatható táblázatba beírja a nevet a megfelelő cellába. Ennek hatására kitöltődik a többi szükséges adat a függvény alapján - nincs további kézimunka!

b) kinyomtatja a táblázatot.

Ezt ismétli addig, amíg van jelölés a listában.

Nagyjából ez is folyamatos nyomtatást fog eredményezni és nem kell új "sablon" táblázatokat beszúrni.

Szerintem ha eddig ki tudtátok nyomtatni az Excel táblázatot, ezután is fog menni, fölösleges további külön (hibalehetőséget hordozó) utakat beletenni, nem kell hozzá körlevél, sem Word makró.

Üdv.

Előzmény: Sánta Kutya (SK) (36615)
Sánta Kutya (SK) Creative Commons License 2022.09.15 0 0 36616

Hű, ezt emésztenem kell.

Pontatlanul mondtam, az Excel nem sablon, hanem táblázat, amit eddig kinyomtattak és golyóstollal kitöltöttek. Persze menthető sablonként, de nem tudom, ez mit használ.

Az egész makrótörténet, amit mondasz, Wordben vagy Excelben zajlik? Az Excelben kéne megnyitni a Word törzsdokumentumot, és megtalálni a könyvjelzőket?

 

Most épp arra hajlok, hogy talán a legegyszerűbb írni egy Excel-makrót, ami az x-ek alapján leszűri a sorokat három megadott nevű munkalapra (ha van, akkor kiüríti, és használja, ha nincs, akkor létrehozza), és csinálni három Word-doksit makrórögzítővel, ami megnyitja a megfelelő törzsdokumentumot a táblázat megfelelő munkalapjával, és létrehozza a körlevelet.

Előzmény: m54-b (36614)
Sánta Kutya (SK) Creative Commons License 2022.09.15 0 0 36615

Ha jól értem, még mindig egyenkénti feldolgozásról beszélsz, de valóban egy körlevél kell, ami egyben kinyomtat száz oldalt. Három sablon, max. három nyomtatás. Az a kérdés, hogy a körlevél Wordben áll elő vagy Excelben imitáljuk.

Előzmény: Fferi50 (36612)
m54-b Creative Commons License 2022.09.15 0 0 36614

Körmönfontan :-)

 

Elkészíted a sablon levelet, de nem a mezőket szúrod be, hanem a helyükre könyvjelzőt raksz.

Felveszed a makrót, a körlevélkészítéshez:

Kiválasztod az adat.xlsx-t, adatmezőt úgy szúrsz be, hogy a könyvjelzőre ugrás, aztán a beszúrás, következő könyvjelző, következő beszúrás. Egyesítés.

Rögzítés vége.

A makrót átrakod a Private Sub Document_Open()-ba.

Ott lesz az egyesített dokumentum. Nyomtatás vagy kézzel, vagy makró. Az utóbbihoz az kell, hogy megnézed a makróban milyen nyitott dokuk vannak. Ha nem volt előtte nyitva semmi, akkor kényelmes, mert csak a törzsdoku és az egyesített lesz a listában. Az egyesített (magyar wordnél) levél1, levél2 stb. lehet.Több esetén értelemszerűen a nagyobb számú az új.

 

 

De írod, van kész Excel sablon. Akkor minek komplikálni?

 

Előzmény: Sánta Kutya (SK) (36604)
Fferi50 Creative Commons License 2022.09.15 0 0 36613

Vagyis nem kell a kurzorral ugrálni sehová  és csak a nevet tartalmazó cellát kell megjegyezni.

Előzmény: Fferi50 (36612)
Fferi50 Creative Commons License 2022.09.15 0 0 36612

Szia!

Úgy gondolom, hogy a dolgozók listája tartalmazza soronként a név, születési év stb. adatokat.

Ugyanezen adatok helyét tartalmazza a sablon.

A sablon másolatba beírjuk a helyére a nevét. A többi adatot tartalmazó cellákat pedig FKERES függvény kitölti - ezt csak 1x kell a sablonnál megcsinálni.

Ezután vagy nyomtatjuk vagy újabb másolat - következő név beírása - függvény kitölti automatikusan.

És így tovább.

Ha egy mintát felteszel valahova, akkor próbálok makrót csinálni rá.

Üdv.

Előzmény: Sánta Kutya (SK) (36611)
Sánta Kutya (SK) Creative Commons License 2022.09.15 0 0 36611

Ha Excelen belül akarom megoldani, akkor egy olyan ciklust kell írni, ami egy új munkalapra

AMÍG VAN "x"

  mintamunkalapot bemásol a kurzortól kezdődően, kitöltve

  oldaltörést tesz

  kiszámolja a kurzor új helyét

VÉGE

 

Jól gondolom?

Lehet, hogy valóban egyszerűbb a Word felől indítani, mint tárolni a programban a kitöltendő cellákat, és megcsinálni a formázásokat.

Előzmény: Fferi50 (36610)
Fferi50 Creative Commons License 2022.09.15 0 0 36610

Szia!

Ha az Excel sablon a nyomtatható formát tartalmazza, akkor a makró az x-ek alapján beteszi a neveket és a szükséges adatokat és kinyomtatja. Az már elhatározás kérdése, hogy minden név után nyomtasson, vagy a sablonokat másolva a végén gyűjtve nyomtatja ki.

Üdv.

 

Előzmény: Sánta Kutya (SK) (36609)
Sánta Kutya (SK) Creative Commons License 2022.09.15 0 0 36609

Alkalmanként 1-200 emberről is lehet szó, szerintem nem akarják egyenként kiválasztani és nyomtatni, csak végigkszelik.

Előzmény: Fferi50 (36608)
Fferi50 Creative Commons License 2022.09.15 0 0 36608

Szia!

Azt írod, hogy a lista Excelben van és a 3 sablon is. Nem lehetne megoldani, hogy a nevet adatérvényesítéssel kiválasztja a munkatárs + a hozzá rendelendő adatokat kereső függvénnyel kitölti a sablon. Ezután katt a nyomtatás gombra.

Ha valóban nyomtatható formában van a sablon az Excelben. Szerintem így nincs szükség sem körlevélre, sem Word sem Excel makróra.

Üdv.

Előzmény: Sánta Kutya (SK) (36605)
pimre Creative Commons License 2022.09.15 0 0 36607

Én is a Word körlevéllel oldanám meg, aminek az adatforrása Excel munkalap. De mivel a Word körlevél szerkesztő nem tud feltételesen nyomtatni, csak vagy egyenként, vagy az összeset, azt javaslom, hogy Excelben szűrd le a nyomtatandókat külön munkalapra, és azt add meg adatforrásnak. Persze ha a 3 féle sablon 3 különböző körlevelet kell, hogy készítsen, akkor 3 word körlevél minta kellhet, és mindegyikhez külön munkalapon a hozzátartozó adatok.

 

Ha ezt rendszeresen kell csinálni, akkor megéri elkészíteni a 3 féle körlevél mintát egy alkalommal, és csak az adatforrást frissíteni esetenként.

Előzmény: Sánta Kutya (SK) (36605)
Sánta Kutya (SK) Creative Commons License 2022.09.15 0 0 36606

A Word-makróra még nem is gondoltam, olyat elég rég csináltam, és valószínűleg az Excelnél is kevesebb segítséget találok hozzá probléma esetén, mert kevesebben használják. Bár egy körlevél összeállítása talán makrórögzítővel is megoldható.

Előzmény: Törölt nick (36601)
Sánta Kutya (SK) Creative Commons License 2022.09.15 0 0 36605

3 sablon van. Ennek alapján vagy egyszerűsített, vagy megbízási, vagy megbízási és nyilatkozat is, vagy semmi.

Igen, a sablon jelenleg is Excelben van. Esetleg be lehet tenni a három sablont ugyanannak a munkafüzetnek három külön lapjára. Szöveget módosítani ott is lehet, csak a meglévő cellákon belül. Értem, hogy Wordben nagyobb a szerkesztési szabadság, de ezek nem változnak túl gyakran. Az eredményt tekintve mindegy, hogy milyen formátumban keletkezik, csak nyomtatásra kell.

Előzmény: Törölt nick (36601)
Sánta Kutya (SK) Creative Commons License 2022.09.15 0 0 36604

Excel-makróból tudok Word-körlevelet indítani? Ezzel még sosem találkoztam.

Előzmény: m54-b (36602)
m54-b Creative Commons License 2022.09.15 0 0 36603

a makróból elindítod a körlevelet.

 

a három körlevelet.

Előzmény: m54-b (36602)
m54-b Creative Commons License 2022.09.15 0 0 36602

a + c

 

Excel makróval létrehozod a 3 xlsx-t, a makróból elindítod a körlevelet.

 

Előnye: egyszerűbb módosítások a szerződésekben könnyen elvégezhetőek a felhasználó által is (szöveg módosításra gondolok).

Előzmény: Sánta Kutya (SK) (36600)
Törölt nick Creative Commons License 2022.09.15 -1 0 36601

A Pythonhoz nem értek, nem tudok se pro se kontra érvelni.

 

Azon kívül nem egyértelmű, hogy a három kategória az mind ugyanazzal a szerződésmintával megy, vagy mindegyik típusnak saját sablonja van.

 

Ha csak 1 sablon van, ami mindenkire vonatkozik, nos, végül is a Word körlevelet erre találták ki...

Viszont azt nem tudom, hogy Word körlevélnél lehet-e automatikusan szűrni 3 oszlop x értékeire, és az automatikus nyomtatás is kicsit neccesnek tűnik. Biztosan meg lehet oldani, de ha már Wordben kell makrót írni, akkor én általában menekülőre fogom.

 

Ha azonban a szerződés-sablont létre lehet hozni Excel munkalap formájában, akkor akár 1 sablon van, akár 3, egész biztosan meg tudnám oldani ezt a feladatot, és nem kételkednék a megoldás robusztusságában.

 

Természetesen ez csak az én privát véleményem, amely részben a tudatlanságomon alapul.

Előzmény: Sánta Kutya (SK) (36600)
Sánta Kutya (SK) Creative Commons License 2022.09.15 0 0 36600

Segítsetek gondolkodni!

 

Van egy táblázat, minden sorban egy alkalmi munkavállaló adataival. A végén ha x van a megbízási szerződés, az egyszerűsített munkavállalás vagy a 25 alattiak nyilatkozata sorban, akkor a megfelelő szerződésmintát vagy nyilatkozatot a munkavállaló adataival és a munkáltató fix adataival ki kell nyomtatni. Ha üres ez a három cella, át kell ugrani. Tehát lesz n oldal, amit perszonalizálva kinyomtatunk megadott elrendezésben. Számolni nem kell, a munkadíj helye kimarad. Az eredményt nem kell tárolni, máshol dolgozzák fel, csak az ismétlődő űrlapkitöltést kell megoldani.

 

Hogy fognátok hozzá?

a) Excel-makró

b) Python-program (PDF generálása?)

c) Word-körlevél

A felhasználó azt szeretné, ha az x-ek beírása után csak egy gombot kéne megnyomnia, de ha az két perc munka lesz, szerintem belefér, havonta 1-2 alkalommal kell.

go.be.out Creative Commons License 2022.09.15 0 0 36599

Ez a helyes táblázat-részlet, simán elírtam oszlopokat stb.

go.be.out Creative Commons License 2022.09.15 0 0 36598

Köszönöm mégegyszer! Ha belefér folytatnám - próbáltam excelben szemléltetni:

- szeretném kiíratni azokat a napokat, amikor adott boltban elérem a vásárlások 50%-át (adott időszakra vonatkoztatva)
- akár több lépésben is, de ha van rá rövidítés (időközben értelmeztem előző képletet!, sokat segít a $ hogy tudom "rögzíteni" cella-hivatkozást!), akár összetetten is

1. F oszlopban összeadatni külön-külön a boltokban adott időszaknak összes vásárlást (D oszlop értékeiből)
2. G oszlop - kiszámolni az össz-vásárlás (F) 50%-át
3. H oszlop - ez alapján kikerestetni (E oszlop, növekmény), hogy mikor értem el G oszlop értékét és azt a dátumot kiíratni

A cél, hogy évek közötti összehasonlítást tudjak utána végezni - változott-e, hogy adott boltban, adott időszakban "hamarabb" értem el egy bizonyos vásárlási összeget.

Köszönöm!

go.be.out Creative Commons License 2022.09.14 0 0 36597

Köszönöm mindkettőtöknek; szimplán zseniális! :)

Fferi50 - nem értem, még, hogy pontosan mi mit jelent, de pont azt csinálja, amit szerettem volna (annyi, hogy verzióm ; helyett sima , fogadta el).

Köszönöm: jelentősen felgyorsította ezzel elvégzendő teendőm!!

Előzmény: Fferi50 (36595)
Törölt nick Creative Commons License 2022.09.14 -1 0 36596

A tiéd jobb, mer akkor is műxik, ha nincs az adat sorba rendezve. Így első ránézésre.

Előzmény: Fferi50 (36595)
Fferi50 Creative Commons License 2022.09.14 0 0 36595

Szia!

Az E2 cella képlete:

=SZUMHATÖBB($D$2:$D2;$B$2:$B2;B2;$C$2:$C2;C2)

A képlet lehúzható az oszlopon.

Figyelj a $ jelekre légy szíves.

Üdv.

Előzmény: go.be.out (36593)
Törölt nick Creative Commons License 2022.09.14 -1 0 36594

E2-be képlet:

=HA(ÉS(B2=B1;C2=C1);D2+E1;D2)

Előzmény: go.be.out (36593)
go.be.out Creative Commons License 2022.09.14 0 0 36593

Sziasztok, egy számomra összetett problémára kérném segítségeteket, merre induljak el.

1. Alábbi táblázatban össze szeretném adatni (NÖVEKMÉNY) (boltonként, külön-külön - B oszlop alapján; és Településenként - C oszlop) a napi vásárlási összegeket (D oszlop), úgy, hogy előző napi vásárlás összegét hozzáadja.

Vagyis E2=D2; E3=E2+D3; E4=E3+D4 stb... DE!, ezt csak ugyebár a B2:B9 tartományra, a következő tartományra (B10:B12), már "újra kezdje" az összegzést: E10=D10; E11=E10+D11 stb.

A következő nagy váltás, amikor a C oszlopban (második kritéria) és történik változás - Budapest - Balaton.

Hogyan lehetne ezt VBA, vagy bármi más komoly programozási ismeret nélkül megoldanom? Köszönöm!

thomas5000 Creative Commons License 2022.09.14 0 0 36592

Szia!


Igen jól értetted. A feltételes formázás sajnos nem alkalmas erre.

 

A Te megoldásod egészen jó köszönöm!

 

A dupla kattintást egy enterre cserélni nem lenne rossz mondjuk, de gondolom az úgy nem megy. Így is teljsen használható lesz.

Köszönöm a segítséget!

Előzmény: m54-b (36591)
m54-b Creative Commons License 2022.09.14 0 0 36591

"Azt szeretném elérni, hogy amit az L2 cellába írok szám, azt ő megkeresse és beszínezze zöldre. Amit pedig az M2 cellába írok azt pedig pirosra. Utána maradjon úgy az A oszlopban a beszínezett cella, és ha újra beírok oda egy számot, azzal is tegye ezt."

 

tehát a feltételes formázás nem hivatkozhat az L2 és M2 cellákra, mert változnak bennük az értékek, viszont meg kell maradnia a színezésnek. Marad az új képlet beírása minden esetben, ha változás van. Vagy tévedek, az is lehet.

Előzmény: m54-b (36590)
m54-b Creative Commons License 2022.09.14 0 0 36590

Gondoltam rá. Nekem ez tűnt egyszerűbbnek a kérés alapján. A kérdező is feltételezem így van vele, mert nem kérdezett volna.

(Aztán ahhoz még annyira sem értek, mint a makrókhoz.)

Előzmény: Törölt nick (36589)
Törölt nick Creative Commons License 2022.09.14 -1 0 36589

Feltételes formázás?

Előzmény: m54-b (36588)
m54-b Creative Commons License 2022.09.14 0 0 36588

Jobb ötletem nem lévén a dupla klikkhez rendelve. Beírod a keresendőt az L2, vagy M2-be, majd arra duplaklikk.

 

"xxx"-t megadva törli az A:A összes háttérszínét.

A munkalap kódjához kell berakni.

 

 

 

 

 

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

sor = ActiveCell.Row
oszlop = ActiveCell.Column
If sor <> 2 Then Exit Sub
If oszlop <> 12 And oszlop <> 13 Then Exit Sub
keresni = ActiveCell.Value
If keresni = "" Then Exit Sub
ActiveCell.Value = ""
If keresni = "xxx" Then
  Range("A:A").Interior.Color = xlNone
  Cells(1, oszlop).Activate
  Exit Sub
End If

On Error Resume Next
Set FindRow = Range("A:A").Find(What:=keresni, _
    LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
    MatchCase:=False).Activate
a = Err.Number
On Error GoTo 0
If a = 91 Then
    szoveg1 = "Nem találaható az oszlopban a megadott érték:" & _
    Chr(34) & keresni & Chr(34)
 MsgBox (szoveg1)
 Cells(1, oszlop).Activate
 Exit Sub
End If
If oszlop = 12 Then
    ActiveCell.Interior.Color = RGB(0, 255, 0)
  Else
    ActiveCell.Interior.Color = RGB(255, 0, 0)
End If

End Sub

Előzmény: thomas5000 (36586)
m54-b Creative Commons License 2022.09.14 0 0 36587

Javítások:

 

Set FindRow = Range("A:A").Find(What:=Trim(ertekek(0)), _
    LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByColumns, _
    SearchDirection:=xlNext, MatchCase:=False).Activate

 

bekerült a "trim" (levágja a szóközöket a szöveg elejéről, végéről) és a "LookAt:=xlWhole", hogy a teljes érték egyezés legyen, ne forduljon elő, hogy van "rádió" és "dió"-t keresve téves hozzárendelés történik.

 

 

másik trim is ide: "Cells(sor, 3).Value = Trim(ertekek(1))"

 

Előzmény: m54-b (36585)
thomas5000 Creative Commons License 2022.09.13 0 0 36586

Köszönöm. Nekem az előző is tökéletes volt. Viszont lenne még egy kérdésem, hát ha erre is tudnál valamilyen megoldást.

 

A oszlopban 501-560-ig vannak számok pl.

 

Azt szeretném elérni, hogy amit az L2 cellába írok szám, azt ő megkeresse és beszínezze zöldre. Amit pedig az M2 cellába írok azt pedig pirosra.

Utána maradjon úgy az A oszlopban a beszínezett cella, és ha újra beírok oda egy számot, azzal is tegye ezt.

Erre tudsz esetleg megoldást? Előre is köszönöm!

 

Előzmény: m54-b (36585)
m54-b Creative Commons License 2022.09.13 0 0 36585

Azok a csúnya SendKey-k elkerülhetőek saját keresővel:

 

 

Sub kereses_modositas()

Dim szoveg As String
Dim bevitel As String
Dim a As Integer
Dim elvalaszto As String
Dim szoveg1 As String

elvalaszto = ","
szoveg = "Nincs megadva az új érték!" & Chr(13) & "Új érték megadása OK," & _
    Chr(13) & "Csak a régi érték törlése MÉGSE"

ismet:
bevitel = InputBox("Keresett cikkszám, új érték")
If bevitel = "" Then Exit Sub
ertekek = Split(bevitel, elvalaszto)
If ertekek(0) = "" Then
    MsgBox ("Hiányzik a keresendő érték!")
    GoTo ismet
End If
If ertekek(1) = "" Then
    a = MsgBox(szoveg, vbOKCancel)
    If a = 1 Then GoTo ismet
End If
On Error Resume Next
Set FindRow = Range("A:A").Find(What:=ertekek(0), _
    LookIn:=xlValues, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
    MatchCase:=False).Activate
a = Err.Number
On Error GoTo 0
If a = 91 Then
    szoveg1 = "Nem találaható az oszlopban a megadott cikkszám=" & Chr(13) & _
    Chr(34) & ertekek(0) & Chr(34) & Chr(13) & "Új cikkszám megadása OK, kilépés Mégsem"

   a = MsgBox(szoveg1, vbOKCancel)
   If a = 1 Then
    GoTo ismet
   Else
    Exit Sub
   End If
End If

sor = ActiveCell.Row
Cells(sor, 3).Value = ertekek(1)
GoTo ismet

End Sub

Igyekeztem mindent letesztelni...

 

Elég primitív, valaki, nálam képzettebb tudna még javítani, szépíteni a dolgon. Fájó lehet az Option Explicit hiánya, annak az oka, hogy nem tudom miként kellene az "ertekek"-t dimenzionálni. Ezért került pl. a "szoveg1" oda, ahol most van.

 

Előzmény: thomas5000 (36584)
thomas5000 Creative Commons License 2022.09.13 0 0 36584

Nagyon szépen köszönöm! Sokat segítettél! 

Előzmény: m54-b (36583)
m54-b Creative Commons License 2022.09.12 0 0 36583

Volt már ilyen gond:

 

Innen https://forum.index.hu/Article/showArticle?t=9009340&go=160317239&p=1#160317239  a 36092-ig. Csak az oszlopokat kell átírnod.

Előzmény: thomas5000 (36580)
pimre Creative Commons License 2022.09.12 0 0 36582

"Van erre valami megoldás esetleg?"

 

Szerintem nincs. A Worksheet_SelectionChange függvény jöhetne szóba, ami az aktív (kiválasztott) cella változását figyeli. Csak éppen azt nem tudja megállapítani, hogy milyen módon aktiváltad az aktuális cellát. Kereséssel, rákattintással, vagy másképp.  

Előzmény: thomas5000 (36580)
Eredő Vektor Creative Commons License 2022.09.12 0 2 36581

Nyomsz két TAB-ot, 'oszt kész

Előzmény: thomas5000 (36580)
thomas5000 Creative Commons License 2022.09.12 0 0 36580

Sziasztok!

 

Egy érdekes kérdésem lenne. Azt szeretném valahogy megoldani, hogy keresés utána, ne arra a cellára vigyen az excel, ahol ténylegesen van a keresett szöveg, hanem tőle mondjuk 3 oszloppal arrébb.

 

Például: "Alma" szó ott van az A1-es cellába, és amint rákeresek mondjuk az "Alma" kifejezésre, akkor vigyen a C1-re, és rögtön tudjak oda beírni, ne kelljen állandóan átkattintani.

 

Van erre valami megoldás esetleg?

 

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

CsRob1 Creative Commons License 2022.09.10 0 0 36579

Élesben is működik :)

Úgy értettem, hogy a cellában lévő karaktereket tetszés szerint cserélhetem ezzel a makróval. Látom, ez nem teljesen igaz, de egyes függvények esetében,  Pl a ROUND helyett IFERROR-t írva működik.

 

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

Nem teljesen értem amit mondasz.

De nem a cella szöveges tartalmát írja át, hanem a cellában lévő képletet, ami történetesen szöveg típusú. De a képlet és a szöveges tartalom között elég nagy a különbség.

Pl. képlet:                               "= 2 * 2"

Szöveges tartalom:               "4"

 

Másik, hogy nyugodtan beleteheted makró nélküli munkafüzetbe, ott is le fog futni, csak amikor elmented, a makró nem lesz elmentve, így kvázi elvész. De miután átalakítottad a képleteket, úgysem lesz már szükséged a makróra, ha jól sejtem.

Előzmény: CsRob1 (36577)
CsRob1 Creative Commons License 2022.09.09 0 0 36577

Köszönöm, a teszttáblázatban működik, elvileg élesben is mennie kell. Ha jól értelmezem, akkor a cella szöveges tartalmát írja át, így a makró megfelelő módosításával bármilyen cellatartalommal működhet.

Mivel nem makrós munkafüzetekben kell alkalmazni, gondolom szükség van képletes cellák másolására a makrós munkafüzetbe, majd a futtatás után visszamásolásra.

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

Ezt a makrót másold be egy kódmodulra, készíts a fájlról biztonsági mentést, jelöld ki a módosítandó cellákat (akár többet is, és nem kell, hogy összefüggő kijelölés legyen), aztán futtasd a makrót.

Elvileg azt csinálja, amit kértél. Ha nem, akkor biztonsági mentés visszatölt.

 

Sub kerékcsere()
    Dim rng As Range, c As Range, f As String
    
    Set rng = Selection
    For Each c In rng.Cells
        f = c.Formula                           'eredeti képle
        f = Mid(f, 2)                              'egyenlőségjel leválasztása
        f = "=ROUND(" & f & ",0)"        'kerekítés kozzáadása a képlethez
        c.Formula = f                           'képlet visszaírása
    Next
End Sub

Előzmény: CsRob1 (36575)
CsRob1 Creative Commons License 2022.09.09 0 0 36575

Sziasztok! A következőre keresek lehetőleg egyszerű, nem makrós megoldást:

Korábban készített táblázat celláiba írt képleteket módosítanám pl a "=B2/C2" képletet "=KEREKÍTÉS(B2/C2;0)" -ra. A Csere funkcióval egyszerre nem tudom módosítani a képlet elejét és végét is, külön-külön pedig nem fogadja el az Excel. Mivel sok ilyen módosításra van szükség és az eltérő hivatkozások miatt a másolás nem megoldható, ezért eddig manuálisan módosítottam a képleteket, de jobb lenne egy hatékonyabb megoldás. Van erre a problémára valamilyen trükk?

 

magyarpityu Creative Commons License 2022.09.02 0 0 36574

Egész jó ötlet, köszönöm!

 

Közben azért töprengtem, és végül arra a félmegoldásra jutottam, hogy mikor az értelmezési tartományon kívüli értéket kapja meghíváskor a függvény, akkor az Err object-et állítom be, ámbár ekkor továbbra is gond maradt, hogy a függvény visszatérési értékébe valamit ilyenkor is be kell írni (és az Err kikapacsolható, tehát a hiba észrevétlen tud maradni On Error Resume Next esetén, viszont a függvény érvényes paraméterekkel bármilyen valóst visszaadhat, nincs tehát semmi olyan érték, amire hiba esetén beállítható lenne). De amit írtál, az erre is megoldást ad, köszönöm!

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

Én így csinálnám:

 

Function proba(byVal x As Double, byRef result As Double) As Boolean

  If x < 0 Then

    proba = False

  Else

     …

     result = MágikusFeketeDobozSzámolValamit(x)

     proba = True

  End If

End Function

 

A proba függvény megvívásakor a result paraméter helyére be kell tenni a változót, amibe az eredményt akarod, és a függvény lefutásakor az érték belekerül.

Maga a függvény pedig True/False eredményt ad vissza, False akkor, ha nem sikerül a végrehajtás.

Előzmény: magyarpityu (36572)
magyarpityu Creative Commons License 2022.09.02 0 0 36572

Sziasztok!

 

Azt hogyan lehet megoldani, ha egy VBA function double típust vár, és a visszatérés is double, de mondjuk csak nemnegatív értékekre van definiálva (mint pl. az Sqr függvény), akkor negatív számmal meghívva #ÉRTÉK! hibát adjon vissza? Szóval a hibakezelést szeretném kulturáltan megoldani. Valami ilyesmire gondolok:

 

Function proba(x As Double) As Double

  If x < 0 Then

    proba = ???

  End If

  …

  proba = 1

End Function

 

Tehát ha =proba(-1) szerepel valamelyik cellában, akkor ott #ÉRTÉK! kellene legyen.

 

Úgy próbáltam megoldani, hogy a ??? sorba ezt írtam: proba = CVErr(xlErrValue) de nem vagyok meggyőződve, hogy ez így jó. Ugyanis debug-olás során típuskeveredés hibát dob a kód editor (ami szerintem azért van, mert double típust vár, a CVErr meg valami mást ad vissza, ámbár a variant típus elvileg akár jó is lehetne...). Köszönöm előre is!

Szekely11 Creative Commons License 2022.08.30 0 0 36571

Nagyon köszi a segítséget mindenkinek! :D 

Előzmény: Eredő Vektor (36570)
Eredő Vektor Creative Commons License 2022.08.30 0 0 36570

Előzmény: Eredő Vektor (36569)
Eredő Vektor Creative Commons License 2022.08.30 0 0 36569

Több lehetőség van az alább leírtakon kívül. 

Az szövegként jelenlévő számot könnyedén át lehet alakítani numerikus számmá.

Pl.

1. Szövegből oszlopok funkcióval

2. A számmá átalakítandó tartományt kijelölve a kijelölés első aktív celláján megjelenik egy felkiáltójeles kis ikon. Ezt lenyitva a kijelölt tartomány egyben számmá alakítható. ("Átalakítás számmá")

Előzmény: Szekely11 (36567)
Eredő Vektor Creative Commons License 2022.08.30 0 0 36568

A szám lehet numerikus, vagy alfanumerikus. Utóbbi vagy aposztrófjellel ellátott, vagy szöveg formátumú a cella és benne a szám is.

Függvényekben (Fkeresben is) a legegyszerűbben úgy konvertálható egyikről a másikra, ha alfanumerikus számhoz a függvény megfelelő argumentumában:

 - hozzáadsz egy nullát (alfanumerikus szám cellája +0) ekkor alfanumerikus "szövegből" numerikus szám lesz a függvényen belül.

 - hozzáfűzöl egy üres stringet a numerikus számhoz (Numerikus szám cellája & ""). Ekkor numerikus számból alfanumerikus szám (szöveg) lesz

Előzmény: Szekely11 (36567)
Szekely11 Creative Commons License 2022.08.30 0 0 36567

Sziasztok, 

 

tudnátok segíteni abban hogy fkeres függvénynél egyes értékeket (számokra történő keresésnél) miért csak úgy talál meg, hogy ha van téve egy aposztróf (') a cellában található értékek elé? 

 

Köszi a segítséget! 

magyarpityu Creative Commons License 2022.08.20 0 0 36566

Rájöttem! Nem lehet w1 a függvény neve, mert a W1 egy cellahivatkozás, átírtam w_1-re, és máris jó lett :))

Előzmény: magyarpityu (36565)
magyarpityu Creative Commons License 2022.08.20 0 0 36565

Sziasztok!

 

Előre is bocsánat, mert szerintem valami nagyon banális dolgot rontottam el, de nem látom, hol a hiba?! Ebben szeretnék segítséget kérni:

 

Ez a makró:

 

Option Explicit

Const eps As Double = 0.000000000001

Public Function w1(ByVal x As Double) As Double
  Dim s As Double, x2 As Double, i As Long
  x2 = x * x
  w1 = 1
  s = 1
  i = 2
  Do
    s = -s * x2 / (i * i)
    i = i + 2
    s = s * x2 / (i * i)
    i = i + 2
    w1 = w1 + s
  Loop Until Abs(s) < eps
End Function

 

A munkalap A1 cellájában van mondjuk 0, B1 cellában =w1(A1), és #HIV! lesz B1-ben. Mit rontottam el? Köszönöm előre is!

Eredő Vektor Creative Commons License 2022.08.18 0 0 36564

Tökéletes leírás:

https://www.exceldemy.com/colorfunction-in-excel/

 

Én mérlegelném azt, hogy nem színekkel jelölök, hanem egy mellette álló oszlopban egyéb megkülönböztető karakterrel. Innentől kezdve egy egyszerű SZUMHA() függvény összeadja az így jelölt értékeket. 

Előzmény: lacid90 (36563)
lacid90 Creative Commons License 2022.08.17 0 0 36563

Sziasztok!

Egy régebbi excellben szeretnék színekkel vezérelni. Egy adott cellát kiszínezek pl. pirosra, és egy másik oszlopban található piros cellák összegét adja össze, az adott cellába. Régebben volt már ilyen kérdésem és kaptam is egy megoldást ColorFunction néven, de sajnos sehol nem találom, és a macró írásban teljesen fű vagyok. A segítséget előre is köszönöm, Laci 

bolygohollandi1 Creative Commons License 2022.08.15 0 0 36562

Igen, ettől tartok én is; akàrmi csinàltam eddig, csak nem sikerült….

Marad az eseményvezérlés. Majd ràbeszélem a felhasznàlót, hogyha mindenképen ezt szeretné, fogadjael, hogy makro van a tàblàzat mögött.

(Bàr csak úgy magunk közt szólva: magam sem szeretem az esemènyvezérlést, amikor egy ilyen problémàra alkalmazzàk; tapasztalatom szerint nem stabil)

 

Mindenesetre kösz, hogy vetted a fàradsàgot és eltöprengtèl rajta. :)

Előzmény: E.Istvan (36561)
E.Istvan Creative Commons License 2022.08.15 0 0 36561

Szerintem nem fog menni. Ha a felhasználó hozzáfér a B2 cellához, mert az nincs zárolva, akkor azt tetszőlegesen tudja módosítani. Ezt még adatérvényesítéssel sem tudod megakadályozni, mert még védett lapon is egy cellamásolás simán felülírja az adatérvényesítést is. Ahogy a feltételes formázást és sima formázást is felülírja a másolás.

Előzmény: bolygohollandi1 (36559)
Eredő Vektor Creative Commons License 2022.08.15 0 0 36560

Hát csináld meg úgy az adatérvényesítést, hogy figyelje az A1 cellát is.

Előzmény: bolygohollandi1 (36559)
bolygohollandi1 Creative Commons License 2022.08.12 0 0 36559

Sziasztok!

 

A következő problémám van:

 

A B2 cella tartalmát ne lehessen megváltoztatni, csak és kizárólag akkor, ha az A2 cella "üres".

Programmal (eseményvezérléssel) simán megoldható, de anélkül kellene, makró nélkül, sima XLS(X) fájlban.

Próbálkoztam érvényesítéssel, az majdnem jó, de ha van valami az A2 cellában, delete-tel ki lehet törölni a B2 cella tartalmát, azt simán hagyja az érvényesítésnél beírt =A2="" függvény

 

Ötlete valakinek? Előre is köszönöm :)

 

MZ/Y Creative Commons License 2022.07.31 0 0 36558

Kösz szépen, remélem.

Felkiáltójellel (mint nem) próbálkoztam, az nem volt jó, a NOT valószínűleg az lesz.

Előzmény: pimre (36557)
pimre Creative Commons License 2022.07.30 0 0 36557

Nem tudom segít-e: https://support.microsoft.com/hu-hu/office/keres%C3%A9s-az-outlookban-d824d1e9-a255-4c8a-8553-276fb895a8da?ui=hu-hu&rs=hu-hu&ad=hu

Itt azt írják, hogy logikai operátorok AND, OR, NOT stb. használhatók. Nem tudom, igaz-e, mert nem használok outlook-ot. 

Előzmény: MZ/Y (36556)
MZ/Y Creative Commons License 2022.07.30 -1 0 36556

off

Nem Excel, de Office (egész pontosan Outlook), hátha tudja valaki, vagy hogy hol van ilyen témájú topik/csoport.

Outlook365-ben kellene szűrnöm a levelek között, ha nincs csatolmány és a tárgy _nem_ xyz. Nem jövök rá, hogy lehet a nem-et beállítani a feltételbe.

Redlac Creative Commons License 2022.07.30 0 0 36555

Vagyis a teljes szakasz így néz ki:

 

T_ol = WVisz.Cells(Te, "G"): I_g = WVisz.Cells(Te - 2, "G")
Lel = Application.WorksheetFunction.Match(T_ol, WsSz.Columns(2), 0) 
Lel2 = Application.WorksheetFunction.Match(I_g, WsSz.Columns(2), 0) 

 

For Sor = Lel To Lel2
     If WsSz.Cells(T_ol, "B") = T_ol And WsSz.Cells(T_ol, "K") = 1 Then WVisz.Cells(Usor3, "Z") = 1

     If WsSz.Cells(T_ol, "B") = T_ol And WsSz.Cells(T_ol, "L") = 1 Then WVisz.Cells(Usor3, "AA") = 1
     If WsSz.Cells(T_ol, "B") = T_ol And WsSz.Cells(T_ol, "M") = 1 Then WVisz.Cells(Usor3, "AB") = 1
     If WsSz.Cells(Sor, "K") = 1 And WsSz.Cells(Sor - 1, "K") = 0 Then WVisz.Cells(Usor3, "Z") = WVisz.Cells(Usor3 + 1, "Y") + 1
     If WsSz.Cells(Sor, "L") = 1 And WsSz.Cells(Sor - 1, "L") = 0 Then WVisz.Cells(Usor3, "AA") = WVisz.Cells(Usor3 + 1, "Z") + 1

     If WsSz.Cells(Sor, "M") = 1 And WsSz.Cells(Sor - 1, "M") = 0 Then WVisz.Cells(Usor3, "AB") = WVisz.Cells(Usor3 + 1, "AA") + 1
     If WsSz.Cells(Sor, "AA") > 57 And WsSz.Cells(Sor - 1, "AA") <= 57 Then WVisz.Cells(Usor3, "Y") = WVisz.Cells(Usor3 + 1, "Y") + 1
Next

Redlac Creative Commons License 2022.07.30 0 0 36554

Végül is ezt csináltam, ami 3 ugyanilyen sor esetében, csak más feltételeket is 2400 sor tekintetében 1 sec alatt vizsgálja végig

 

If WsSz.Cells(Sor, "M") = 1 And WsSz.Cells(Sor - 1, "M") = 0 Then WVisz.Cells(Usor3, "AB") = WVisz.Cells(Usor3 + 1, "AA") + 1 

Előzmény: pimre (36553)
pimre Creative Commons License 2022.07.30 0 0 36553

Ahol 1-re váltott az érték, az megmarad 1-nek, vagy visszavált 0-ra? 

Ha megmarad az 1, akkor szerintem elegendő az utolsó sor utáni cellában egy SZUM függvénnyel összegezni az oszlopot.

Ha nem marad meg, akkor kell egy makró, ami az egyesekre váltáskor egy segédoszlopban beír egy 1-est, és azt kell a végén összegezni.

 

Jól értem a feladatot?

Előzmény: Redlac (36552)
Redlac Creative Commons License 2022.07.30 0 0 36552

Sziasztok!

 

Egy 200-500 soros oszlopban adott berendezés működését regisztráljuk. Ha nem működik adott sorban (ami idő és/vagy útadat), akkor nulla, ha működik, akkor 1-es. 

Lehet, hogy a berendezés csak egy sorban regisztrál jelet, lehet, hogy egymás után több egybefüggőben, és ez akár a teljes oszlopban többször is megtörténhet. Azt szeretném összeszámolni, hogy hány alkalommal működik ez a berendezés. 

Egy ötletem van, hogy azt számolom meg, hányszor változik a nulla egyesre, de van esetleg jobb/egyszerűbb ötletetek?

Delila10 Creative Commons License 2022.07.17 0 0 36551

Másik megoldás, hogy a VB szerkesztőben megadod a ScrollArea területét.

Előzmény: Fferi50 (36550)
Fferi50 Creative Commons License 2022.07.17 0 0 36550

Szia!

Az adott területet fel kell szabadítani a zárolás alól a következőképpen:

Alapból minden cella zárolva van a munkalapon - azaz a munkalap zárolása után nem lehet bele írni.

Ezért ki kell jelölni a használni kívánt területet. Ezután jobb egérgomb, cellaformázás - védelem fülön a zárolt négyzetből kivenni a pipát.

Következő lépés: Véleményezés menü - lapvédelem - a megjelenő párbeszédablakban minden felhasználónak engedélyezve: a zárolt cellák kijelölése négyzetből a pipát kivenni.

Jelszó nem kötelező. Majd OK.

Ezután csak a kijelölt területen fog mozogni a kurzor.

Üdv.

Előzmény: Emődi Sándor (36549)
Emődi Sándor Creative Commons License 2022.07.17 0 0 36549

Üdvözlök mindenkit !

 

Üdvözlök mindenkit! Segítséget szeretnék kérni. Készítettem egy nagyon egyszerű táblázatot. Az oszlopok között enterrel lépek. Hogy kell beállítani, hogy az adatfelvitel után az utolsó oszlopból automatikusan az első oszlopra ugorjon vissza a kurzor?

 

 

 

 

 

 

 

zicharonot Creative Commons License 2022.07.13 0 0 36548

Köszi. XP-m nincs. Win 10-em van.

 

Köszi. Elgondolkodom rajta

Előzmény: m54-b (36547)
m54-b Creative Commons License 2022.07.12 0 0 36547

MAC-ra VirtualBox, egy minimális Windows, (nem engeded a internetre, lehet XP is), azon az Excel. Nem kikapcsolod a virtuális gépet, hanem "Elmenteni a gép állapotát" (ez kb. az alvó állapot). Pillanatok alatt üzemkész. (Nem jó, nem szép, de több a semminél.)

 

 

A  

Private Declare Function GetSystemMetrics Lib "user32.dll" (ByVal nIndex As Long) As Long
Const SM_CXSCREEN = 0
Const SM_CYSCREEN = 1

 

megadja a képernyő felbontást. A nagyítást pedig ennek megfelelően beállítod, és némi számolással elhelyezhető a vezérlő megfelelően.

 

fuggoleges = GetSystemMetrics(SM_CYSCREEN)

 

   If fuggoleges < 1024 And ActiveWindow.Zoom >= 75 Then
        ActiveWindow.Zoom = 75

(Persze a számodra megfelelő értékek ide.)

 

Előzmény: zicharonot (36546)
zicharonot Creative Commons License 2022.07.12 0 0 36546

Köszi. Sajnos nem jött össze.

Most az a hülye helyzet van, hogy a MAC gépen tevékenykedem a Windowsos egyetlen file miatt kapcsolom be.

Előzmény: pimre (36545)
pimre Creative Commons License 2022.07.12 0 0 36545

Sajnos ezekhez már nem tudok hozzászólni.

Előzmény: zicharonot (36544)
zicharonot Creative Commons License 2022.07.12 0 0 36544

A másik gond, hogy a forrás terület és a cél cella változik. Ezt korábban a userform-mal simán megoldottam

Előzmény: pimre (36542)
zicharonot Creative Commons License 2022.07.12 0 0 36543

MAC-on is lehet vezérlőket elhelyezni a munkalapon.

Ezzel a Windowson a főproblémám az volt, hogy elmozdul a helyéről ha felbontást váltok márpedig nem az alap

felbontásban használom a gépeket.

Előzmény: pimre (36542)
pimre Creative Commons License 2022.07.11 0 0 36542

Nincs. A Windows altt lehet vezérlőket elhelyezni munkalapokon is, és ahhoz makrót írni. De nem tudom, hogy a MAC verzió alatt ez hogy működik, működik-e egyáltalán. Soha nem volt MAC gépem. 

Előzmény: zicharonot (36541)
zicharonot Creative Commons License 2022.07.11 0 0 36541

Nincs valami ötlet a kiváltásra?

Jelenleg ha ezt a filet használni akarom akkor indítani kell a Windows-os gépet. A Mac-en nem tudom használni.

 

Előzmény: pimre (36540)
pimre Creative Commons License 2022.07.11 0 0 36540

Ha jól látom, az Excel 2016-os verziótól kezdődően nem használható a Userform a MAC verzióban: https://stackoverflow.com/questions/61361042/option-to-insert-userform-in-excel-vba-is-not-displayed-in-mac-version

Előzmény: zicharonot (36539)
zicharonot Creative Commons License 2022.07.11 0 0 36539

Talán tudja valaki.

 

Mac PC Office 365 Home verzióban az Excelben nincs userform ami nélkül egy filem működésképtelen pedig erre szükségem lenne.

(megelőzve a javaslatokat a különböző free office-kben kompatibilitási okoknál fogva fogva szintén működésképtelen)

 

Kérdéseim:
- Melyik verzióban van userform. Ezt tutira kéne tudni mert egy verzió váltás sokba kerül

- Szimpatikus megoldás lenne (ennél nem kellene sok pénzért verzióváltást csinálni)  ha tudna valaki olyan megoldást makróval amivel kitudnám váltani a userformokat.

Ilyesmiről van szó:

Delila10 Creative Commons License 2022.07.02 0 0 36538

Mekkora igazad van! Valóban, nem olvastam el, és nem is pipáltam ki.

Előzmény: pimre (36537)
pimre Creative Commons License 2022.07.02 0 0 36537

Bocsánat a feltételezésért: A felhasználási feltételek elfogadásához is kitetted a pipát?

Előzmény: Delila10 (36536)
Delila10 Creative Commons License 2022.07.02 0 0 36536

Pipát tudok bele kattintani, de a módosításhoz szükséges OK gomb le van tiltva. :))

Egyebet sem módosíthatok.

Előzmény: lesi fotós (36535)
lesi fotós Creative Commons License 2022.07.01 0 0 36535

Nevedre kattintva,bal felső menüben "beállítások" -ban be tud állítani,hogy publikus legyél (pipa a jelölőbe).

Előzmény: Delila10 (36529)
lesi fotós Creative Commons License 2022.07.01 0 0 36534

Mail ment.

Előzmény: Delila10 (36532)
Garashan Creative Commons License 2022.07.01 0 0 36533

Ááá, így már értem. Azt hittem, hogy van valami rejtett belső privát üzenetküldési lehetőség is.
Ezt ismertem.

Előzmény: Delila10 (36532)
Delila10 Creative Commons License 2022.07.01 0 0 36532

Rákattintasz a névre, a kapott ablakban e-mail - küld-del küldhetsz (ha tudsz).

Előzmény: Garashan (36530)
lesi fotós Creative Commons License 2022.07.01 0 0 36531

Szia Delila10! (ezen a név mindíg jót mosolygok :-) )

 

A mai üziket megkapta. Délután ráfeszülök a tesztelésre. Beszámolok a fejleményekről.

 

Addíg is köszönöm a segítségedet!

 

Zoli

 

Előzmény: Delila10 (36529)
Garashan Creative Commons License 2022.07.01 0 0 36530

Én itt privát üzenet lehetőségéről nem is tudtam.
Viszont az e-mail címem publicitását tudom állítani.

Előzmény: Delila10 (36529)
Delila10 Creative Commons License 2022.07.01 0 0 36529

Az erről a fórumról küldött privát nem érkezik meg (kettőt is küldtem), viszont megadja a címzett levélcímét.

 

Pár éve nem tettem elérhetővé a címemet, azon nem tudok változtatni, le vagyok tiltva a módosításról. Fura dolog. Más is így van?

lesi fotós Creative Commons License 2022.07.01 0 0 36528

Mail ment.

Előzmény: Delila10 (36525)
lesi fotós Creative Commons License 2022.06.30 0 0 36527

Holnap talán ideér....

Előzmény: lesi fotós (36526)
lesi fotós Creative Commons License 2022.06.30 0 0 36526

Még nem jött meg.

Előzmény: Delila10 (36525)
Delila10 Creative Commons License 2022.06.30 0 0 36525

Szia, írtam privátot.

Előzmény: lesi fotós (36524)
lesi fotós Creative Commons License 2022.06.30 0 0 36524

Szia Delila10!

 

Kipróbáltam Excel 2002-n.

 

Valami nem stimmel a dologban:

 

-ha "munka1" alsó üres sorába írok szövegeket,azokat megjegyzi és legközelebb már fel is ismeri,de

 

-a "munka2" lapon semmi sem történik: lista nem bővül.

 

-Ha "munka2" listájához hozzáírok sorokat,azokat a "munka1" nem ismeri fel.

 

Ha már voltál szíves segíteni,még 1 kérdés: az is megoldható lenne,hogy 2-3 v. több oszlopon is működjön úgy,hogy

 

minden oszlopnak saját listája legyen?

 

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

 

Zoli

Előzmény: Delila10 (36510)
Garashan Creative Commons License 2022.06.30 0 0 36523

Ha nem túl titkos a megoldásod, akkor közzétehetnéd :) Hátha tanulhatunk belőle.

Előzmény: Eredő Vektor (36522)
Eredő Vektor Creative Commons License 2022.06.30 0 0 36522

Megoldottam - és elnézést ha valaki foglalkozott vele esetleg.

Előzmény: Eredő Vektor (36519)
Eredő Vektor Creative Commons License 2022.06.30 0 0 36521

beépített függvényekkel kell megoldani.

Előzmény: Garashan (36520)
Garashan Creative Commons License 2022.06.30 0 0 36520

Milyen verziójú Exceled van? Szerintem MINHA függvényekkel meg lehet oldani. A 2016-os verzió még biztosan nem ismeri. Az otthoni Excelem újabb, abban már benne van.
Vagy írni kell rá makrót.

Előzmény: Eredő Vektor (36519)
Eredő Vektor Creative Commons License 2022.06.30 0 0 36519

Szasztok, tudtok erre valami jó kis (tömb?)képletes trükköt?

Garashan Creative Commons License 2022.06.29 0 0 36518

Itt egy gyakorlati alkalmazás: Béla fizet 110 forintot apróban. Viszont én behúzom, hogy nagy címlettel fizetett és máris felváltottam a pénzemet.

Előzmény: Eredő Vektor (36517)
Eredő Vektor Creative Commons License 2022.06.29 0 0 36517

Ettől még nem fog változni semmi, mert a felváltás szerint módosítható a táblázat is - minta mi sem történt volna.

Ha én fel akarom váltani a húszasomat - fel is fogom ;)

Előzmény: Törölt nick (36515)
Törölt nick Creative Commons License 2022.06.28 0 0 36516

Elnézést kérek, visszaolvastam, félreérthetően írtam, a bevétel nyilvántartásnál nem lehet teljes címletjegyzéket kérni, nincs rá idő, csak azt kellene valahogy megoldani, hogy ha nagyobb címletű papírpénzzel fizettek egy-egy adott tételnél, azt tüntessék fel.

 

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

Elbeszélünk egymás mellett.

 

Ez csak a napi pénztárzáráshoz hasonló séma, ilyenünk van, csak jobb:

az első oszlopban a dátum, utána a címletek, majd azok alapján az összeg, mellette az összeg, aminek a bevételi adatok alapján kellene lennie, utána a kettő közti különbség, majd az előző napi egyenleggel halmozott összeg.

 

A probléma az, ha pl. van ötezer a pénztárban, majd a következő napi bevétel tizenötezer, akkor nagyon nem mindegy, hogy egyetlen darab húszezres van a pénztárban, vagy tucatnyi ezres és rengeteg apró. Mert van olyan, aki szereti a saját nagy pénzét felváltani, más meg ellenkezőleg teszi, és ilyenkor áll a bál, hogy kora reggel bankba menni, pénzt váltani...

 

A bevételi nyilvántartásnál nem lehet címletenkénti listát kérni, senki se csinálná és sok időt elvesz.

Annyit viszont meg lehet kérni tőlük, hogy írják be, hogy húsz, tíz vagy ötezressel fizettek-e.

 

A nap végén azt kellene valahogy összevezetni az általad mutatott napi/heti leltársémával, és akkor lehet tudni, mely napokon vannak komolyabb eltérések a papírpénzek között.

 

 

Előzmény: Delila10 (36507)
lesi fotós Creative Commons License 2022.06.28 0 0 36514

A 2002-es excel nem ismeri az xlsm formátumot (Sajnos!)....

Előzmény: Delila10 (36510)
lesi fotós Creative Commons License 2022.06.28 0 0 36513

Köszönöm!

 

Letöltöttem,mindjárt kipróbálom!

Előzmény: Delila10 (36510)
lesi fotós Creative Commons License 2022.06.28 0 0 36512

Elolvastam,válaszoltam.

Előzmény: fjns (36511)
fjns Creative Commons License 2022.06.28 0 0 36511

Szia Zoli!
Nagy eséllyel megoldható a problémád VBA és makrók nélkül is.
Írtam az email címedre is...

Előzmény: lesi fotós (36508)
Delila10 Creative Commons License 2022.06.28 0 0 36510

Szia!

 

Makrós megoldással feltettem egy füzetet.

Két makró van benne, az első a Munka1 laphoz van rendelve, ez hívja meg a modulba írtat.

Mikor a Munka1 lapon az A oszlopba írsz egy szöveget, a makró ellenőrzi, hogy szerepel-e a Munka2 lap A oszlopában. Ha nem, akkor a lista végére írja, és a már szerepel is a következő érvényesítésben.

Előzmény: lesi fotós (36508)
lesi fotós Creative Commons License 2022.06.28 0 0 36509

Elnéztem: nem 97-es,hanem 2002-e excel verzió.

Előzmény: lesi fotós (36508)
lesi fotós Creative Commons License 2022.06.28 0 0 36508

Sziasztok!

 

A segítségeteket szeretném kérni a következő feladat megoldásához:

mérési jegyzőkönyvet kellene készíteni Excel 97 táblázatból.

-A méréseket egy külső automata végzi,ezek kerülnek bele a táblázatba.Egy mérés adata egy sor a táblázatban. 

-A táblázatban vannak üres cellák,melyeket a méréshez tartozó szövegekkel kellene kitölteni az Excelben (a mérés megrendelőjének,a mért készülék gyártója, a készülék tipusa a mérést végző,stb. adatai). Minden sorban található egy azonosító számot tartalmazó cella,ami a mérés azonosítója.Ez szigorúan minden sorban más érték. A jelenlegi táblázat egy adatbázisból importált adatokkal lett feltöltve,szöveges cellák ki vannak töltve. 

-Ezt a táblázatot kellene új adatokkal feltölteni. Az új mérési eredményeket be hozzá tudom fűzni a régi táblázathoz,de szöveges cellák kitöltése már nem megy. Jó lenne ugyanis ezt úgy megcsinálni,hogy kitöltéskor,a már kitöltött cellákból készült listákkal lehessen megcsinálni,hogy az azonos adatokat ne kelljen mindannyiszor be -ne adj Isten el- gépelni.Mivel meglehetősen sok eleműek a listák, a kitöltés alatt folyamatosan,a begépelt szövegrészek alapján kellene szűkíteni a lista tartalmát. Ha nincs a listában a begépelt szöveg,akkor ezt hozzá kellene fűzni a listához.....

 

Az meg már csak a hab lenne a tortán,ha ezek a feladatok megoldhatóak lennének VBA és makrók nélkül. :-)

 

Ha valami nem érhető a leírtakból,az az én hibám:kérdezzetek nyugodtan!

 

A segítséget és a türelmeteket előre is köszönöm: Zoli

 

 

Delila10 Creative Commons License 2022.06.28 0 0 36507

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

Mint például?

Nem találtunk rá sablont.

Előzmény: Eredő Vektor (36505)
Eredő Vektor Creative Commons License 2022.06.23 0 0 36505

Miért nem egészítesz ki ezzel egy meglévő, alkalmasnak tűnő tetsző sablont?

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

Weben keresgélünk, de nem találunk excel sablont rá.

 

Tudnátok segíteni olyan pénztár nyilvántartással, ahol a bevételnél rögzíteni kell azt, hogy a kapott összeget milyen címletekben fizették be, és a nap végén a tételes leltárnál lehet látni, hogy a nagy címletek egyeznek-e?

 

zdomiter Creative Commons License 2022.06.22 0 1 36503

Hálás köszönetem!

A szerver nevével hozzá tudtam adni a biztonságos helyekhez.

Előzmény: Garashan (36502)
Garashan Creative Commons License 2022.06.21 0 0 36502

Próbáld meg a szervert névvel hozzáadni nem pedig ip címmel. Ha jól rémlik nekem is ez volt a baj. A hálózati meghajtót is "cserélni" kellett IP-sről nevesre.

Előzmény: zdomiter (36501)
zdomiter Creative Commons License 2022.06.21 0 0 36501

Közben arra rájöttem, hogy a hálózati hellyel van baja, mert ha a fájlt átteszem a szerverről a saját gépemre, akkor nem tiltja le a makrókat. A szerver mappáit nem is tudom hozzáadni a biztonságos helyek közé. Nem értem.

Előzmény: zdomiter (36500)
zdomiter Creative Commons License 2022.06.21 0 0 36500

Sziasztok!

 

A Microsoft letiltotta a makróimat és egyszerűen nem találom, hogy hol tudom engedélyezni. Az adatvédelmi központban engedélyezve vannak a VBA-makrók. Tudnátok segíteni?

Delila10 Creative Commons License 2022.06.19 0 0 36499

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

Ha igaz, hogy minden gépcsoportban 100 gép van, akkor ez is egy lehetséges megoldás:

 

{=ELTOLÁS($A$1;0;SZUM(HA($N$2:$Z$101=B2;OSZLOP(N2:Z101);0))-1)}

 

A képlet a Delila által feltöltött táblázatra lett szabva (akinek ezúton is köszönöm, hogy megosztotta).

Egyébként több gép esetén a 101 sorindex akármekkorára növelhető, nem is kell, hogy megegyezzen a gépek számával.

Előzmény: Davwis (36491)
Delila10 Creative Commons License 2022.06.15 0 0 36497

A játék kedvéért megnéztem, hogy a képleted 676 karakter hosszú.

Összeadtam az én 4 képletem hosszát, 502-re jött ki, viszont 3 segédoszlop kell hozzá.

 

Előzmény: pimre (36495)
Delila10 Creative Commons License 2022.06.15 0 0 36496

Szép hosszú, egészséges képlet. :))

Előzmény: pimre (36495)
pimre Creative Commons License 2022.06.15 0 0 36495

Bocs, nem vettem észre, hogy időközben küldtél egy megoldást, így nem tudom, hogy aktuális-e még a javaslatom.

Előzmény: Delila10 (36493)
pimre Creative Commons License 2022.06.15 0 0 36494

Szia, lenne egy javaslatom az egymásbaágyazás elkerülésére. Tekintettel arra, hogy a gépcsoportok közül kizárólag az egyikben található meg egy adott gép, akkor ha nullává tudjuk konvertálni azokat, ahol nincs meg, és a megfelelő csoport értékére azt, ahol megvan, akkor ezek egyszerűen oszloponként kiszámítva összeadhatók. 

 

Ehhez a HOL.VAN függvényt használtam, ami hibát ad, ha nincs találat, és a megtalált sor számát az adott oszlopban (a sor itt most érdektelen). Ezt beágyaztam a HAHIBA függvénybe, hogy a hiba helyett 0 értéket adjon. Az egészet a HA függvénybe ágyaztam, ami a 0 értéket békén hagyja, a nullánál nagyobb érték esetén az oszlophoz tartozó gépcsoportot adja meg. Hogy ezt ne kelljen oszloponként beírogatni, az adott oszlop oszlopszámát számoltam ki, levonva belőle az első érdemi oszlop (N)  előtti oszlop (M) számát, ami 13.

 

Egy-egy oszlop esetén a képlet így néz ki: =HA(HAHIBA(HOL.VAN($B$2;N:N;0);0)>0;OSZLOP(N1)-13;0)

 

Összefűzve a következő a képlet, ami összegzi az egyes oszlopok adatát egymásba ágyazás nélkül, és megadjy a gépcsoport számát.:

 

=HA(HAHIBA(HOL.VAN($B$2;N:N;0);0)>0;OSZLOP(N1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;O:O;0);0)>0;OSZLOP(O1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;P:P;0);0)>0;OSZLOP(P1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;Q:Q;0);0)>0;OSZLOP(Q1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;R:R;0);0)>0;OSZLOP(R1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;S:S;0);0)>0;OSZLOP(S1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;T:T;0);0)>0;OSZLOP(T1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;U:U;0);0)>0;OSZLOP(U1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;V:V;0);0)>0;OSZLOP(V1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;W:W;0);0)>0;OSZLOP(W1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;X:X;0);0)>0;OSZLOP(X1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;Y:Y;0);0)>0;OSZLOP(Y1)-13;0)+HA(HAHIBA(HOL.VAN($B$2;Z:Z;0);0)>0;OSZLOP(Z1)-13;0)

Előzmény: Delila10 (36492)
Delila10 Creative Commons License 2022.06.15 0 0 36493
Előzmény: Davwis (36491)
Delila10 Creative Commons License 2022.06.15 0 0 36492

Úgy látom, 10 IF függvényt bír el a képlet. Ha estig nem kapsz választ, megpróbálom megoldani. Valószínűleg 2 oszlopba kell szétszedni a képleteket.

Előzmény: Davwis (36491)
Davwis Creative Commons License 2022.06.14 0 0 36491

Annyiban még tudnál segíteni, hogy miért nem működik a függvény? Angol az excelem. A darabteli függvénynek az angolban azt találtam, hogy a countif felel meg. Ezzel csináltam ahogy írtad, de a mellékelt hibaüzenetet kaptam. 6-7 db egybefűzött függvénnyel működik, viszont akkor a maradékra csak közelítéseket ad ami összekuszálja az összes adatot.

Előzmény: Delila10 (36471)
Delila10 Creative Commons License 2022.06.14 0 0 36490

Szívesen. :)

Előzmény: Davwis (36489)
Davwis Creative Commons License 2022.06.14 0 0 36489

Köszönöm szépen a segítséget! 

Előzmény: Delila10 (36471)
m54-b Creative Commons License 2022.06.14 0 0 36488

(Parancssorból azért nem jó, mert az Excel beállítások szerint rákérdez a makró engedélyezésre, a vba-ból hívott Excel viszont már engedélyezett makrófuttatással indul.)

Előzmény: m54-b (36487)
m54-b Creative Commons License 2022.06.14 0 0 36487

Így igen, de ebben az esetben a hívó file nyitva marad az Excel befejezéséig.

Ilyenre gondoltam https://www.vbforums.com/showthread.php?366559-Excel-How-to-Pass-Command-Line-Parameter-DKenny-is-KING!&p=2234901&viewfull=1#post2234901

 

Előzmény: pimre (36486)
pimre Creative Commons License 2022.06.14 0 0 36486

"Elvileg lehet indítani az Excel fájlt paraméter átadással, de eddig még sikertelen kísérleteim voltak..." Ezt nem értem. Nekem Excel fájlból másikat megnyitva működik. A korábbi példában 3 paraméterrel teszteltem:

 

A behívó fájlban: Application.Run "'" & afile & "'!Module1.bletrehoz", 1, "szöveg", Date

A behívott fájlban:  Sub bletrehoz(szam As Long, szoveg As String, maidatum As Date)

Előzmény: m54-b (36485)
m54-b Creative Commons License 2022.06.14 0 0 36485

Mindent az a.docm csinál. az xlsm csak arra van, ha a bedrótozott értékeken akarna változtatni a felhasználó. Nem a makróban állítja a fix értékű változókat, hanem egy .txt fájlba kerülnek a kívánt értékek, és induláskor beolvassa az a.docm. Használata: ritkán, vagy sosem.

Az átnevezés mint probléma csak verzióváltozás esetén keletkezik. Előfordulása: ritkán, vagy sosem.

Marad a megoldás a mentés másként --> c.docm, onnan hívja az xlsm-t, amiben van az átnevező makró. A c.docm-t pedig az új a.dotm induláskor tudja törölni, csak addig lesz "szemét".

Elvileg lehet indítani az Excel fájlt paraméter átadással, de eddig még sikertelen kísérleteim voltak...

A kill csak a lezárt filét törli, az op.rendszer nem hagyja a nyitott file törlését. Viszont az átnevezés előtt használni kell.

Jelenleg ez a működő (minta), a rename_file.docm

Sub atnevec_mentes_maskenttal()
Path = ActiveDocument.Path & "\"
ofile = Path & "rename_file.docm"
nfile = Path & "rename_file_uj.docm"
ActiveDocument.SaveAs (Path & "rename_file_old.docm")
Kill (ofile)
Name nfile As ofile
End Sub

 

 

Köszönöm mindenkinek a segítséget!

Előzmény: pimre (36484)
pimre Creative Commons License 2022.06.14 0 0 36484

"Lehet c-filét játszani, de akkor meg az marad ott mint "szemét"."

Ahogy Fferi is megírta, én is úgy képzeltem a c-fájlt, hogy az nem szemét, hanem egy fix segédprogram, ami vezérli az egész műveletet. Mindíg azt indítod el. Megpróbáltam megírni egy keretprogramot, persze az általad leírt konkrétumok (docm stb. ismerete nélkül). A cfile hívja meg az afile.xlsm-et, ami az érdemi munkát végzi. Persze, ha ez nálad a docm, az nem tudom, mennyire befolyásolja az egészet.

 

Szóval nálam így nézne ki a cfile makrója:

 

Sub afilekezel()
Dim akthely As String, afile As String, awb As Workbook
akthely = ThisWorkbook.Path
afile = akthely & "" & "afile.xlsm"
Application.Run "'" & afile & "'!Module1.bletrehoz" ' Ez megnyitja az afile-t, és elindítja benne a programot, amit én bletrehoz-nak neveztem el 
Set awb = Workbooks("afile.xlsm") 
awb.Close ' Itt lezárnám az afile munkafüzetet
Stop
' Itt nem folytatom, mert az a-ban lévő makrónak előbb át kellene kerülnie b-be, hogy ne vesszen el. És csak ez után lehet átnevezni b-t.
' A lényeg, hogy afile most már le van zárva.
End Sub

 

Az afile makrójának a kerete meg így nézne ki:

 

Sub bletrehoz()
Dim wb As Excel.Workbook, akthely As String
akthely = ThisWorkbook.Path

 

'Innen hívnád meg a saját programodat


Set wb = Workbooks.Add ' Létrehozzuk a bfile-t
wb.SaveAs akthely & "" & "bfile.xlsm", FileFormat:=xlOpenXMLWorkbookMacroEnabled

 

' Itt még feltehetőleg át kell másolni az afile programját a bfile fájlba


End Sub

 

Mindkét fájlban feltételeztem, hogy ugyanabban a könyvtárban van a 3 fájl. A teszt idején ez nekem célszerű volt. Ha nem így van, azt majd átírod.

Előzmény: m54-b (36479)
Eredő Vektor Creative Commons License 2022.06.14 0 0 36483
Előzmény: Garashan (36482)
Garashan Creative Commons License 2022.06.14 0 0 36482

Este telefonról írtam, ezért nem fejtettem ki jobban a dolgot. De látom, hogy Te érted, hogy mit is akartam írni.
Az én alaptézisem: van egy a fájl, amit elindítunk. Elvégzi, amit el kell, hogy végezzen. Ha megvan a b fájl, akkor az a fájl elmenti magát, mint c fájl. Ekkor elméletileg már át lehet nevezni a b fájlt a-ra. A c pedig megmarad, mint "szemét".

Esetleg írhatsz egy bat fájlt még, amit meghívsz Excelből mielőtt bezárod azt. A bat fájlba teszel egy késleltetést, hogy legyen ideje bezáródni az Excelnek, majd törlöd vele a c fájlt.
Parancssort a call shell (https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/shell-function) függvénnyel lehet meghívni.

Előzmény: Fferi50 (36480)
pimre Creative Commons License 2022.06.14 0 0 36481

off: "A fontosságához pedig csak annyit, a magam szórakoztatására csinálom...". Ez a legszebb az egészben, az öncél. 

Előzmény: m54-b (36479)
Fferi50 Creative Commons License 2022.06.14 0 0 36480

Szia!

"Lehet c-filét játszani, de akkor meg az marad ott mint "szemét"."

Kicsit nem értem a problémád. Az egyértelmű, hogy megnyitott fájl nevére másik fájlt nem lehet átnevezni, ezért valamilyen "kerülő"-nek látszó utat kell választani. Ebben az esetben egyáltalán nem "szemét" a c-file, arra való, hogy megnyissa az a-filet, amiben lefuttatja amit kell. Ezután bezárja az a-filet és felülírja a b-filevel. Pont. Csak a c-filet kell futtatnod. Ez a fájl lehet wordben vagy excelben, választásod szerint. 

Üdv. 

Előzmény: m54-b (36479)
m54-b Creative Commons License 2022.06.14 0 0 36479

Köszönet! Ez működik is, csak mivel az a-file-ből hívom meg, nem tudja átnevezni, amíg az a-file nincs bezárva.

Lehet c-filét játszani, de akkor meg az marad ott mint "szemét". Leírom a konkrét menetet:

van egy docm, egy xlsm, néhány wav és egy docx. A docm az indulás. Ez induláskor megkérdezi a weboldalamat, hogy van-e újabb verzió belőle, a php visszaüzen. Ha nincs, akkor kész. Ha van, akkor elküldi a frissítendő fájlok listáját, amelyeket a docm letölt. A többi fájlal nincs gond, azokat felülírja, a docm a gond. Letölti az uj.docm-t és azt kellene átnevezni a regi.docm-re. (Jelenleg az összecsomagolt fájlokat tölti le, kicsomagolás és megtörtént a frissítés. Gondoltam elegánsabb lenne, ha ezt kihagyom.)

(A fontosságához pedig csak annyit, a magam szórakoztatására csinálom...)

Visszatérve a küldött linkre: van egy ilyen próbám

 

Sub meghivas()
excel_nev = "morse_sebesseg-jelszotlan.xlsm"
Path = ActiveDocument.Path & "\"
    Dim myexl As Object
    Set myexl = CreateObject("Excel.Application")
    Dim myworkbook As Object
    Set myworkbook = myexl.Workbooks.Open(Path & excel_nev)
    myexl.Visible = True
myexl.Run "atnevezo"
    ActiveDocument.Close savechanges:=False
End Sub

Működik, de a nyitott fájlt nem tudja átnevezni.

 

A myexl.Run elé beraktam egy sort

 

Call Wait(10)
myexl.Run "atnevezo"

 

és a ezt hozzá

 

Sub Wait(n As Long)
    Dim t As Date
    t = Now
    Do
        DoEvents
    Loop Until Now >= DateAdd("s", n, t)
     ActiveDocument.Close savechanges:=False
End Sub

Ez meghívja az excelt, bezárja a word fájlt, de nem fut az excel makró. (Gyanítom, hogy csak a fájlt zárja be, maga a Word nyitva marad. Most, hogy írom, lehet a "Nothing"-ok hiányoznak a jósághoz?)

 

De tényleg nem létkérdés a dolog!

Előzmény: pimre (36478)
pimre Creative Commons License 2022.06.13 0 0 36478

Szia, itt találtam valamit, ami talán megoldhatná: https://prog.hu/tudastar/196729/makro-futtatas-makroval

Csak most nem kezdeném el próbálgatni, mert reggelig nem biztos, hogy működne.

 

Szóval arra gondoltam, hogy a fenti megoldás alapján c programból indítanám el az a makrót, és annak befejezése után - feltéve, hogy c ismeri a és b nevét - már tudná törölni a-t, és át tudná nevezni b-t az eredeti a nevére.

 

Persze lehet, hogy túlkombináltam, hiszen nem biztos, hogy előre tudjuk b nevét. Igaz, ez is megkerülhető, ha munkalapon át tudná adni a szükséges fájlnevet.

Előzmény: m54-b (36477)
m54-b Creative Commons License 2022.06.13 0 0 36477

Hogy kerül át a vezérlés a c-re? Automatikusan szeretném megoldani az egészet. Olyanra gondolok, mint amikor egy program frissíti magát.

Előzmény: Garashan (36476)
Garashan Creative Commons License 2022.06.13 0 0 36476

Ha egy mappán belül vannak, akkor nem hiszem, hogy lehetséges lenne. Hisz a-nak be kellene zárnia magát, hogy a b-t át lehessen nevezni a-ra, azzal felülírva azt.

Amit még megpróbálhatsz: a-t mented másként c-re, akkor az eredeti 'a' "bezáródik". Lefut a makró és b-t szabadon átnevezheted a-ra.

Előzmény: m54-b (36475)
m54-b Creative Commons License 2022.06.13 0 0 36475

Adott két fájl, a-file és b-file. Az a-file-ben fut egy makró, aminek a vége az kellene, hogy legyen, hogy a b-filét átnevezi a-filé-re.

Valami csodatevő varázslat? (Mert bármit hívok meg, az a-file nem záródik be, és addig reménytelennek tűnik számomra.)

Edina2022 Creative Commons License 2022.06.13 0 0 36474

Kaptam egy segítséget amit tovább tudtam gondolni nagyon jó de valahogy jó lenne autómatizálni egy függvénnyel. 

első a beosztás 

 

második a kép amiről látni lehet hogy 2 től zárásig elég sz..r a helyzet :D kell diák 

 

(ez nem teljes névsor csak gyors  beo - és diák rendelési terv )

Szupi vagytok 

Előzmény: Edina2022 (36473)
Edina2022 Creative Commons License 2022.06.13 0 0 36473

Szia köszi a segítséget. 

Ez egy kereskedelmi egység ami reggel 6 -22 ig van nyitva kivéve vasárnap amikor rövidített nyitvatartás van. Sajnos ezek a sémák nem olyan könnyű ráhúzni. pl reggel 6 kor nem kell annyi pénztáros mint pl 10 órakor  vagy 16 órakor. Grafikon vagy számegyenesben azért gondolkodok mert látom hol vannak átfedések esetleg hiányok. Hova kell diák és honnan kell elvenni mert többet rendeltem. Mindezt napi szinten papir alapon csinálom ezt szeretném könnyíteni magamnak. 

Megvan a beosztása a kasszásokank és a diák rendelés összeállítását csak ez alapján látom mivel ők nem 8 órásak igy kombinálni kell. 

De minden féle kép átolvasom még hátha hasznosíthatok :D 

Köszi 

Előzmény: lxt (36448)
Edina2022 Creative Commons License 2022.06.13 0 0 36472

Szia Köszönöm a segítséget. Az a lényeg hogy lássam hány ember van a kasszasoron bizonyos órákban. Attól függ majd hogy kell e még segítség vagy elegendő a pénztáros létszám a zökkenőmentes vásárlók áteresztéséhez. 

Látnom kell az átfedéseket ezért volt a számegyenes példám. 

Megírom a kasszasor beosztását diákot úgy rendelek majd ahol hiány van lefedettségben vagy sok a vásárló létszám mint pl 4-5 órakor mikor mindenki végez átlag a munkahelyén és megy haza de előtte beugrik vásárolni. 

Próbáltam a sablonokat letölteni de nem látom át hol van hiány ezért gondolkoztam például egy diagrammban napi szinten. 

Köszi még egyszer 

Előzmény: pimre (36447)
Delila10 Creative Commons License 2022.06.13 0 0 36471

Ja, és a kép.

Előzmény: Davwis (36469)
Delila10 Creative Commons License 2022.06.13 0 0 36470

A keresett érték első esetben az A2 cella értéke.

 

Megkeressük, melyik tartományban van.

=HA(DARABTELI(F1:F1500;A2)<>0;1;HA(DARABTELI(G1:G1500;A2)<>0;2;HA(DARABTELI(H1:H1500;A2)<>0;3); … ;HA(DARABTELI(T1:T1500;A2)<>0;15)))))))))

 

Itt majd kitalálod, hány zárójelet kell írnod a képlet végére (15-öt vagy 16-ot).

 

Az INDEX függvénybe beépíted a fentit, a C1 képlete:

 

=INDEX($F$1:$T$1500;1;HA(DARABTELI($F$1:$F$1500;A2)<>0;1;HA(DARABTELI($G$1:$G$1500;A2)<>0;2;HA(DARABTELI($H$1:$H$1500;A2)<>0;3) ... ;HA(DARABTELI(T1:T1500;A2)<>0;15)))))))))

 

A C1 képletét másolhatod lefelé.

Előzmény: Davwis (36469)
Davwis Creative Commons License 2022.06.11 0 0 36469

Sziasztok

 

A probléma aminek a megoldásában szeretnék segítséget kérni:
Van 1500 gép. 4 db teremben vannak a gépek. A gépek számának az első karaktere a terem száma ahol van. PL. 1G04B. A G az a sort jelöli ahol van(A-Z), a 04 pedig a sorban elfoglalt helye.A B vagy J betű a végén az a jobb vagy bal oldala (mindkét oldalon gyárt).

A gépek sorszáma fent van excelben. Egy gépcsoport 100 gépből áll. Na most van 15 ilyen gépcsoport oszlopokba szedve az excel munkafüzetben. Azt szeretném, hogy az 1500 gép mellé kiíratni, hogy melyik csoportba tartoznak.

Próbáltam Vlookup függvénnyel és IF-el. A vlookup megtalálta és kiírta a gépszám mellé még egyszer, az IF fv. pedig ha egyezett a kettő akkor kiírta a cellába, hogy 1. gépcsoport.

Viszont amikor pivotot szerettem volna belőle csinálni, egy kimutatásban, akkor az egész táblával számolt, nem csak a kikeresett gépcsoporttal.

pimre Creative Commons License 2022.06.10 0 0 36468

A 36465-ben nem mutattam be a végső állpotot. Most pótolom:

 

 

Ezt a képet trendvonallal nem hiszem, hogy el tudnám érni.

Előzmény: pimre (36467)
pimre Creative Commons License 2022.06.10 0 0 36467

A vonalat igen, de akkor megmaradnak - a jelen példában C oszlopban lévő 4.23-hoz tartozó - segédoszlopok:

 

 

Ha pedig törlöm őket, akkor a trendvonal is eltűnik. Van javaslatod arra, hogy a trendvonal megmaradjon, de az oszlopok, amelyeket összeköt, eltünjenek?

Az általam eddig használt, és most az előző bejegyzés szerint megtalált eljárásban pedig magukat a segédoszlopokat alakítom vízszintes vonallá.

Előzmény: Eredő Vektor (36466)
Eredő Vektor Creative Commons License 2022.06.10 0 0 36466

Azt a vonalat nem lehet csak simán trendvonal felvételével odarakni?

Előzmény: pimre (36462)
pimre Creative Commons License 2022.06.10 0 0 36465

Szia Feri!

 

"Először add hozzá az új adatsort, nyilván oszlop lesz.

Ezután jelöld ki, majd jobb egérgomb - adatsor diagramtípusának módosítása (remélem van ilyen nálad). így módosíthatod csak a kijelölt adatsor megjelenését." Ezt csinálom.

 

Viszont megtaláltam az eltérést az eddigiektől. Eddig egy kattintással kijelöltem a módosítandó adatsort, és csak arra vonatkozott a megjelenítés módosítása. Most nem. Most ad egy új ábrát, benne a kijelöléstől függetlenül kiírja a jelenlegi diagramtípust, és nekem kell kiválasztanom újra a módosítandót. De hiába hasonlít a kép az eddigiekhez, most nem a bal oldalról kell kiválasztanom a Vonaldiagramot, hanem lenn az Adatsor2 melletti mezőben (kék színű) kell a csoportosított oszlop helyett a Vonaldiagramot választanom:

 

 

 

Előzmény: Fferi50 (36464)
Fferi50 Creative Commons License 2022.06.10 0 0 36464

Szia!

Próbáld két lépésben.

Először add hozzá az új adatsort, nyilván oszlop lesz.

Ezután jelöld ki, majd jobb egérgomb - adatsor diagramtípusának módosítása (remélem van ilyen nálad). így módosíthatod csak a kijelölt adatsor megjelenését.

Üdv.

Előzmény: pimre (36463)
pimre Creative Commons License 2022.06.09 0 0 36463

Időközben eszembe jutott, hogy könnyebb tesztelni a problémát, ha a minta adatok elérhetőek. Ezért a képeken látható teszt fájl innen letölthető: https://docs.google.com/spreadsheets/d/1hUWtkxkLsAx5ENM4HCFb98PYZcu0vKJL/edit?usp=sharing&ouid=113951927802309105103&rtpof=true&sd=true

 

Előzmény: pimre (36462)
pimre Creative Commons License 2022.06.09 0 0 36462

Sziasztok, az Excel 2019-es verziójával adódott gondom. Egy adott feladathoz minden évben megújítok egy grafikont. A lényeg, hogy adatokat oszlopdiagramban sorba rendezek, majd az átlagból egy vízszintes piros vonalat teszek rá. Erre az Excel ad (tavalyig adott) lehetőséget azzal, hogy két párhuzamos adatsort egy grafikonon tudok ábrázolni. Az egyiket oszlop, a másikat vonaldiagram formájában. Így néz ki az eredmény:

 

Az eljárás a következő volt tavalyig, illetve Office 2010 verzióban most is működik az alábbi kép szerint. Az eljárás: A B24-ben lévő adatot (elírtam, nem 24. tétel, hanem az átlagok átlaga) bemásolom a C oszlop minden egyes sorába, és beleveszem az adattartományba. Rábökök az egyik elemére, amire az összeset kijelöli. Ekkor tervezés->majd bal oldalon Más adattípus kiválasztás->Vonaldiagram választás. És erre - piros vonalszín választásával - a fenti képet kapom.

 

Az elmúlt két évben Office 2019 alatt is ezzel a technikával készítettem a grafikont. Most nem működik. Ugyanis a más adattípus kiválasztás után mindkét adatoszlopból vonaldiagramot készít.

 

Tudtok segíteni, hogy én hibázok el valamit, vagy a legutóbbi frissítés teszi lehetetlenné a korábbi megoldást?

 

 

m54-b Creative Commons License 2022.06.09 0 0 36461

A nyugdíjasok és a gyerekek sosem érnek rá!

Előzmény: djuice (36460)
djuice Creative Commons License 2022.06.09 0 0 36460

Köszi mindenkinek!

 

Arra jutottam, mivel 176 nevet kell átnézni és kb. 70%-ban helyes, hogy átíratom, kijavíttatom a gazdájával (úgy is nyugdíjas, ráér). :)

Aztán majd lesz vmi vele.

(Arról nem is szólva, hogy kb. a fele név ugrik kapásból, hogy hosszú évekkel ezelőtti üzleti kapcsolatok a java, közben volt egy covid hullám is... stb.)

Előzmény: pimre (36458)
m54-b Creative Commons License 2022.06.09 0 0 36459

egyszerű szöveges listát is ad

 

Nem láttam a szememtől... :-)

Előzmény: pimre (36458)
pimre Creative Commons License 2022.06.09 0 0 36458

Itt van az MTA hivatalos - évente frissülő - listája, amivel kevesebbet kell dolgozni. Ez is 4500 körüli: http://www.nytud.mta.hu/oszt/nyelvmuvelo/utonevek/index.html

Ez külön tartalmazza a férfi (1914) és a női (2530) neveket. A PDF listák mellett egyszerű szöveges listát is ad, ami minden további nélkül Excelbe másolható.

 

Persze az elütéseket ez sem oldja meg, ezen kívül az olyanokat sem, mint Ádám Ottó, Zoltán Gábor, Tamás Ervin, Balázs Péter stb. Továbbá a több névből állóakat, mint Kovács János István, illetve az asszonyneveket, mint Kovács Sándorné.

 

Ha erre makrót írnék, akkor nevenként mind az első, mind a második nevet értékelném abból a szempontból, hogy melyik név fogadható el keresztnévként.

 

És ennek alapján 3 csoportot képeznék. Az egyikbe azok kerülnének, ahol az egyik keresztnév, a másik nem. Ezek feltehetően szabályos nevek.  

 

A második csoportba azok kerülnének, ahol mindkét név lehet keresztnév, a harmadikba azok, ahol egyik sem. Illetve még a -né végződésűeket (ha nem önmagukban keresztnevek, mint pl. René) megvizsgálnám abból a szempontból, hogy a -né elhagyásával keresztnév-e, így az asszonynevek is besorolhatók.

 

Egyszer foglalkoztam ilyesmivel, bár ennél egyszerűbb volt. Talán előszedem, ha érdekes lehet.

Előzmény: m54-b (36457)
m54-b Creative Commons License 2022.06.08 0 0 36457
Előzmény: m54-b (36456)
m54-b Creative Commons License 2022.06.08 0 0 36456

A segédoszlopban x-el jelölöd az elírásokat --> szűrő, kézi javítás

Előzmény: djuice (36454)
m54-b Creative Commons License 2022.06.08 0 0 36455

Mit mond erre a nagy kódex? :)

 

Szopás.

Van egy táblázatom  3410 keresztnévvel

 

 

ezzel tudok segíteni. (Esetedben mire jó? Azt nem tudom. Fkeres segítségével esetleg valamit kezdhetsz, de az elírások maradnak.)

Előzmény: djuice (36454)
djuice Creative Commons License 2022.06.08 0 0 36454

Sziasztok!

 

Kaptam CSV fájlban egy telefon névjegyzéket rendbe tenni.

A vezetéknév és keresztnév oszlopok rekordjai vannak össze-vissza cserélgetve. Hol József Varga szerepel fordítva, hol Kovács Gyula helyes sorrendben.

 

Mi volna a legegyszerűbb módszer a vezetékneveket a vezetéknevekhez, a keresztneveket a keresztnevekhez "áthelyezni"?

 

Gondoltam egy olyanra, hogy keresztnevek alapján átnézve, manuálisan csinálok egy segédoszlopban jelölést (ami keresztnév, az 1, ami nem az 0) és így szétválogatni, de az a baj hogy még elírások is vannak, pl. Béla helyett Bléa vagy Bélá... stb.

 

Mit mond erre a nagy kódex? :)

Eredő Vektor Creative Commons License 2022.06.08 0 0 36453

nem lehet megnézni, csak engedéllyel

általában ez szokott ilyenkor  a gond lenni:

 

Nyomsz egy Ctrl+End-et, akkor az aktív munkalap "végére" ugrik. Ha xmillió kitöltetlen sorig / oszlopig elnavigál erre a billentyűkombinációra, akkor az foglalja a helyet. Töröld sor oszlop törléssel, vagy "mind törlése" opcióval. Mentsd és utána jó lesz.

Előzmény: webhifi1 (36452)
webhifi1 Creative Commons License 2022.06.08 0 0 36452

Sziasztok!

 

 

Az alábbi linken található egy sharepoint excel file. Nem értem mi adja az 50 MB méretet?

 

https://docs.google.com/spreadsheets/d/1xY-JH_vi0VeaLkzy3djVNE4NfiHc0hIO/edit?usp=sharing&ouid=106943673650928502369&rtpof=true&sd=true

 

 

Eredő Vektor Creative Commons License 2022.06.02 0 0 36451
Előzmény: Edina2022 (36445)
Eredő Vektor Creative Commons License 2022.06.02 0 0 36450

vagy itt egy csomó kapcsolódó template:

 

https://templates.office.com/hu-hu/id%c5%91beoszt%c3%a1sok

 

ha az előző nem is, de ennyiből talán megtalálod a szükségest.

Előzmény: Edina2022 (36446)
Eredő Vektor Creative Commons License 2022.06.02 0 0 36449

én ezzel kísérleteznék első körben:

 

https://templates.office.com/hu-hu/napi-%C3%BCtemterv-tm02930020

 

Úgy látom, tökéletesen megfelel a célnak

Előzmény: Edina2022 (36445)

Ha kedveled azért, ha nem azért nyomj egy lájkot a Fórumért!