-
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 [HUN]Tyson #5053 üzenetére
Most az adataid az A1-ben kezdődnek. Szúrj be elé egy sort, és az új A1-be adj valami címet (pl. e-mail), mert az irányított szűréshez ez szükséges.Állj az A1-en.
Adatok/Szűrő/Irányított szűrő, OK.
Más helyre másolja.
A listát automatikusan kijelöli.
A "Hova másolja" rovatba írj E1-et.
Jelöld be a "Csak az egyedi rekordok megjelenítése" négyzetet.
OK
E2-től lefelé minden cím csak egyszer szerepel.
Most töröld ki az első sort, hogy cím nélkül szerepeljenek az oszlopok.
Vidd be az új makrót, és indíthatod.Sub email()
Dim a, b, c, d As Long
c = 1: d = 100
For a = 1 To 28
For b = c To d
Cells(a, 2) = Cells(a, 2) & Cells(b, 5) & "; "
Next
Cells(a, 2) = Right(Cells(a, 2), Len(Cells(a, 2)) - 2)
c = a * 100 + 1: d = d + 100
Next
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
felora:)
tag
sziasztok! a táblázatkezelőben szeretnék segítséget kérni. hogyan tudnám megcsinálni a következőt: minden egyes cellában 8 szám van, 1 és 20 között. ebből van kb 100db. azt szeretném, ha kiírná nekem a 8 leggyakoribb számot. milyen képlet alapján lehetne ezt megcsinálni? köszönöm a választ előre is.
-
Cuci3
tag
válasz felora:) #5056 üzenetére
Azt nem tudom, hogy mit tud az OpenOffice. Én makrók nélkül kezdtem el gondolkodni.
De úgy gondolkodtam, hogy alap függvényekkel csak boldogul. Én Excel 2003-at használtam, és egy példát felraktam [ide].
A Munka1-en először szétszedem a nyolc számot. Innentől azonban már sok megoldás van:
1. Munka2-re A2-től kezdve egymás alá másolom a számokat, mellé rakok egy darabteli függvényt, majd a B oszlop szerint rendezem csökkenőbe az egészet. (800 számnál kicsit macerás a 8 legnagyobbat megadni)
2. az egymáés alá másolt számokat bedobom egy kimutatásba, teszek mellé darabszámot, aztán berendezem a darabszám szerint csökkenőbe. (mivel 1-től 20-ig mennek a számok, ezért ez egész átkátható)Tehát az a kérdés, hogy mennyire gyakran kell ezt megcsinálnod? Ha sűrűn, akkor tényleg kényelmesebb egy makró.
-
Delila_1
Topikgazda
A számok szétszedése külön cellákba egyszerűbb az Adatok/Szövegből oszlopok (tagolt, szóköz elválasztó) menüvel. Ez az A: G tartományba dobálja szét a számokat.
A kimutatásban a példád szerint az F oszlopba állva a rendező ikon segítségével emelkedő-, vagy csökkenő sorrendbe lehet tenni az adatokat.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Cuci3
tag
válasz felora:) #5059 üzenetére
Pár kérdés, mivel csak utólag vettem észre, hogy ez a számsor az aláírásod:
1. Mivel vannak elválasztva a számok a cellán belül? Gondolok itt space-re, vesszőre, tabra, ilyesmire.
2. Tényleg nyolc szám van? (Aláírásodban csak 7 - bár már magam sem tudom, hogy mit higgyek)Kezdésnek itt egy makró, mely a space-sel elválasztott adatokat szedi szét. Az adatoknak a Munka1 A1-es cellájában kell kezdődnie. A 'szövegből oszlopok' módszerrel szétszedett adatokat a Munka2 A2-es cellájától folyamatosan kezdi el felhozni, majd a Munka2 C3-as cellájától kezdve bedob egy kimutatást, amit a számok darabszáma alapján rendez csökkenő sorrendbe.
Kikommentelni nem volt kedvem, de ha kell egyszer megteszem. Rem OpenOffice alatt is frankón működik, dehát ki tudja. Próbáld ki, aztán majd lesz valahogy!
Most látom csak, hogy a szöveg szétszedésénél 7 érték van, amit majd módosítani kell, ha tényleg 8 szám van. Próba után okosabbak leszünk.
Sub nyolcmaximum()
Dim i, sor, sor2 As Integer
Dim hely, hely2 As String
Munka1.Activate
Munka1.Cells(1, 1).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, _
Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _
:=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), _
Array(7, 1)), TrailingMinusNumbers:=True
Munka1.Cells(1, 1).Select
sor = Selection.End(xlDown).Row
For i = 1 To Selection.End(xlToRight).Column
Munka1.Activate
Munka1.Range(Cells(1, i), Cells(sor, i)).Select
Selection.Copy
Munka2.Activate
Munka2.Cells((i - 1) * sor + 2, 1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Next
Application.CutCopyMode = False
Munka2.Cells(1, 1).Select
Selection = "szam"
sor2 = Selection.End(xlDown).Row
hely = "Munka2!R1C1:R" & sor2 & "C1"
hely2 = "[" & ActiveWorkbook.Name & "]Munka2!R3C3"
Range(Selection, Selection.End(xlDown)).Select
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
hely).CreatePivotTable TableDestination:= _
hely2, TableName:="nyolcszam", DefaultVersion:= _
xlPivotTableVersion10
ActiveSheet.PivotTables("nyolcszam").AddDataField ActiveSheet.PivotTables( _
"nyolcszam").PivotFields("szam"), "Darab / szam", xlCount
ActiveSheet.PivotTables("nyolcszam").AddFields RowFields:="szam"
ActiveSheet.PivotTables("nyolcszam").PivotFields("szam").AutoSort xlDescending _
, "Darab / szam"
End Sub[ Szerkesztve ]
-
Cuci3
tag
válasz Delila_1 #5058 üzenetére
Az ötletet köszönöm, az tényleg sokkal egyszerűbb.
A sorrend azonban azért nem jó sima sorba rendezéssel, mivel az a számokat rendezné sorba, és nem a számokat előfordulásuk szerinti sorrendbe.
Ezt Kimutatás eszköztár/Kimutatás/Rendezés és toplista menüponton belül lehet elérni. -
Delila_1
Topikgazda
válasz [HUN]Tyson #5064 üzenetére
A Right szót írd át Left-re, az majd a végéről csípi le az utolsó pontosvesszőt és felesleges szóközt.
Bocsi, elírtam, és nem figyeltem fel a hibára.
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 [HUN]Tyson #5066 üzenetére
Pont egy hiba után teszed fel ezt a költői kérdést?!
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
marcias
őstag
Sziasztok!
Nem tudom megoldani az excel táblázatomban, hogy hogyan lehet kiszámoltatni a következőt. A lényeg, hogy eladásokat tettem a rekordokba, megjelölve hogy melyik napon történt az eladás, egy napra több eladás is eshet, és van olyan nap, amikor egy sincsen. Tehát, a H oszlopban látszik az adott eladás, és a J oszlopban szeretném látni, hogy adott napon milyen eladás lesz. Ehhez egy adatbázis függvényt hívtam, ami faszán ki is számolja hogy mondjuk 572-edik napon mekkora az eladás, viszont nem többszörözhető, tehát mindig csak azt az egy napot hajlandó kiszámolni, amit az I2 cellába beírok.
Hogyan tudom azt megcsinálni, hogy ugyanezzel a szisztémával több napra is eredményt kapjak? KösziSteam: marcias88
-
sduiz
csendes tag
Sziasztok!
Létrehoztam egy Excel táblázatot, amiben az egyik oszlop minden cellájához tartozik legördülő menü lista.(Adatok-Érvényesítés menüvel készült)
Tudna segíteni valaki abban, hogyan lehet beállítani a legürdülő listába írt szöveg kiválasztásánál, hogy a cella színe is változzon.
Pl.: a legördülő listában ha az "IGEN"-re kattintok a cella színe zöld legyen, ha a"NEM"-re piros legyen a cella.Előre is köszönöm!
-
félisten
válasz Delila_1 #5072 üzenetére
Hali!
Ez jó HSZ volt...
"=szumah"
"csak a smile-k írtam"Csak nem valami buliban voltál? Akkor meg nem kellene ilyen korán felkelni....
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 #5073 üzenetére
Ez tényleg nem valami fényesen sikerült.
A "csak a smile-k írtam" szöveg hiányos, szándékom szerint "csak a smile-k miatt írtam" lett volna, és természetesen szumha.
Talán túl korai volt az ébredésem.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
sduiz
csendes tag
Sziasztok!
rtom: a segítséged alapján sikerült amit szerettem volna, köszi!
-
csudri
őstag
Sziasztok, próbáltam több módon is keresni a topikban, de nem találtam hasonló kérdést, mint amilyen az enyém.
Szóval, van egy Office 2003-ban létrehozott Excel táblás kérdőívem, amiben a válaszok legördülő menüvel vannak megoldva. Az lenne a kérdésem, hogy megoldható-e, hogy a válaszoknál ugyan úgy látszódjon a kis szürke izé, mint mondjuk az autószűrőnél? Mert ha nem klikkel valaki rá a cellára, akkor nem látszik, hogy mit kell vele csinálni. Tehát pofásabb lenne, ha alapból megjelenne a kis szürke négyzet a lefelé mutató háromszöggel.
Megoldható?
Előre is köszi!
-
Delila_1
Topikgazda
Megoldható, de sok ilyen cellánál visszafogja az Excelt.
Az Űrlapok eszköztárról a Kombi panelt kijelölöd, és a kapott szálkereszttel kijelölöd a beviteli cellát. Jobb klikk, Vezérlő formázása. Bemeneti tartomány az, ahol a felsorolásod van a választható adatokról. Cellacsatolásnak célszerű az alatta lévő cellát beírni, hogy a legördülő eltakarja a számot. Mert ennél a formánál az eredmény egy sorszám, mégpedig az, hogy a bemeneti tartomány hanyadik tagját választottad, tehát nem maga az érték, mint az érvényesítésnél.
Ha az értéket akarod valahol felhasználni, akkor a függőlegesen elhelyezett lista előtti oszlopba kell tenned egy 1-től növekvő sorszámot, és az FKERES (VLOOKUP) függvénnyel kell kikerestetned.[ 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.
-
csudri
őstag
válasz Delila_1 #5078 üzenetére
Odáig értettem, hogy vezérlő formázása, utána elakadtam.
Melyikhez kell írnom a másik munkalapon elhelyezett kis oszlopaim nevét? (az egyik neve millió, a másik pedig százalék, mindkettőben 10 elem van)
Az FKERES-t, meg nem használtam 10 éve, az már olyan kínai, hogy nem akarod tudni.
Ja és persze köszi a segítséget és a rám fordított energiát!
[ Szerkesztve ]
-
FireShadow
senior tag
hasonló problémám lenne. adott egy telefonszámla digitális formában
szám | idötartam
5551616 52
5552626 14
5553636 23
5551616 42
5550606 34
5552626 11
és azt szeretném ha erröl dobna nekem egy kördiagramot, hogy kivel mennyit beszéltemehhez össze kell adnia nevenként(számonként) az idötartamokat és ezt ábrázolnia a diagramon
ezt lehet valahogy egy lépésben vagy kell egy segéd táblázat ahova berakom a számokat és mellé az összeget (mert abból már csakcsak összehozom a diagramot)
a bibi az hogy nem 3-4féle szám van, szóval valami automatizált megoldás kellene.. de én még egy SZUMHA-t se tudok müködésre birni
[ Szerkesztve ]
Keeping secrets away from everyone Staring out into another world .. Ocean city girl
-
Delila_1
Topikgazda
Amikor eljutottál a vezérlő formázásáig, megjelenik egy párbeszéd panel, azon vannak a kitöltendő rovatok.
Írd egymás alá valahova az egyik tízet, az előtte lévő oszlopba pedig mindegyik értéked elé a sorszámát. Mondjuk, ez az egyik tarományod a J1: J10 tartomány, akkor előtte a I1: I10 az 1...10 értéket tartalmazza. A bemeneti tartomány a J1: 10 lesz.
A legördülőt pl. A2-be rajzoltad, a cellacsatolás A2 legyen. Mikor a legördülő segítségével kiválasztod a lista egyik elemét, az A2-be beíródik az a sorszám, ahányadik a 10 közül a kiválasztott. Ha csak azt akarod, hogy látsszon ez a kiválasztott elem, semmit sem kell tenned, akkor a sorszámos oszlop sem kell. Ha azonban valahol a füzetedben máshol is akarod látni, akkor a "máshol" cellába beírod: =fkeres(A2;I1: J10;2;hamis).
Tudod, szóközöket nem kell hagynod a kettőspontok után, de itt a fórumon egy vigyori fej jelenne meg helyette, ha nem lenne szóköz.
Ugyanígy járj el a másik tíz adatoddal is.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 FireShadow #5080 üzenetére
Próbáld meg az Adatok/Kimutatás vagy kimutatásdiagram menüben a varázslóval. A varázsló végigvezet az ekészítésén, néhány kattintás az egész.
Az elrendezésnél a sorhoz a számot tartalmazó oszlop címkéjét húzd, az adathoz pedig az időtartamot. Ha véletlenül azt írná: Darab:időtartam, akkor (dupla?)klikk rá, a feljövő ablakból jelöld meg az összeget. Ez pontosan azt csinálja, amit szeretnél, számonként összegzi az időtartamokat.
Innen már gyerekjáték a kördiagram elkészítése.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Cuci3
tag
válasz Delila_1 #5082 üzenetére
Vagy akár készíthet egyből kimutatásdiagramot. Kimutatás varázsló 1. lépésénél az alsó választékból lehetőségből kell kiválasztani.
Középre kell behúzni az időt, alulra meg a teloszámokat. És persze jobb klikk, minták => kördiagram.Nem mondom, hogy túl szép a kinézete, de célnak megfelel. Meg a kimutatás automatikus frissítésénél ez is módosul.
-
lúzer
veterán
válasz FireShadow #5080 üzenetére
MO. RIP. - az utolsó kapcsolja le a villanyt.
-
FireShadow
senior tag
-
Delila_1
Topikgazda
válasz FireShadow #5086 üzenetére
A diagram készítésekor kaptál egy lapot, amin a diagram alapját képező kimutatás van.
Állj az Összesen oszlop valamelyik cellájára, nyomd meg a rendezés A->Z ikonját.
Az emelkedő sorrendbe állított adatokból kiválasztod a sorokat, amiket ábrázolni akarsz, és átmásolod egy másik helyre. Címet adsz az oszlopoknak, és már neki is ugorhatsz a diagram készítésének.Másik módszer: a kimutatásból irányított szűrővel kiválogatod a szükséges tételeket.
A diagram minták között a kör kategóriában találsz egy Kör-kör, és egy Kör-sáv nevezetűt, nézd meg ezeket, látványosan lehet megmutatni velük a nagyságrendileg eltérő adatokat. Ha ezek valamelyikét választod, meghatározhatod, melyik adatok kerüljenek a nagy körbe, és melyikek a kisebb körbe, vagy sávba. Ki kell jelölnöd a diagramon az adatokat, jobb klikk, Adatsorok formázása, Beállítások fü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.
-
Psytróger
tag
Sziasztok!
Azt hogy tudom megcsinálni, hogy ha egy soron belül van több cellányi "szám", akkor abból kiválassza a 9 legnagyobbat, és azokat átlagolja?
Valami hasonlót szeretnék ehhez.
Az se lenne rossz, hogy ha az egyik sorban csak teszem azt 5 szám van, akkor a maradék 4 helyre automatikusan 0-át venne, és így osztaná 9-el (mint a linkelt táblázat 2. sorában).>> www.FlyEagles.hu << >> http://www.photobucket.com/rataccess <<
-
Delila_1
Topikgazda
válasz Psytróger #5090 üzenetére
S1-től írj növekvő sorszámot 1-től 9-ig, ez az AA1-ig fog tartani.
S2 képlete: =NAGY($B2:$R2;S$1)
Ezt jobbra húzod az AA2 celláig.
AB2 képlete: =ÁTLAG(S2:AA2)
Az S2-től AB2 -ig tartományt lemásolod a többi sorba.
Nézd meg a NAGY függvény leírását a súgóban.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Psytróger
tag
Köszi, tökéletes!
>> www.FlyEagles.hu << >> http://www.photobucket.com/rataccess <<
-
Fehér Mancs
tag
válasz Psytróger #5090 üzenetére
Egy alernatív megoldás, egy képlettel (B1-P1-ig vannak az adatok):
=SZORZATÖSSZEG(NAGY(B2:P2;{1;2;3;4;5;6;7;8;9}))/9
vagy ugyanez, csak a sorszámokat paraméterezve:
=SZORZATÖSSZEG(NAGY(B1:P1;SOR($A$1:$A$9)))/9Ha nincs 9 szám, akkor Delila megoldásához hasonlóan hibaüzenetet ad vissza, de ezt is le lehet kezelni, bár ez már a tömbképlet tömbképlete (az üresek helyére 0-t tesz - Negatív számoknál problémát okozhat!!!)
=SZORZATÖSSZEG(NAGY(HA(SZÁM(B2:P2);B2:P2;0);SOR($A$1:$A$9)))/9
a végén pedig ctrl+shift+enter
[ Szerkesztve ]
-
Psytróger
tag
válasz Fehér Mancs #5094 üzenetére
A nincs szám problémát sikerült megoldani úgy, hogy ahova nem kerül szám, oda is beírtam a 0-át, csak átszíneztem fehérre a betűszínt
Egyébként ez egyfajta verseny táblázata, ahol 17 körből mindenkinek a 9 legjobb eredménye számít (azóta sikerült rájönnöm, hogy épp ezért átlag nem is kell, elég az összegüket venni, hiszen mindenkinél ugyanúgy 9-el osztunk vissza úgy is) - aki csak 7 körben szerepel, annak a maradék 2 kör nullásként számít. Erre pedig tökéletes volt Delila verziója is!
De azért köszönöm Neked is>> www.FlyEagles.hu << >> http://www.photobucket.com/rataccess <<
-
boecce
tag
Tisztelt Excel-guruk!!
AZt szeretném megtudni, hogy mi a "rák " lehet azzal az exceltáblával, amit már sokan, több éve szerkesztettek, egymás melletti oszlopokban vegyes, (szöveg és szám) tartalommal, és ami számnak látszik, az is mintha szövegként viselkedne.. Nem segít a Ctrl+1 (cellaformázás) számformátum parancs sem egyetlen "güzü" módszer müködik csak, az, hogy a számokat ujra, egyenként beírom.. de ez a hatalmas adatmennyiség miatt hosszadalmas. Viszont enélkül nem tudok autoszürőnek relációkat megadni.
Tud valaki segíteni?Reggel addig röhögtünk a főnök ''viccén'' amig rá nem jöttünk, hogy amit mondott, az a napi feladat!!
-
Delila_1
Topikgazda
Egy képlettel hivatkozz az oszlop celláira, és szorozd be 1-gyel.
Pl. ha az M oszlop ez a "rákos", akkor egy új oszlopba ezt írd: =M1*1
A cellát lemásolod, ameddig kell, utána a teljes új oszlopot irányítottan, értékként beilleszted az M oszlop helyére.
Az is előfordulhat, hogy a beteg oszlopodban valamilyen ezres elválasztó karakter van.
Azt a csere funkcióval tüntetheted el.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Fehér Mancs
tag
A Ctrl-1 csak a formátumot változtatja meg (szövegről pl. számra), de a tárolt értéket nem konvertálja automatikusan számmá, ugyanúgy "123" marad benne. Persze, ha beleállunk és enter-t nyomunk, akkor már felismeri az excel. Persze Delila már lelőtte az egyik megoldást
Viszont alternatív megoldás mindig van, ezzel a képlettel egy másik oszlopban lehet számosítani az arra érdemes értékeket:
=HA(HIBA(B1*1);B1;B1*1)[ Szerkesztve ]
-
Delila_1
Topikgazda
válasz Fehér Mancs #5098 üzenetére
Még egy alternatíva:
=érték(B1)
akár HA függvénnyel kombinálva.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
őstag
Sziasztok!
Egy kis segítséget szeretnék kérni. Arra lennék kíváncsi a "hol.van"-os rész mit csinál? - táblázatok elnevezésű dolgot nem találok a dokumentumban.
=HA(ÉS(I184<>"";I185<>"";I186<>"");FKERES(I185;q_;HOL.VAN(I184;Táblázatok!$B$325:$F$325;0);0);"")
Előre is köszönöm!
“Mankind invented the atomic bomb, but no mouse would ever construct a mousetrap.” Albert Einstein
Új hozzászólás Aktív témák
- Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Windows 10/11 Home/Pro , Office OEM/Retail kulcsok
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!
- PC JÁTÉKOK (OLCSÓ STEAM, EA , UPLAY KULCSOK ÉS SOKMINDEN MÁS IS 100% GARANCIA )