- D1Rect: Nagy "hülyétkapokazapróktól" topik
- bambano: Bambanő háza tája
- btz: Internet fejlesztés országosan!
- LordAthis: Ismét egy "Idióta" A.I. Projekt, hogy meglovagolja az aktuális trendeket...
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- gban: Ingyen kellene, de tegnapra
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
-
LOGOUT
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
oke
senior tag
válasz
Delila_1
#38983
üzenetére
Köszönöm, az összefűzés részét még értem, a megszámolást már nem annyira. Nem biztos, hogy ez az, ami nekem kellene.
Az összefűzés alapnak jó lehet (Q oszlop), valami ilyen eredmény kellene (P oszlop):
Tehát pl. a "4455lehetőség"-ek esetén csak az egyiket jelölje meg, a többi maradhat üresen.
-
#38998
Delila_1
veterán
Flowtation
#38997
Delila_1
veterán
válasz
Flowtation
#38997
üzenetére
Az FKERES függvény tartománya attól függ, hogy a hivatkozott dátum páros, vagy páratlan hétre esik.
A HÉT.SZÁMA függvény megadja a hét számát. Ezt vizsgálja a PÁROSE függvény. IGAZ érték esetén a Páros tartományban keresi a HÉT.NAPJA értéket, HAMIS-nál a másikban.
Ezt a logikát érdemes követni. Láttad, én is felvittem a két táblázatot az Adatok lapra. Nem feltétlenül kell másik lapon lenniük az adatoknak.
-
#38997
Flowtation
őstag
Delila_1
#38996
Flowtation
őstag
válasz
Delila_1
#38996
üzenetére
Közben megcsináltam egy ilyen képletet:
=HAHIÁNYZIK(FKERES(B2;Munka2!$A$1:$B$5;2;HAMIS);"")Ezzel már működik. Na most itt jön a képbe az, hogy akkor kellene két táblát csinálom a munka2-be, a páros-páratlan hétre, és ehhez szerkeszteni a fenti képletet, ugye? Bocs, hogy nem a te képletedből dolgozom, de ez nekem nagyon jó a képletek megértésére, használatára.
Ilyen a két tábla most:
itt a tábla nevek: A-B páratlan, D-E páros
-
#38996
Delila_1
veterán
Flowtation
#38995
Delila_1
veterán
válasz
Flowtation
#38995
üzenetére
Másold át a B5 és a C5 képletét az új lap B és C cellájába, majd "húzd le", ameddig kell.
-
#38995
Flowtation
őstag
Delila_1
#38986
Flowtation
őstag
válasz
Delila_1
#38986
üzenetére
Szuper! Nagyon köszönöm!
Ezt elteszem, mert nekem jó lesz. Viszont kell csinálnom egy olyat is, hogy egész oldalas táblázat, ahol látszik minden (nyomtatásra). Na most annyit már megcsináltam, hogy egy kezdődátum, azt le lehet húzni egész hónapra, ekkor a mellette levő cellába kiírja, hogy az milyen nap (SZÖVEG függvény). A harmadik oszlopba pedig azt szeretném, hogy a nap alapján bekerüljön a hely. Tehát:
A: dátum; B: hét napjának neve (ez már megy), C: a naphoz tartozó munkahely
Igaz ez a második heti szerdákat nem jól tölti ki, de ez egyelőre nem érdekes.
-
-
gabranek
senior tag
Sziasztok!
Van olyanra lehetőségem, hogy egy meghatározott tartományt A-E oszlop, 1-20 sor, ami tartalmaz egyesített cellákat is, másolásnál egy objektumként kezeljek? Mondjuk horgonnyal, vagy azonosítóval? Ne kelljen kijellölni az egész A1-E20 tartományt, hanem csak a hozzá tartozó horgonyra kelljen kattintani?
Megoldható ez valahogy?
-
Fferi50
Topikgazda
Szia!
"nekem a Rajzszámok kellenének az excel egy másik munkafüzetébe ahol majd ismét vizsgálhatom őket."
És mi akadályoz meg abban, hogy átmásold a szűrés után a látható rajzszámokat a másik munkafüzetbe?
Esetleg az egész feladatot is megadhatnád, mert így csak a részkérdésre kapsz megoldást, ami lehetséges, hogy nem alkalmazható a te esetedben.Üdv.
-
Ideg
aktív tag
Üdv!
Egy kis segítséget szeretnék kérni! Alább az adathalmazom:
A feladatom az lenne, hogy Azonosító és Hossz alapján meghatározom a Rajzszámokat. De ugyanahhoz az azonosítóhoz és Hosszhoz tartozhat több Rajzszám is. Tehát nekem kellene az összes rajzszám valahogy. Függvénnyel ez megoldható valahogy?
-
#38986
Delila_1
veterán
Flowtation
#38984
Delila_1
veterán
válasz
Flowtation
#38984
üzenetére
Feltettem ide egy megoldást.
-
#38985
Ideg
aktív tag
Flowtation
#38984
Ideg
aktív tag
válasz
Flowtation
#38984
üzenetére
Szia!
Ha jól értelmezem a gondot akkor csak kijelölöd C1-C14 cellákat, majd a jobb alsó sarokban a fekete + jellel lehúzod amíg szeretnéd. Ugyan így a dátumnál. Ez a kézi módszer.
-
#38984
Flowtation
őstag
Flowtation
őstag
Sziasztok!
Munkahely besztással kapcsoltban lenne kérdésem. Jelenleg 3 suliban vagyok, olyan elrendezésben, hogy ha vesszük pl. a szeptember 3-át:
1. hét:
hétfő-kedd-szerda 1. hely / csütörtök 2. hely / péntek 3. hely
2. hét:
hétfő-kedd 1. hely / szerda-csütörtök 2. hely / péntek 3. hely
kb így:
Azt szeretném kérdezni, hogy van-e erre valami módszer, hogy 1. legyen egy naptár rész berakva, mondjuk szeptembertől-júliusig, 2. automatikusan kitöltődjön ezzel a két héttel? Ha nem lehet, csak kézzel, az sem gond, de hátha megkönnyíthető a kitöltés, elkészítés.Szerk: Egy jó iskolai éves naptár sablon is jó lenne, ezek között most böngészek.
Előre is nagyon köszönöm!
-
cortez25
senior tag
Sziasztok!
Olyan gondom van,hogy kaptam egy táblázatot amiben az idő formátum áltlános formázással 20180821 számként van megadva. ez mellé kelleném a hét számát beszúrni. De a HÉT.SZÁMA függvény ugye csak az idő formátumot (2018.08.21)-t kezeli.
át lehet alakítani a számot dátummá?
Köszi:
Cortez
-
oke
senior tag
Sziasztok!
Számomra egy elég összetett kérdéskörre kellen segítség. Adott a lenti excel, mely folyamatosan bővül. A Duplikációkat akarom elkerülni.Valahogy meg kellene jelölnöm egy új oszlopba bizonyos feltétel szerint az egyezőségeket, hogy utána kimutatásban szűrni tudjam.
Nagyjából ilyen adatok vannak, ahol X van az oszlopnál ott nincs erre a példára vonatkozó releváns adat
Arra lenne szükségem, ha egy "azonosítóból" több is van és azok közül valamelyikben szerepel a kritérium oszlopban az „elvégezve” szó, akkor a többi azonos azonosítóval rendelkező közül csak egynél jelölje meg az utolsó oszlopban a sort mondjuk egy x-el. És csak azok közül, ahol a „lehetőség 1-6” megnevezés van. A „nem érdekes”-t ne figyelje.Illetve még azt is figyelni kellene, hogy azonos napon történjen.
Próbálkoztam összefűzéssel, de az nem működik, mivel az egyik sorban lehetőség1, a másikban lehetőség2 vagy 3 stb. szerepel, tehát nem azonos. -
Fferi50
Topikgazda
Szia!
Pontosabban a képlet
=szum($E$4:$E$8)<=480
ehhez kell beállítani a piros hátteret. Amikor a képlet eredménye igaz, akkor érvényesül a hozzá kapcsolódó háttérszín. A feltételes formázás hatóköre is ugyanaz a tartomány.
Mivel nem sztenderd módon van meghatározva, hány sornak kell lennie (2-10 is akár), ezért sajnos minden tartományra külön kell meghatározni a formázást.Üdv.
-
v.attis
őstag
Sziasztok!
Lehet feltételes formázást alkalmazni egy olyan cellára ahol a cellában egy elég szép képlet van, de nekem az eredményt kell figyelnie a formázásnak.
Konkrétan:
- munkaidő tervezés, a dolgozónak termékeket kell gyártania, több félét. Ezért normaperc és darabszám szerint automatikusan kiszámolja a felhasznált időt, tehát mondjuk A oszlopba beírom a terméket, B oszlopba a darabszámot és C oszlopban megjelenik az utalványozott idő.
- ennél bonyolultabb azért, ugyanis akár 5-10 sor is lehet, mert többfélét gyárt egy műszak alatt.
- tervezéskor nekem az kellene, hogy mondjuk van 5 sor ami akár 30 perctől 400 percig bármit mutathat (persze a képlet alapján) és nekem az kellene, hogy amennyiben az 5 sor összege nem éri el a 480 percet, akkor mind az 5 sor (pontosabban 5 cella) változzon pirosra.Tudom hogyan kell ezt megvalósítani számok beírása esetén, de ezekben a cellákban képletek adják a számokat és így már nem megy...
-
Mutt
senior tag
Folytatás:
13. Most már csak meg kell szabadulnunk azoktól a soroktól ahol az érték oszlopban az azonosító látható, megint az attributum oszlop segít nekünk. A ".1"-re végződő attributomok nem érdekelnek minket.
Attributom oszlopon Szövegszűrők -> Nem erre végződik opcióval tudjuk elérni ezt.
14. Törölhető ezek után az attributum oszlop, jobb klikk eltávolítás.
15. A szebb végeredményért rendezzük sorba a listát előbb azonosító, majd dátum szerint. Azonosító oszlop kijelöl, majd Kezdőlap -> Rendezés -> Növekvő. Ugyanezt csináljuk meg Dátummal.
16. Egy kimutatás kell már csak készíteni. Azonosító oszlop kijelöl Átalakítás -> Forgatott oszlop
A beállítások ezek legyenek:
17. Az eredmény Power Query-ben
18. Excelbe tölteni a Kezdőlap -> Bezárás és betöltés -> Adott helyre opcióval lehet. Válaszd a táblázatot és az új munkalapot.
Ezek után a kollégák töltik az adatokat és neked csak az Adatok fülön az összes frissítése gombra kell kattintanod a kimutatás frissítéséhez.
Ha egy napon több esemény is van ugyanazon azonosítóhoz akkor ez nem fogja megjeleníteni azokat, Fferi megoldása az első esemény visszaadja.
üdv
-
Mutt
senior tag
válasz
kezdosql
#38964
üzenetére
Szia,
FFeri makrós megoldása mellett itt egy Power Query megoldás.
1. Az adatsorod táblázatban legyen
2. Excel-ben Adatok fülön Adatok beolvasása táblázatból megnyitja az adatsort Power Query szerkesztőben
3. Töröld az automatikusan létrehozott típus módosítás lépést jobb oldalon lévő lépés-szerkesztőben
4. A dátum oszlopot állítsuk át Dátum formátumra
5. Most pedig vágjuk szét a cellákban található azonosítót és szöveget. Jelöld ki az első oszlopot, majd válaszd az Átalakítás -> Oszlop felosztása -> Karakterszám alapján
Csak egyszer kell az első 4 karatker alapján szétvágni a szöveget:
Az eredmény ez lesz:
A.1 oszlopban lesz az azonosító és az A.2-ben a maradék szöveg.6. Az 5-ös lépést el kell végezned az összes oszlopon, vagyis következő oszlop kijelöl és oszlop felosztása karakterszám alapján.
7. Megvan minden oszlopra az átalakítás.
8. Jön egy furcsa lépés, az Unpivot. Jelöld ki csak a Dátum oszlopot, majd Átalakítás -> Többi oszlop elemi értékekre bontása
Az eredmény ez lesz:
9. Azt kell elérnünk, hogy az érték oszlopban az azonosítók egy másik oszlopba kerüljenek, ebben tud segíteni az hogy az attributum oszlop itt mindig ".1"-re végződik.
Egy új oszlopot fogunk beszúrni, amibe az érték oszlop adatát csak akkor írjuk be, ha az attributum ".1"-re végződik. Oszlop hozzáadása -> Egyéni oszlop opció kell nekünk.
10. Az egyéni oszlop képlete a fenti logika alapján ez lesz:
= if Text.End([Attribútum],2) = ".1" then [Érték] else null
11. Az eredmény megint nem tökéletes, mert pont ott nem látható az azonosító ahol az esemény történt.
12. Ezt lehet orvosolni az Átalakítás -> Kitöltés -> Le opcióval.
A végeredmény jól néz ki:
13. Most már csak meg kell szabadulnunk azoktól a soroktól ahol az érték oszlopban az azonosító látható, megint az attributum oszlop segít nekünk. A ".1"-re végződő attributomok nem érdekelnek minket.
Attributom oszlopon Szövegszűrők -> Nem erre végződik opcióval tudjuk elérni ezt. -
Fferi50
Topikgazda
válasz
kezdosql
#38967
üzenetére
Szia!
Próbáld ki az alábbi makrót:
Sub atrako()
Dim ws1 As Worksheet, ws2 As Worksheet, cl As Range, xx As Long, helye As Range, kodja As Range, kod As String
Set ws1 = Sheets("Munka1")
On Error Resume Next
Set ws2 = Sheets("Jelent?s")
If Err = 9 Then
Set ws2 = Sheets.Add(after:=Sheets(Sheets.Count))
ws2.Name = "Jelent?s"
Else
ws2.UsedRange.Clear
End If
On Error GoTo 0
With ws1.Range("A1").CurrentRegion
For Each cl In .Columns(1).Cells
If cl.Row > 1 Then
If Application.WorksheetFunction.CountA(.Rows(cl.Row)) > 1 Then
Set helye = ws2.Columns(1).Find(what:=cl, LookIn:=xlValues, lookat:=xlWhole)
If helye Is Nothing Then
Set helye = ws2.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
helye.Value = cl.Value: ws2.Columns.AutoFit
End If
For xx = 1 To .Columns.Count
With cl.Offset(0, xx)
If .Value <> "" Then
kod = Left(.Value, 4)
Set kodja = ws2.Rows(1).Find(what:=kod, LookIn:=xlValues, lookat:=xlWhole)
If kodja Is Nothing Then
Set kodja = ws2.Cells(1, Columns.Count).End(xlToLeft).Offset(0, 1)
kodja.Value = kod
End If
ws2.Cells(helye.Row, kodja.Column).Value = Mid(.Value, 5)
End If
End With
Next
End If
End If
Next
End With
With ws2.UsedRange
.Range("A1") = "A000"
.Sort key1:=Range("A1"), order1:=xlAscending, Orientation:=xlSortRows, Header:=xlYes
.Sort key1:=Range("A1"), order1:=xlAscending, Orientation:=xlSortColumns, Header:=xlYes
.Range("A1").Clear
End With
End SubAz alapadatok a Munka1 munkalapon vannak, ha más a lap neve, írd át légy szíves. Az új elrendezést a Jelentés nevű munkalapon hozza létre. Ha nincs ilyen nevű lap, akkor megkreálja, ha már van akkor törli a tartalmát - tehát többször is lefuttatható.
A kód szerinti sorbarendezésnél fontos, hogy az egyes oszlopokban használt négyjegyű kódok első betűje minden oszlopban az előzőnél hátrább legyen az ABC-ben (A011,B0XX,C100 stb). A sorbarendezés akkor is megy, ha nem így van, csak akkor nem lesznek az oszlopok kódjai egymás után.
Kiindulás:
Eredmény:
Üdv. -
Fferi50
Topikgazda
válasz
kezdosql
#38964
üzenetére
Szia!
A cellák elején a 4 karaktert elválasztja még a kettőspont a szövegtől, vagy csak szemléltetésül tetted oda. Esetleg szóköz elválasztja-e, ha nem kettőspont, vagy elég annyit tudni, hogy az első 4 karaktert kell számolni.
És persze ez folytatódik x oszlopon keresztül.
Kell-e az új formációban a dátumoknak sorban lenni (persze az utólag is rendezhető a végén).Üdv.
-
kezdosql
tag
válasz
Fferi50
#38963
üzenetére
Pocsek lett, mert a szokozoket torolte a forum.
Megprobalom igy betenni, hatha...:
Csakazertse akarja, akkor a tabulatorok helyett " jeleket teszek:indulo (csak egy oszloppal):
datum A
01.01
01.02 A-11: a
01.03
01.04 A-12: c
01.05 A-13: b
01.06 A-11: b
01.07 A-11: c
01.08(Azaz a cellaban akkor van szoveg, ha tortent valami, az elso 4 karakter a teljes kod, utana csak a,b,c betukkel jeleztem, hogy rovid szoveg jon.)
vegeredmeny (3 oszloppal, az elozo oszlop cellai elejen levo 4 karakter uj oszlopokba kerul):
datum A-11"" A-12"" A-13
01.02 a
01.06 b
01.07 c
01.04 """""""""c
01.05 """"""""""""""""b -
-
GreenIT
tag
Uj feladatot kaptam, hogy excelben oldjam meg, szerintem lehetetlen, de bebizonyitottatok, hogy ti mindenre kepesek vagytok, igy kozzeteszem, hatha van ra megoldas.
Adott egy egyszerunek indult, es mara atlathatatlanna valt tablazat.
Az oszlopok A-Z, azaz 26 fele van, a sorok datumok.
A cellakba irjak, ha azon a napon abban a kategoriaban valami esemeny tortent.Azutan bonyolultta valt, most ott tartunk, hogy a 26 kategoriaba meg 2 betus kodokat irnak a cella elejere, sokfele altipus kezelheto.
Most az a feladat, hogy legyen egy olyan tablazat, vagy lista, ahol tipusonkent es altipusonkent lehessen latni, hogy datum szerinti sorrendben mi tortent, es csak az jelenjen meg, amikor tortent valami.
Pelda: "A" oszlop
A-11 A-12 A-13
jan.2 esemeny volt
jul.9 megoldva
feb.5 esemeny
feb.8 reklamacio
jan.5 tavalyi ugy lezarva(Szerintem ez adatbaziskezelesi feladat, de ragaszkodnak a tablazathoz, amiben en nem latom a megoldasi lehetoseget, mert a vegen nem 26 fix oszlop van, hanem dinamikusan valtozo szamu.)
-
-
Enxtheone
tag
Na még egy noob kérdés
Neten találtam egy 555 db karaktert tartalmazó listát. (ázsiai karakterek)
Szóközzel vannak elválasztva.Bemásoltam a jegyzettömbe, elmentettem.
Amikor az excelbe akartam importálni akkor egy cellába egy karakter került (ez igy tökéletes)
de a probláma az hogy mindegyik az egyes sorba került.Tehát első karakter: A1
2. karakter: B1
3. karakter C1Hogy lehetne átformázni hogy mindegyik az A oszlopba kerüljön?
-
Delila_1
veterán
válasz
Dinter
#38951
üzenetére
Adj az oszlopnak címet, legyen az A1 cella Név. A B1 legyen pl. összeg. Most a páratlan sorok lettek szövegesek, a párosak pedig számok.
B2-be: =A3
Jelöld ki együtt a B2 és B3 cellát, majd másold le addig, ameddig valamilyen adatod van az A oszlopban.
Most jelöld ki a teljes B oszlopot, másold, a kijelölést nem változtatva irányított beillesztés, értéket.Állíts be autoszűrőt a 2 oszlopodra. Adatok menü, szűrő. Szűrd a B oszlopot az üresekre. Jelöld ki a szűrt sorokat, teljes sorok törlése. A szűrést visszaállítva az összes kijelölésére már meg is van.
Tovább tart a leírás, mint a végrehajtása.
-
Enxtheone
tag
Sziasztok,
excelben szeretném rendezni a szavakat nyelvtanuláshoz. (könnyen lehet ankiba importálni)
excel 2016 magyarpl.
A oszlop 100 db idegen szó,
B oszlop: 100 db magyar jelentéseViszont ha egy másik forrásból bemásolnék +20 idegen szót, akkor azt hogy lehetne megcsinálni hogy az azonosokat jelzi? Ugy értem ugy a 20 darabos listában van 5 db ami már szerepel az alap százas listán, és nem akarom hogy ezek többször szerepeljenek.
Elöre is köszönöm.
-
Fferi50
Topikgazda
Szia!
Próbáld meg a következőt:
Egy segédoszlop első cellájába a következő képletet írd be:=Darabteli($A$1:$A$500000;$A1)A tartományt természetesen a sajátodhoz igazítsd.
A képletet húzd végig a segédoszlopon.
Majd a segédoszlopra tegyél szűrőt, a szűrő értéke >1
Ezzel megmaradnak azok a tételek, amelyek azonosak.
Esetleg megpróbálkozhatsz azzal is, hogy sorbarendezed az azonosítókat. Ekkor a segédoszlop képlete:=HA($A2=$A1;"Azonos";"Más")Ezt mint látod a második cellától kell indítani és lehúzni a segédoszlopon.
Erre a szűrő értéke Azonos.
Talán ez elég elindulásnak.Üdv.
-
-
oke
senior tag
Sziasztok!
Van egy kb 500 000 soros excelem. Az "A" oszlopban vannak azonosítók, itt kellene megtalálnom, megjelölnöm az azonosokat. Próbálkoztam a feltételes formázás/ismétlődő értékek kijelölése-vel, ami megfelelne a célnak, de már maga az fél óra volt, mire végigfutott. Viszont ha rá akarnék szűrni a színre csak gondolkozik, 1 óra alatt sem dobja fel a választás lehetőséget. Nagyon megfekteti a rendszert. Nincs erre valami más megoldás, makró?
-
Mutt
senior tag
Szia,
2 pontosítást hadd tegyek:
1. Makrómentesen is meg lehet oldani, Excel 4.0 GET.CELL függvénnyel. A névkezelőben létre kell hozni az alábbi képletet:
=GET.CELL(38;Sheet1!A1)
A 38-as kód a függvényben a cella kitöltését nézi, ha automatikus akkor 0-t ad vissza.Egy segédoszlopban így kell használni:
=NemSzines
Nem szabad megadni cella hivatkozást a képletben, mert mindig relatív hivatkozást fog használni.Mivel csak az adatot tartalmazó cellák érdekelik a kérdezőt, ezért a segédoszlopban egy
=HA(A1<>"";NemSzines;"")csak akkor íratjuk ki a cella háttérszínét amikor van adat benne.Ezek után már csak meg kell számolni a 0-kat a segédoszloban.
2. A megadott makrót szintén finomítani kell mert az üres cellákat is megszámolja, amelyre gondolom nincs szükség.
Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean = False, Optional SkipEmptyCells As Boolean = False)
Dim rCell As Range
Dim lCol As Long
Dim blEmptyCell As Boolean
Dim vResult
lCol = rColor.Interior.ColorIndex
If SUM = True Then
For Each rCell In rRange
If SkipEmptyCells Then
blEmptyCell = Not IsEmpty(rCell)
Else
blEmptyCell = True
End If
If rCell.Interior.ColorIndex = lCol And blEmptyCell Then
vResult = WorksheetFunction.SUM(rCell, vResult)
End If
Next rCell
Else
For Each rCell In rRange
If SkipEmptyCells Then
blEmptyCell = Not IsEmpty(rCell)
Else
blEmptyCell = True
End If
If rCell.Interior.ColorIndex = lCol And blEmptyCell Then
vResult = 1 + vResult
End If
Next rCell
End If
ColorFunction = vResult
End FunctionHasználata: =ColorFunction(cella amelynek a szinét keressük; vizsgálandó tartomány; ÖSSZEG vagy DARAB kell?;Kell az üres cella?)
A kérdező esetében:
=ColorFunction($E$1;A1:A43;FALSE;TRUE), ahol E1 cella nincs formázva, A1:A43 az átnézendó tartomány, FALSE mert darab kell és TRUE mert nem érdekelnek az üres mezők.üdv
-
Fferi50
Topikgazda
válasz
friccccc
#38941
üzenetére
Szia!
Akkor nem tudom, mitől indul el.
Ja, hát látom, van benne kismillió Modul, akkor ott lehet az eb elhantolva. Ha nem lehet nyilvános, tedd fel valahova és küldd el a linket priviben.
Mert sajnos látatlanban egyáltalán nem tudok rá mit mondani - de szerintem mások sem.Üdv.
-
Fferi50
Topikgazda
-
friccccc
tag
válasz
Fferi50
#38930
üzenetére
3 munkalapom van Excelben.
VBA-n mindegyiken az előbb küldött formában vannak a makrók. Ha elindítom az exelemet, nem kell semmit csinálni, fut magától, de mindig csak azon, amelyik munkalap épp aktív (amit látok). A 2.-on, 3.-on nem megy semmi ilyenkor. Azt szeretném, hogy menjen ilyenkor a 2-3-on is.
(nem én írtam az excelt sajnos)
Itt egy kép, Munka1, Munka2, Munka3, mindegyiken ugyan azok a kódok vannak, ami a képen. (Worksheet Calculate és Worksheet SelectionChange-re gondolok)
-
lappy
őstag
válasz
Reinhardt
#38932
üzenetére
egy saját függvénnyel lehet csak
pl.:Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean)
Dim rCell As Range
Dim lCol As Long
Dim vResult
lCol = rColor.Interior.ColorIndex
If SUM = True Then
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = WorksheetFunction.SUM(rCell, vResult)
End If
Next rCell
Else
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = 1 + vResult
End If
Next rCell
End If
ColorFunction = vResult
End FunctionA színes cellák számlálása : = ColorFunction (A, B: C, FALSE)
A színes cellák összegzése : = ColorFunction (A, B: C, TRUE)
-
Fferi50
Topikgazda
válasz
friccccc
#38928
üzenetére
Szia!
"Nekem 3 munkalapon kellene, hogy egyszerre menjen külön-külön a VBA program."
Na ezt nem tudom hogyan lehet, hogy egyszerre és külön-külön is menjen...
A makrók csak egymás után tudnak futni... illetve egymásba ágyazás (azaz egyik hívja a másikat) lehetséges több szinten is.
Ez így elég homályos, amit írtál.
Mi alapján induljon el a futás? Valamilyen eseményre? Esetleg teszel fel egy parancsgombot és arra induljon?
"mindegyiken (függetlenül egymástól) szeretnék futtatni VBA makrókat."
Akkor miért baj, ha csak akkor fut le a makró, ha a munkalap aktív?
Ha ezt nem így szeretnéd, akkor Modulba kell rakni a makrókat, akkor nem kell, hogy aktív legyen az a munkalap, amire a makró hivatkozik. Viszont akkor pontosan kell "címezni" a feladatokat és az utasításokat.Talán ha tennél fel egy mintát, többet tudnánk neked segíteni.
Üdv.
-
#38929
Mutt
senior tag
szricsi_0917
#38904
Mutt
senior tag
válasz
szricsi_0917
#38904
üzenetére
Szia,
Excel 2010-től a Power Query tud az ilyen feladatokban segíteni.
Egy nem olyan friss video a szükséges lépésekről.
üdv
-
friccccc
tag
-
ny.janos
tag
válasz
Fferi50
#38924
üzenetére
Szia!
Olvastam amit írtál.
Fogalmam nem volt, hogy ez lehet a hiba. Hozzáteszem, hogy látom kollégáimnál is, hogy egyesek a képleteket rendszerint + jellel kezdik = jel helyett, de mivel én sosem használtam így, nekem nem is volt logikus, hogy itt keressem a hibát. (Persze érthető a + jel használata, hisz az "egykezes" a magyar billentyűzeten.) -
ny.janos
tag
válasz
pero91
#38917
üzenetére
Szia!
Jól sejtem, hogy te nem arra gondoltál, amire a választ kaptad? Táblázatot említettél, amely az excelen belüli funkció. Nem normál tartományra gondolsz, mikor pl. A1-től E20-as celláig töltötted fel adattal a munkalapot, majd törlöd pl. az utolsó 2 sort (ezzel A1-től E18-ig lesznek adataid), de a Ctrl+End billentyűkombináció hatására az E20 cella kerül kijelölésre, amiben már nincs adat?
Ha ez a kérdésed, akkor a válaszra én is kíváncsi vagyok, mert ezzel a problémával én is szoktam szenvedni.
-
Fferi50
Topikgazda
válasz
friccccc
#38919
üzenetére
Szia!
Nagyon jól teszik hogy csak az aktív munkalapon működnek, mert a Private programok csak azon a munkalapon használhatók, amelyek kódlapjára írva vannak.
Ilyen pl. az eseménykezelés, ezt nem is tanácsos közössé tenni (kivéve a később írt lehetőséget).Ha máshonnan is szeretnéd futtatni a programot, akkor Modulba kell tenni, vagy Public -ként létrehozni.
(javaslat VBA súgó).Munkalapok eseménykezelőjét - amennyiben egyforma vagy hasonló funkciót látnak el - be lehet tenni a Thisworkbook kódlapjára a Sheet -tel kezdődő eseménykezelőkbe. Itt az sh változó megmondja, hogy melyik munkalapon generálódott az adott esemény, ez alapján el tudod dönteni, mi legyen a következő lépés.
Üdv.
-
ny.janos
tag
válasz
pero19910606
#38920
üzenetére
Szia!
Valószínűleg a névkezelőben létrehozott tartománynévvel van gondod, ott nem egyezik valami (a fájlt nem töltöttem le, mert múltkor sem boldogultam data.hu-ról a letöltéssel).
Menj lépésenként végig ezen a videón, működnie kell annak.
-
#38921
Fferi50
Topikgazda
pero19910606
#38920
Fferi50
Topikgazda
válasz
pero19910606
#38920
üzenetére
Szia!
Ne +indirect(H5) -öt írj, hanem egyenlőségjellel kezdd =indirect(H5). Az érvényesítésben csak egyenlőségjellel lehet képletet bevinni, nem úgy mint a cellákban
De a további cellákban az I oszlopban mindig a mellette levő cellára kell hivatkozni, nem a H5 cellára.Üdv.
-
#38920
pero19910606
csendes tag
Fferi50
#38918
-
friccccc
tag
Sziasztok,
3 munkalapom van, mindegyiken ilyen VBA kódok vannak:
Sub Reset_Range()
PROGRAM
End Sub
Private Sub CheckBox1_Click()
PROGRAM
End Sub
Private Sub Worksheet_Calculate()
PROGRAM
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
PROGRAM
End SubCsak az éppen megnyitott aktív munkalapon működnek. Mi lehet a baj?
-
Fferi50
Topikgazda
válasz
pero91
#38917
üzenetére
Szia!
"Az indirect függvény a H5-ös cellára hivatkozik, akkor is ha lejjeb lépek és nem a mellete lévőre."
Hiszen te magad írtad be az I oszlopba konkrétan az indirekt(H5) képletet minden cellába.
Nem tudom pontosan mire gondolsz, de a képlet akkor fogja a mellette levő cellát forrásnak tekinteni, ha az I5 cellába beírt képletet lehúzod vagy simán csak lemásolod.Üdv.
-
pero91
újonc
Sziasztok,
Szeretnék egy kis segítséget kérni Tőletek.
Valószinűleg teljesen amatőr hibát követek el, de nem látom, hogy hol...
Kétszintes legördülő menü, az ismert egyszerű példával:
https://data.hu/get/11378843/Book1.xlsx
Ha megpróbáljátok használni a menüt, láthatjátok mi a probléma. Az indirect függvény a H5-ös cellára hivatkozik, akkor is ha lejjeb lépek és nem a mellete lévőre.
Mit csinálhattam rosszul?
Nagyon köszönöm előre is bárki tud segíteni!
Köszönöm!!
Üdv!
-
Delila_1
veterán
válasz
user112
#38912
üzenetére
Jelöld ki a táblázat sorát úgy, hogy a törlendő sor első oszlopa fölé mutatsz. Mikor fekete, jobbra mutató nyíl alakú lesz a kurzor, kattintasz. A Ctrl és a mínusz billentyű együttes lenyomására törlődik a sornak az a része, amelyik a táblázatodban van. Tehát ha a táblázatod például az A:F tartományban van, akkor a következő oszlopokban megmaradnak az adatok a törölt sorban.
-
user112
senior tag
Sziasztok.
Ha sorokat törlök egy táblából, akkor a végén mindig maradnak üres sorok ha a ctrl-end-el a végére akarok menni.
Sortörlés, formátum törlés nem segit.
Hogyan lehet ezeket egyerüen törölni.
Úgy emlékeztem van olyan makro is, amely az utolsó kitöltött sorra áll. -
ny.janos
tag
válasz
llaszlo
#38906
üzenetére
Szia!
A feladat megoldására Delila_1 által írt megoldáson kívül az FKERES függvényt is alkalmazhatod, mely akkor különösen előnyös, ha nem csak kettő, hanem esetleg jóval több sávhatárod van. Ilyenkor jóval egyszerűbb használni, mint sok HA függvényt fűzni össze.
Munka2 fül B1 cellájának képlete:
=FKERES(A2;Munka1!$A$2:$B$8;2;1) -
Delila_1
veterán
válasz
botond187
#38907
üzenetére
Irányított, más néven speciális szűréssel oldhatod meg. Adatok | Rendezés és szűrés | Speciális.
A G1:H2 tartomány adja a szűrés feltételeit. A két feltétel ÉS kapcsolatban áll egymással.
Látod, ahova kigyűjtöd a feltételeknek megfelelő rekordokat, nem kell azonos sorrendben lenniük az oszlopoknak, mint a forrásnál. Nem is szükséges minden oszlopot megjeleníted. -
botond187
csendes tag
Sziasztok,
Egy oszlopban időpontok szerepelnek (pl.: 2018.08.21 7:21:58 )
Azt szeretném, hogy csak azt lássam, ami az elmúlt 28 napban benne van.
Elég lenne a dátumot nézni, tehát nem kell az óra,perc, másodpercet sem figyelembe venni.
Erre tudtok megoldást?
Próbáltam a szűrésnél a dátumokat állítani, de valamiért nem sikerült...Köszönöm a segítséget.
-
llaszlo
veterán
Hogyan tudom egy cella értékét megadni úgy, hogy egy másik cellától függ az értéke. Különböző értékhatárok között változva.
HA(ÉS(41<= Munka1!B1<=80);650)
HA((Munka1!B1<=40);550)Ez így külön külön működik, viszont nekem egyben kéne több ilyen feltételt megadni és az szerint változzon a cella értéke, hogy mi a Munka1 B1 értéke.
-
dm1970
aktív tag
-
#38904
szricsi_0917
tag
szricsi_0917
tag
Sziasztok.
Olyan kérdésem lenne, hogy excel 2010-ben van esetleg olyan lehetőség, hogy a kimutatásnál egy teljes mappát választasz ki adatforrásként és ha új excel fájl kerül bele akkor azt automatikusan hozzáadja?
Fogalmam nem volt, hogy ez lehet a hiba. Hozzáteszem, hogy látom kollégáimnál is, hogy egyesek a képleteket rendszerint + jellel kezdik = jel helyett, de mivel én sosem használtam így, nekem nem is volt logikus, hogy itt keressem a hibát. (Persze érthető a + jel használata, hisz az "egykezes" a magyar billentyűzeten.) 
Új hozzászólás Aktív témák
Hirdetés
- Nintendo Switch
- AI modernizálja Brazília áramhálózatát
- GL.iNet Flint 2 (GL-MT6000) router
- Videó stream letöltése
- A fociról könnyedén, egy baráti társaságban
- Apple Watch Ultra - első nekifutás
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- WoW avagy World of Warcraft -=MMORPG=-
- Mikrokontrollerek Arduino környezetben (programozás, építés, tippek)
- QNAP hálózati adattárolók (NAS)
- További aktív témák...
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most kedvező áron!
- 27%-OS ÁFÁS SZÁMLA I Jogtiszta Microsoft digitális és fizikai termékek I DIGITALKEYZ.COM
- Játékkulcsok a legjobb áron: Steam
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Bomba ár! Dell Latitude E7250 - i5-5GEN I 8GB I 256SSD I 12,5" HD I HDMI I Cam I W10 I Garancia!
- BESZÁMÍTÁS! 3TB Western Digital WD RED SATA HDD meghajtó garanciával hibátlan működéssel
- AKCIÓ! Apple MacBook Pro 13 2022 M2 8GB 256GB SSD garanciával hibátlan működéssel
- GYÖNYÖRŰ iPhone 12 64GB Black -1 ÉV GARANCIA - Kártyafüggetlen, MS2113, 100% Akkumulátor
- Microsoft Surface Pro 9 i5-1245U 16GB 256GB 1év garancia
Állásajánlatok
Cég: FOTC
Város: Budapest