-
Fototrend
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
-
Delila_1
Topikgazda
válasz Sickboy25 #7850 üzenetére
1. Vegyük, hogy az A:C tartomány bizonyos sorait akarod színezni. Beírod az első színezendő sor számát pl. a H1-be, az utolsót az I1-be. Kijelölöd az A:C tarományt. Formátum -> Feltételes formázás. A képlet: =ÉS(SOR()>=$H$1;SOR()<=$I$1). Megadod a kedvenc formátumodat.
2. A lapvédelem előtt jelöld ki azokat az oszlopokat, amiket majd engedsz módosítani. Cellaformázás, Védelem fül, vedd ki a pipát a Zárolt elől.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
félisten
válasz Delila_1 #7851 üzenetére
Hali!
Hát én csak egy "kicsit" értelmeztem félre ezek szerint Sickboy25 első feladatát.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim MyFxs As WorksheetFunction
Set MyFxs = Application.WorksheetFunction
Dim MyRange As Range
Set MyRange = Range("A1:A10")
Dim Nth As Integer
Nth = 5
If Not Intersect(MyRange, Range(Target.Address)) Is Nothing Then
Application.ScreenUpdating = False
MyRange.Select
MyRange.Interior.ColorIndex = 0
For i = 1 To Nth
What = MyFxs.Large(MyRange, i)
For j = 1 To MyRange.Cells.Count
If MyRange.Cells(j, MyRange.Column) = What Then
MyRange.Cells(j, MyRange.Column).Select
Selection.Interior.ColorIndex = 37
End If
Next j
Next i
Range(Target.Address).Select
Application.ScreenUpdating = True
End If
End SubFire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Sickboy25
addikt
sziasztok
Na ez egy horgászverseny táblázata lenne, amelyben két fős csapatok indulnak és az össz. fogásuk számít bele a versenybe. Ezeket már megcsináltam, hogy összegezze (ez ugye nem nehéz, még nekem is ment ) viszont mondjuk, ha indul 80-an csapat vagy több, akkor az össz. fogás súlyánál jó lenne, ha a 3 vagy 5 legtöbb súlyt valahogy kiemelné a táblázatból... Mondjuk ha ránézek, akkor egyből lássam vagy aki használja a jelenlegi állást...
Remélem így már érthetőbb volt...
Köszönöm a segítségeteket...
"Az élet olyan, mint az ásás. Néha hátráltat egy- két gyökér, de annak jól odab*szol ásóval, azt’ haladsz tovább!"X360 gamertag: sickboyhun
-
félisten
válasz Sickboy25 #7853 üzenetére
Hali!
Akkor mákom volt, mert a fenti makró épp ezt teszi.
A Set MyRange = Range("A1:A10") sorban beállítod, hogy hol vannak az adataid és meddig tartanak, az Nth = 5 változót meg annyira állítod, amennyire szükséged van (most az 5 legnagyobb értéket szinezi ki, pontosabban, ha van több egyforma érték is a legnagyobbak közt, akkor azt is) pl:
1
7->színezve
3->színezve
4->színezve
5->színezve
6->színezve
7->színezveA makró függőleges elhelyezkedésű (egy oszlopban vannak az adatok) adatokhoz készült!
Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Sickboy25
addikt
válasz Fire/SOUL/CD #7854 üzenetére
akkor még egy kérdés ezt a makrót, hova kell beírnom, hogy működjön? Bocs a láma kérdésért, de ilyet még nem csináltam...
"Az élet olyan, mint az ásás. Néha hátráltat egy- két gyökér, de annak jól odab*szol ásóval, azt’ haladsz tovább!"X360 gamertag: sickboyhun
-
félisten
válasz Sickboy25 #7855 üzenetére
Hali!
Ráállsz/kiválasztod azt a munkalapot, amelyiken az adatok vannak, nyomsz egy ALT + F11-et, bal oldalt fel lesz sorolva a munkalapok neve és épp azon fog állni, amelyik munkalapot kiválasztottad korábban, azon duplakatt, a megjelenő ablakba meg a teljes makrót bemásolod és futtatod. (A VBA editor menüsorán van egy zöld play gombra emlékeztető ikonocska, azzal futtatod)
Innentől, ha módosítasz valamit az adatok közt, akkor automatikusan lefut. A kódot úgy írtam meg, hogy csak akkor dolgozik, ha az adatok oszlopában módosítasz, ha máshol akkor nem, feleslegesen ne fusson le.
Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Sickboy25
addikt
válasz Fire/SOUL/CD #7856 üzenetére
bemásoltam, de valamiért nem színezi ki... Mit csináltam rosszul? Elküldjem a táblát megnézed?
"Az élet olyan, mint az ásás. Néha hátráltat egy- két gyökér, de annak jól odab*szol ásóval, azt’ haladsz tovább!"X360 gamertag: sickboyhun
-
félisten
válasz Sickboy25 #7857 üzenetére
Hali!
Küld...
Mielőtt elküldöd, 2 kérdés
1. Módosítottál legalább egy adaton?
2. Ha hosszú a tábla, akkor lehet, hogy nem látszik az 5 legnagyobb, végignézted?Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Sickboy25
addikt
válasz Fire/SOUL/CD #7858 üzenetére
Ment is, majd írd le mit rontottam el...
Köszönöm
Ui.: mindent megcsináltam amit írtál...
[ Szerkesztve ]
"Az élet olyan, mint az ásás. Néha hátráltat egy- két gyökér, de annak jól odab*szol ásóval, azt’ haladsz tovább!"X360 gamertag: sickboyhun
-
félisten
válasz Sickboy25 #7859 üzenetére
Hali!
Egy kis 2003 és 2007 közti különbség, ezért szoktam (már nem 1x) mondani, hogy célszerű lenne leírni a tisztelt kérdezőknek, hogy mégis milyen verziójú (és némely esetben, milyen nyelvű) Excelt használ... Na de sebaj, van más gond is...
Na ezért meg célszerű képet is bedobni, mert akkor láttuk volna, hogy cellaegyesítést használsz az adataidnál...Módosítani kell a makrót ez miatt...
Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Sickboy25
addikt
válasz Fire/SOUL/CD #7860 üzenetére
Oké bocsi a hibákért, legközelebb, majd ezekre is figyelek...
Azért láttam célszerűbbnek, ha elküldöm. Köszönöm még1x
"Az élet olyan, mint az ásás. Néha hátráltat egy- két gyökér, de annak jól odab*szol ásóval, azt’ haladsz tovább!"X360 gamertag: sickboyhun
-
félisten
válasz Sickboy25 #7861 üzenetére
Hali!
Akkor ami fontos ilyen esetben: Ha cellaegyesítést használsz, akkor az adatsorod utolsó sora, mindig az, mint amikor nincs cellaegyesítés.
Te a kódban R2 : R222 tartományt adtál meg(mert az Excel ilyenkor ezt jelzi ki, ha ráállsz az utolsó egyesített cellára), de ez nem igaz, mert az utolsó cella az a 225-ös...(Be is írtam a makróba) Remélem így érthető...Épp ezért nem kellett a makrón módosítani(legalábbis ebből a szempontból), ha erre odafigyelsz, akkor kifogástalanul működik.Private Sub Worksheet_Change(ByVal Target As Range)
Dim MyFxs As WorksheetFunction
Set MyFxs = Application.WorksheetFunction
Dim MyRange As Range
Set MyRange = Range("R2:R225")
Dim Nth As Integer
Nth = 3
If Not Intersect(MyRange, Range(Target.Address)) Is Nothing Then
Application.ScreenUpdating = False
MyRange.Select
MyRange.Interior.ColorIndex = 0
For i = 1 To Nth
What = MyFxs.Large(MyRange, i)
For j = MyRange.Row To MyRange.Cells.Count
If Cells(j, MyRange.Column) = What Then
Cells(j, MyRange.Column).Select
Selection.Interior.ColorIndex = 37
End If
Next j
Next i
Range(Target.Address).Select
Application.ScreenUpdating = True
End If
End SubFire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Fecogame
veterán
Excel-ben hogyan tudok egy grafikonnál adatokat és dátumot egymáshoz adni? Tehát egy meglévő grafikonhoz dátumot adni?
Lassú a mobilinterneted? 4G/LTE antennák, közvetlenül raktárról ---> http://bit.ly/LTE_Antennak
-
Sickboy25
addikt
válasz Fire/SOUL/CD #7862 üzenetére
köszönöm
este kipróbálom...
"Az élet olyan, mint az ásás. Néha hátráltat egy- két gyökér, de annak jól odab*szol ásóval, azt’ haladsz tovább!"X360 gamertag: sickboyhun
-
félisten
válasz Fecogame #7863 üzenetére
Hali!
ilyesmire gondolsz?
Egy képet betehetnél, ahol akár nyilakkal megjelölöd, hogy hol és mit szeretnél megjeleníteni a grafikonodon. Ha kivitelezhető, akkor így tudnánk megoldással szolgálni.Fire.
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Delila_1
Topikgazda
válasz Sickboy25 #7864 üzenetére
Valóban félreértettem az eredeti kérdést.
Minden feladatot több módon lehet megoldani. Továbbra is más megoldást javaslok, nem a Fire által megadott makróst, ami akkor működik, mikor az R oszlopba beírsz egy adatot.
Az elképzelésem szerint ki kell jelöldöd az R2:R500 tartományt. Ha több adatra számítasz, a tartomány is legyen nagyobb, és a képleteket ennek megfelelően módosítsd. A tartomány első tagját azért a 2. sortól adtam meg, mert feltételezésem szerint van címsorod. A feltételes formázás első képlete:
=ÉS(DARAB2(R$2:R$500)<=81;R2>NAGY(R$2:R$500;4)), és itt megadod a formátumot,
a másodiké: =ÉS(DARAB2(R$2:R$500)>81;R2>NAGY(R$2:R$500;6)). Itt ugyanazt a formátumot add meg.
A 80, vagy annál kevesebb csapat indulása esetén a 3 legnagyobb fogást színezi ki, több indulónál az 5 topot.
A két képletben a <=81, ill. a >81 szintén a címsor miatt nem 80.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
félisten
válasz Delila_1 #7866 üzenetére
Hali!
1. A feltételes formázás is az onchange eseményt használja (belső esemény)
2. A feltételes formázás valóban egyszerűbb lehet, de a megoldásod sajnos nem jól működik. Nálam így "működik" (és jól lett adoptálva)
3. Ha az a feladat, hogy a 3 (vagy 5) legnagyobbat színezd ki, akkor nem értem, hogy a NAGY függvénynél (ami az N-edik legnagyobbat adja eredményül), miért a 4. és 6. legnagyobbat kéred le...Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Delila_1
Topikgazda
válasz Fire/SOUL/CD #7867 üzenetére
1. Az Excel belső eseményeire írt gépi kódú reakció mindig gyorsabb, mint a VB-s makró.
2. Valami csak nem jó az adoptálásnál, nálam kiválóan működik. :)
3. A nagy(r$2:r$500;4) kisebb, mint a nagy(r$2:r$500;3), ezért írtam >nagy(r$2:r$500;4), ill. >nagy(r$2:r$500;6) képleteket.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
aclandiae
senior tag
Szeretnék írni egy képletet az Excel-ben, amely a bélyegeim válogatásánál lenne hasznos.
Az elképzelésem szerint a borítékok kapnak egy-egy arab számot, ez lenne egy oszlop.
A második oszlopban írom a katalógus-számokat.
Példának:
1 2233
2234
2566
45232 3318
2212
2256A -, Nos a képlet abban segítene, hogy amikor a második oszlopban növekvő sorrendbe rendezem a számokat, akkor írja ki maga mellé a boríték számát, azaz az első oszlopban lévő számot.
B -, Egy másik képlet is jól jönne, hogy ne kelljen mindig az első oszlopba a borítékszámot beírni, hanem magától töltse ki, de ne változzon meg, ha a 2. oszlop átrendeződik. -
félisten
válasz Delila_1 #7868 üzenetére
Hali!
Oké, hasogassuk a szőrt...
1. igen, valóban a belső események gyorsabbak, mint a makró, de akkor így kellett volna fogalmazni
"Továbbra is más megoldást javaslok, nem a Fire által megadott makróst, mert gyorsabban működik."2. Megcsináltam 2003-ban, semmit nem adoptáltam, az R oszlopban vannak az adatok
nem jól működik Magyarul az R2-be írj egy nagy számot...3. Időközben megvilágosodtam...
Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Delila_1
Topikgazda
válasz Fire/SOUL/CD #7870 üzenetére
Tedd át az egészet egy másik lapra. Tudod, előfordulnak hibás lapok az Excelbe.
Az R2-be egy jóval nagyobb számot írtam, mint a többi, és hibátlanul működik.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
félisten
válasz Delila_1 #7871 üzenetére
Hali!
Áttettem/másoltam, ki tudja hány módon új füzetet nyitottam, nincs változás.
Most még annyit kipróbálok, hogy felpakolom az utolsó szervízcsomagot a 2003-nak, mert jelenleg virtuális gép (XP) alatt fut, és nincs semmi frissítés telepítve.
(Amikor vettem, akkor még SP nélküli változatban lehetett kapni)Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Delila_1
Topikgazda
válasz Fire/SOUL/CD #7872 üzenetére
Van egy sejtésem. A csatolt képről úgy látom, hogy a felt. formázásba bevetted az R1-et is, a képletek pedig R2-től szólnak. Az R1 üresnek látszik, a darab2 függvény a címsorral is számol. Ez okozhat esetleg hibát.
Még egy hibalehetőség, bár erre biztosan figyelsz: nem fordulhat elő, hogy az R oszlop lentebbi részén maradtak adatok egy előző feltöltésből?
[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
félisten
válasz Delila_1 #7873 üzenetére
Hali!
Köszönöm, de nem az volt a gond.
Felpakoltam az SP3-at neki, most kifogástalanul működik a "kódod"...
Én szoktam hangoztatni mindenhol, hogy milyen fontos, hogy a frissítések fent legyenek(ami nem csak az excel-t érinti, hanem az egész Office csomagot), erre én feledkezem el róla.Fire.
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Delila_1
Topikgazda
válasz Fire/SOUL/CD #7874 üzenetére
Ez azt jelenti, hogy semmiképp sem szabad feltenni a 2010-et, még a 2007-en is van mit javítani.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
félisten
válasz Delila_1 #7875 üzenetére
Hali!
A 2007-ben jól megy, a 2003-ban nem ment jól. Amit te készítesz kódot, azt 2003-ban (elsősorban) szoktam megnézni, mert tudom, hogy 2003-at használsz alapvetően. A korábbi 2007-es képnél meg én voltam a ludas, nem azért mert az adoptálás nem volt jó, hanem W7 alatt a startmenüből úgy nyitottam meg az excel 2007-et, hogy az egy látszólag üres füzetet egyből megnyitott(nem egy üressel indult, ahogy alapban szokása, hanem egy kinézetre üres munkafüzetet töltött egyből be). Mivel üres volt ezért beletettem a kódodat és nem működött jól, azért nem, mert abban a munkafüzetben volt makró, ami az A oszlopban színezgetett és mivel a kedvenc színem(ha úgy tetszik megszokás) az a kék, amit használni szoktam, nem tűnt fel(akkor) hogy a makró is színezget a feltételes formázás mellett...
De rájöttem, mert "Okos, ügyes a legkisebb ugrifüles"...Szóval 2007-ben jól működik a kódod, 2003-ban meg "csak" Sp3 után...
Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Delila_1
Topikgazda
válasz Fire/SOUL/CD #7876 üzenetére
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Sickboy25
addikt
-
Fecogame
veterán
válasz Fire/SOUL/CD #7865 üzenetére
Lassú a mobilinterneted? 4G/LTE antennák, közvetlenül raktárról ---> http://bit.ly/LTE_Antennak
-
félisten
válasz Fecogame #7879 üzenetére
Hali!
A példa kedvéért
A1 : A20 -> Adatok (Pénznemre formázva)
B1 : B20 -> Dátumok (Dátumra formázva)1. A1 : A20 kijelöl
2. Beszúrás fül/Diagram csoport/Pont lenyíló/Pont görbített vonalakkal
3. X tengelyen (középső, ahogy említetted) jobb egér/Adatok kijelölése
4. Sorozatok1-en katt majd Eltávolítás gomb
5. Hozzáadás gombon katt, majd beállítani, ahogy a képen: [link]
6. Ha mindent jól csináltál, akkor kész is[link]Fire.
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
félisten
válasz Sickboy25 #7878 üzenetére
Hali!
Van amikor én nézek be valamit, akkor Delila_1 kijavít, ha Ő néz el valamit, akkor Én javítom ki Őt. Ha Ő azt állítja, hogy nála megy, nálam meg nem, akkor én kutakodok a megoldás után, ha meg én állítom, hogy valami megy és nála nem, akkor meg Ő kutakodik a megoldás után...
Szóval "nálunk" ez teljesen természetes, megszokott jelenség, de semmi estre sem konfliktus.
Fire.
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Fecogame
veterán
válasz Fire/SOUL/CD #7880 üzenetére
Nem jött össze
Ha újat csinálok, és beírok adatokat véletlenszerűen, csak két pontot jelöl csíkok helyett...
Lassú a mobilinterneted? 4G/LTE antennák, közvetlenül raktárról ---> http://bit.ly/LTE_Antennak
-
félisten
válasz Fecogame #7882 üzenetére
Hali!
Pedig ennek működnie kell: [Video by FSCD]
Fire.
UI: ha esetleg nem tudnád kapásból lejátszani, akkor ezt a codec-et kell telepíteni: TSCC
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Fecogame
veterán
válasz Fire/SOUL/CD #7883 üzenetére
Kösz, így már egyértelmű
Lassú a mobilinterneted? 4G/LTE antennák, közvetlenül raktárról ---> http://bit.ly/LTE_Antennak
-
veterán
sziasztok!
most eg yegyszerűbb kérdéssel fordulok hozzátok, aminek feltevése csak szegényes excel tudásomat tükrözi.
szóval adott egy nagy adatsor, többezer adat, csak számok. van egy minimum és egy maximum érték. az ezek közé eső intervallumot pedig felosztom soksok kis rész-intervallumra. kellene nekem egy olyan függvény, amely megszámolja, hogy ezekbe az egyes rész-intervallumokba pontosan hány érték esik.
remélem sikerült világosan leírnom, és köszi előre is
"a jövötsajnos nemlehet tudni csakhamárotvagy deakormegmár azajelen"
-
félisten
-
veterán
válasz Fire/SOUL/CD #7886 üzenetére
hogy konrkét legyen, egy tartamdiagramot akarok készíteni, vízállás adatokról. pl 2000-ben a duna maximális vízállása az adott állomásnál 643 centi volt,a minimális pedig 46. a közöttük lévő intervallumot szeretném felosztani 2-3-4 centinként (majd kiderül milyen pontosságú diagram kell), és így megnézni, hogy például hány napon esett a vízszint 46 és 50 centi közé, hány napon 50 és 54 közé, stb... (minden napról csak egy adatot használok). remélem ez isérthető így
[ Szerkesztve ]
"a jövötsajnos nemlehet tudni csakhamárotvagy deakormegmár azajelen"
-
félisten
Hali!
Első "hallásra" egy "sima" Részösszeggel megoldható...Semmi makró, vagy képlet, menüszalagról elérhető funkcióról van szó, nézz utána. Ha "nem bírsz vele" és a táblázat publikus, akkor el is küldheted a mail címemre.
(Ha mást nem is, legalább a táblázatot adatok nélkül, csak a felépítése/kinézete érdekel, illetve esetleg egy adatsor legyen kitöltve, hogy lássam "mi-merre hány lépés" )Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
veterán
válasz Fire/SOUL/CD #7888 üzenetére
köszi, megpróbálom azzal, ha pedig nem megy, akkor küldenék egy mailt
"a jövötsajnos nemlehet tudni csakhamárotvagy deakormegmár azajelen"
-
foregister
tag
Sziasztok!
Hosszú leszek és lehet kicsit bonyolultan fogalmazom - készüljetek fel.
Excel 2007 -
Probléma: Index, Hol.van, nagy függvények együtt hazsnálva van ahol ismétlődik az eredmény.Részletesen:
Történt az, hogy van sok oszlopom, még több sorral. Ezen a munkalapon csak adatok és segédcellák vannak és ezeket az adatokat rendszerezi egy külön munkalap, de nem is ez a lényeg, az eddig megfelelően működik.Sikerességet szeretnék vizsgálni, pontosan a legjobb 10-et külön, különböző feltételek szerint, pl.: termék neveit rendszerezze a 10 legtöbb látogatás, 10 legtöbb kattintás és legtöbb 10 látogatás / kattintás aránya szerint. Magyarázat: Az adatokat külön-külön oszlopból nyeri ki, viszont mivel ezt a táblát frissítem az adatokkal copy-paste-tel, akkor ha megváltozna a legkérdező API mechanizmusa, még mindig egyszerűen, manuális frissíthetem az adatokat oszloponként, ezért elneveztem az első sorban ezeket az oszlopokat. Minden termék neve csak egyszer szerepel a táblázatban, illetve ha mégis feltűnne ugyanolyan nevű, úgy egy másik oszlopban található "al-név" tovább azonosítja őt + a lekérdezéskor (nevezzük eredménynek) további számadatokat kérek le, így biztos vagyok benne, hogy nem két különböző, de azonos adatú sorokat kérek le.
A probléma ott kezdődik, amikor a NAGY függvénnyel kikeresem sorrendben az x-edik kattintás / látogatás / kattintás-látogatás-arány egy idő után ismétlődik az adat, tehát pl. a 7. és a 8. helyen ugyanaz a nevű, alnevű és számú (4(!) további számadat, amik nagyon ritkán ismétlődhetnének és eléggé kicsi a valószínűsége) adat szerepel, holott a NAGY függvényen belül nem egyezik, a sorszám (tehát a 7 és 8). Próbáltam az adattáblát más adatokkal helyettesíteni, viszont akkor más helyen, de előjön szintén ugyanez az ismétlődős hiba (pl. 3. és a 4. valamint a 6. és a 7. helyezettnél). Persze az utána lévő adatok már sorrendben haladnak tovább és mindig csak két, egymás utáni helyezett szokott néha ismétlődni, nem tudom, hogy miért. Gyanakodtam először a látogatás-kattintás arány miatt (itt százalékosat az adatok az oszlopban), de olykor előjön a sima látogatás vagy a kattintás oszlopát vizsgálva is, tehát a hiba okára sem tudok rájönni.
Így néz ki a függvényem jelenleg a 7. és a 8. helyezettre (példának kedvéért):
=INDEX(H:H;HOL.VAN((NAGY(Z:Z;7));Z:Z;0))
=INDEX(H:H;HOL.VAN((NAGY(Z:Z;8));Z:Z;0))H= a termék oszlopa (illetve annak az oszlopnak a jelzése amilyen adatot kívánok h megjelenítsen az eredmény cellájában)
Z= látogatás / kattintás / látogatás-kattintás oszlopaTehát a fenti függvénnyel ismétlődnek az adatok és ahol H-t cserélem más oszlopra ott is teljesen megegyeznek az eredmény adatok - mintha az adatsor többször is szerepelne a tömbben, ahonnan ezeket kiolvassa - közben meg egyediek ezek az adatok és nem ismétlődnek - legalábbis ahogy már fentebb aláhúzva említettem, az adatsorok sehol sem egyeznek!
Remélem érhető a problémám és meg jobban remélem, hogy van rá megoldás
Köszi!-Foregi-
Az igen az nem nem
-
Delila_1
Topikgazda
válasz foregister #7890 üzenetére
Ha jól értem, az a probléma, hogy ha van 3 db 10-es eredményed, bár a NAGY függvény 3-szor találja meg, a HOL.VAN minden esetben az elsőt adja közülük.
Ezen úgy segíthetsz, hogy az eredményeket tartalmazó oszlop értékeihez egy segédoszlopban hozzáadod a SOR()-nak egy igen kis számú szorzatát (pl. =H2+SOR()*0,0001), ami nem változtatja meg a szám egész értékét. A NAGY és a HOL.VAN függvényekkel ebben az új oszlopban kerestetsz, így pontos találatot érhetsz el.
Az INDEX függvénybem az INT(HOL.VAN(...)) szerepeljen.
Erre a módszerre találsz egy példát a #7821-ben.
[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
Helyesbítek.
Az értékek a Z oszlopodban vannak, ezekhez adod hozzá a sor törtrészét. Legyen az AB oszopban a képlet.
AB2: =Z2+SOR()*0,0001
Az INDEX helyett alkalmazd az INDIREKT függvényt.
=INDIREKT("H"&HOL.VAN(NAGY(AB:AB;7);AB:AB;0))Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
Készítesz egy kimutatást, amibe egyetlen oszlopot viszel be, a vízállást. A SOR-, és az ADAT mezőbe is ezt húzod be. Az adatok darabként jelenjenek meg.
Most rákattintasz a kimutatásban a Vízállás címsorra (már ha így hívják a címsorodat). Adatok/Tagolás és részletek/Csoportba foglalás.A kép szerint kitöltöd, a 'Mi szerint' értékét a kívánalmaknak megfelelően változtatva.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
válasz foregister #7894 üzenetére
Szívesen.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Oly
senior tag
Sziasztok
Van arra lehetőség, hogy a munkalapon egy gomb megnyomása után az előre megadott cellák értéke átmásolódjon egy Outlook új levélbe?
Képekkel:
Gomb megnyomása után felugrik ez:
Egyéb lehetőségek is érdekelnek...
[ Szerkesztve ]
SonyEricsson T20 - T68 - T610 - K700 - W800 - K750 - K800 - C702 - P1 - MOTO Defy - Galaxy S Advance - Galaxy S4 - Lumia 820 - Honor 7 - iPhone 5S
-
félisten
Hali!
Akkor a példádnál maradva (2. sorban vannak az adatok)
Private Sub CommandButton1_Click()
Dim My_Outlook As Object
Dim My_Mail As Object
Set My_Outlook = CreateObject("Outlook.Application")
Set My_Mail = My_Outlook.CreateItem(olMailItem)
With My_Mail
.To = Range("A2")
.Subject = Range("B2")
.Body = Range("C2") & vbLf & vbLf & Range("D2") & vbLf & vbLf & Range("E2")
.Display
End With
Set My_Mail = Nothing
Set My_Outlook = Nothing
End SubFire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
Oly
senior tag
válasz Fire/SOUL/CD #7897 üzenetére
Thx!
Múkodik!
SonyEricsson T20 - T68 - T610 - K700 - W800 - K750 - K800 - C702 - P1 - MOTO Defy - Galaxy S Advance - Galaxy S4 - Lumia 820 - Honor 7 - iPhone 5S
-
aktív tag
hi,
van egy excel tábla, amiben van pár egyesített cella is. Kéne egyesítenem pár cellát, de ha kijelölöm a cellákat, akkor az egyesítés gomb szürke marad. Nem tudom használni. A munkatársaimnak rámlik vmi beállítás, de nekik sem ugrik be.
vki?
– Alkudozz rendesen. Ez nem ér tizenkilencet. – Az előbb azt mondtad, hogy húszat ér! – Jaj, ugyan barátom, gyerünk, alkudj!
-
félisten
válasz kenesei1982 #7899 üzenetére
Hali!
1. Ha Te hozol létre egy üres dokumentumot, abban működik a cellaegyesítés?
2. Ha a fenti kérdésre igen a válasz, akkor nem lehet, hogy a megnyitott munkafüzet írásvédett és/vagy megosztott? (Írni tudsz egy cellába például?)
3. Milyen verziójú az Excel? (Ez csak engem érdekel, a hibához nincs köze)Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
Új hozzászólás Aktív témák
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! LEGOLCSÓBB! Automatikus 0-24
- Eredeti Windows, telepítéssel! Digital Doctor Számítógép Szerviz
- PC JÁTÉKOK (OLCSÓ STEAM, EA , UPLAY KULCSOK ÉS SOKMINDEN MÁS IS 100% GARANCIA )
- Steames kulcsok jó áron eladóak!