-
PROHARDVER!
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
-
okay
aktív tag
Köszönöm mindenkinek! Tényleg csak vesszöt kell irni és minden sikerül,hihetetlen!
-
okay
aktív tag
válasz
gardener #4496 üzenetére
Mind a kettö sikeres
de több érték esetén nem tudok grafikont csinálni belöle,gondolom azért mert text(szöveg)-ként kezelem.Most visszaállitottam mindet általánosra de igy se látja.Ameki számot elfogadja azt jobbra sorolja a cellában,ameiket meg kellett változtassam azt balra és az nem jelenik meg a grafikonon.
Ez mitöl van?Remélem érthetöen irtam le. -
okay
aktív tag
De akkor nem azt a számot adja vissza amit elözöleg beirtam.
Ezt irnám be: 43.1 ,ebböl lesz jan.43 ,probálnám visszaalakitani ott ahol mondod és erre változtatja: 15707
A 43.1 az semeik menünél nem áll vissza,tehát abba a cellába sehogy nem tudom végeredményben visszairni azt a kezdeti számot. -
okay
aktív tag
Hello!
Nem igazán értek az excel-hez,az a gondom vele hogy ha egy cellába számot akarok beütni akkor "honap.év" jelenik meg,cellaformázásban meg nem találom meg hogy azt az értéket visszaállitsa amit én beirtam:milyen beállitás kell elvégeznem hogy a cellában az jelenjen meg amit odairok?Köszönöm! -
Delila_1
veterán
válasz
BenJoe80 #4490 üzenetére
A súgóban olvasd el a relatív és abszolút hivatkozásokról szóló részt, ott példákkal mutatják be a különbséget.
Érdekes, hogy nem említik a vegyes hivatkozást (legalábbis ebben a részben).
Próbáld ki, hogy egy cellában $A$1*$C1, vagy $A$1*C$1 műveletet végeztetsz, és ezeket a képleteket átmásolod más sorba, és más oszlopba.
Vegyes a hivatkozás akkor, ha vagy a sort, vagy az oszlopot rögzítjük a $ jellel. -
BenJoe80
senior tag
válasz
Delila_1 #4489 üzenetére
Delila_1 nagyon-nagyon szépen köszönöm a segítségedet. Működik minden szépen, ahogy szeretném.
Azt szeretném megkérdezni, hogy a "$" jelnek és a "DARABTELI"-nek mi a jelentése/jelentősége ill. mit is csináltunk, hogy az lett ami lett?
A táblázat működik, csak éppen lövésem nincs, hogy mit-miért csináltam. Ezt el tudnád magyarázni?Még egyszer köszönök mindent!
-
Delila_1
veterán
Ha rendezheted az adatokat, akkor a "szemét" sorok elkülönülnek a CAL-lal kezdődő soroktól, és könnyen törölhetőek.
Ha ez nem tehető meg, ez a rövid kis makró elintézi:Sub torl()
sor = 1
Do While Cells(sor, 2) <> ""
Cells(sor, 2).Select
If Left(Cells(sor, 2), 3) <> "CAL" Then
Selection.EntireRow.Delete
sor = sor - 1
End If
sor = sor + 1
Loop
End Sub -
BenJoe80
senior tag
válasz
Delila_1 #4483 üzenetére
Juhúúú!!! Működik! Gyönyörűen működik!
Ezer köszönet!
Azt hagy kérdezzem még meg, hogy az megoldható-e, hogy ezen az oszlopok (Szabásjegyzék C és E oszlopai) 20 sorára - teszem azt 5-24-ig (tehát C5-C24-ig ill. E5-E24ig) - legyen ez az állítás igaz, viszont ne érzékelje egy ismétlésnek, ha ugyanazon oszlopok, másik 4 sorában - pl. C28-C31-ig és E28-E31-ig - esetleg szerepelnek egyazon számok.
Ugyanakkor ezen négy soros oszlopokon belüli ismétlődéseket természetesen jelezze - bár ez működik. Azt hogy lehet megoldani, hogy C ill. E 5-24-ig és 28-31-ig két oszlopban lévő azonos számokat ne vegye ismétlődésnek?Tudom, kezdek szemtelenedni... szóljon nagysága, ha kezdek az idegeire menni...
-
amdk7
aktív tag
Sziasztok!
Kellene egy kis segítség.
Van egy adattáblám a "Munka1" munkafüzeten.B1-től kellene vizsgálni a cellákat, 8-10 cellaszélességben, egészen az adattábla aljáig. (ez hónapról hónapra változó hosszúságu).
Szóval egy kimutatást kell készítenem.
Sajna a program amiből az adatokat exportálom eléggé gyengén muzsikál, így csak a nyomtatási képet tudom exportálni txt-be, majd azt beolvasni excel munkafüzetbe. Ez azzal jár, hogy minden ~26. adat után van 4sor (kiegészítő adatokkal; nyomtatás dátuma stb.), ami nem kell.
Leegyszerüsítve kb. így néz ki az adathalmaz.
A lényeg, hogy a "Munka2" munkafüzeten, egy tömbben kellene látnom az értékes adatokat. Kb.: Így ahogy itt van.Hogy melyik sor értékes, segíthet eldönteni az, hogy az alap adattábla B oszlopában lévő sorok "CAL-" szövegrészlettel kezdődnek.
Remélem elég pontosan és érthetően fogalmaztam meg a kérésemet.
Jah és 2007-et használok.Köszönöm a segítséget!
Üdv: amdk7
-
Delila_1
veterán
válasz
BenJoe80 #4481 üzenetére
Mindkét lapon beviszed az összefűzős képletet, és lemásolod az adataid mellé.
A feltételes formázáshoz a Szabásjegyzék lapodon kijelölöd C: F oszlopokban lévő tartományodat.
A formázásnál az első legördülőből kiválasztod a képlet értékét. Akkor a másik két beviteli mezőből 1 lesz, oda írod, hogy =$G5>1.Eddig azt hittem, hogy a második lapra csak 1 tételsz írsz, ahhoz a $G$5>1 is jó volt.
Figyelj a $ jelekre! -
BenJoe80
senior tag
válasz
Delila_1 #4479 üzenetére
Húúú... ezt most rázzuk össze!
1. a Szabásjegyzéknél is végig be kell írni az adatok mellé mint az Alkatrészjegyzéknél?
2. az előbbi kérdés a G5 tartományra vonatkozóan...
3. C5: D5 tartomány kijelölése. Ez alatt azt érted, hogy amolyan kisiskolás módon kijelölöm a két rubrikát egérrel és utána formázok?
4. a feltételes formázásnál, hova írod be ezt a képletet? Nekem van ott három rubrikám: egyszer cella/képlet értéke, aztán nagyobb mint, kisebb mint, nagyobb vagy egyenlő... stb. (ezek variációi) és végül ahova írhatnám a $-os képletet, de be kell írnom oda, hogy >1?
-
Delila_1
veterán
válasz
BenJoe80 #4478 üzenetére
Az Alakatrészjegyzék G4 cellájába: =D4&E4&F4
Ezt lemásolod, végig az adataid mellé.A Szabásjegyzék F5-be: =C5&D5&E5
Mellé, a G5-be: =DARABTELI(Alaktrészjegyzék!G:G;F5)
Kijelölöd a C5: D5 tartományt. (szóközt csak a smilik miatt hagytam).
A feltételes formázásnál a képlet értéke: =$G$5>1
Ennek adsz tulipiros színt. -
BenJoe80
senior tag
válasz
Delila_1 #4474 üzenetére
Nem egészen... ezek szerint rosszul írtam le. Tehát:
Van egy munkafüzetem, benne két munkalap: "Alkatrészjegyzék" és "Szabásjegyzék". Az elsőben megadom az alkatrész hosszát (1500) egy rubrikában - legyen D4 ill. a szélességét (500) egy másik rubrikában - F4.
Ezt a két adatot átvitetem a "Szabásjegyzék" munkalapra - a következő képlettel =Alkatrészjegyzék!D4 ill. =Alkatrészjegyzék!F4 - két másik rubrikába. Tehát az 1500 megjelenik a C5, az 500 az E5 rubrikában a "Szabásjegyzék" munkalapon (köztük van az "x" a D5 rubrikában).Na mármost, ha én - dolgozva az "Alkatrészjegyzék" munkalapon - több olyan alkatrész méretet adok meg ami megegyezik az 1500×500-as formátummal (figyelem! fordítva már nem igaz; tehát 500×1500 nem u.a.) akkor az össze 1500×500-as méret pirossal jelenjen meg a "Szabásjegyzék" munkalapon (lehetőleg csak az 1500 és az 500).
Ezen adatok oszlopszerűen helyezkednek el egymás alatt, tehát a formázást valszeg a C és az E oszlopra kell ki írni.
Ez megoldható-e? Különben ha kell, elküldhetem privátba az egész munkafüzetet, ha akarod.
-
Gabcsika
tag
Viszont egy új problémával találkoztam. Mennyi a kapacitása az autoszűrőnek?
Mert van egy csomó adatom oszlopokban és ha bekapcsolom az autoszűrőt, a legördülő menüben nem jelenik meg mindegyik! Ezen lehet változtatni? -
Delila_1
veterán
válasz
BenJoe80 #4473 üzenetére
1. Pl. a Munka1 lap A1 celláját akarod látni a Munka2 lapon. A Munka2-nek abba a cellájába, ahol ez az érték kell: =Munka1!A1
2. Nem biztos, hogy jól értem. Vegyük, hogy az 1500 az A3-ban, az × az A4-ben, és az 500 az A5-ben van, a listád meg akárhol. Kijelölöd a listát, Formátum/Feltételes formázás.
Első feltétel: a cella értéke; egyenlő; a harmadik rubrikába beírod, hogy =$A$3. A Formátum gomnál kiválasztod a neked tetszőt. Megnyomod a Bővítés>> gombot, és második feltételnek a $A$5-öt adod, formázod. -
BenJoe80
senior tag
Hoppla.. volna még két kérdésem (ami a táblázat kezelést illeti, kezdek lustulni).
Szóval az egyik, hogy meg lehet-e oldani és ha igen, hogyan, hogy egyazon munkafüzet egyik munkalapjára beírt szöveget átvigye a másik munkalapra?
Pl.: van Munka1 és Munka2. A Munka1-ben, egy rubrikában beírom pl. "Almák száma" és a Munka2-n - egy előre kiválasztott rubrikában - megjelenik u.e.A másik pedig, hogyan lenne megoldható ha egyazon számérték, pontosabban szorzat többször jelenik meg u.a.-n a listán akkor azokat pl. pirossal jelölje meg?
Pl.: van egy szorzatom 1500×500 és ez többször előfordul akkor ezeket pirossal írja, vagy másként jelölje (mondjuk az 1500×500 nekem három egymást követő rubrikában van; tehát van egyszer "1500", aztán "×", és végül "500"; és ebből igazából az "1500" és "500"-nak kéne pirosnak lennie, ha így még egyszer, vagy többször előfordul a listában).A segítséget előre is köszi!
-
Delila_1
veterán
BenJoe80 Szívesen
Gabcsika Ne nekem köszönd! -
BenJoe80
senior tag
Hello, szia mindenkinek!
Hozzáértő emberek véleményére volna szükségem. Az Excel 2003-ban szeretném azt elérni, hogy a táblázat azon rubrikáiban - ahol nincsen számérték - nulla (0) helyett a rubrika maradjon üres.
Ez a probléma értelem szerűen csak ott lép fel, ahol a táblázat kezelő egy képlet alapján kiszámolt eredményt tüntetne fel.Esztétikai ill. tinta spórolás szempontjából is nagyon fontos volna - ha megoldható.
A segítségeket előre is köszi!
-
Delila_1
veterán
válasz
Gabcsika #4466 üzenetére
Kétféle módja van.
1. Ha van már personal.xls-ed, oda bemásolod. Ha nincs, készítesz.
Rögzíts egy akármilyen makrót: Eszközök/Makró/Új makró rögzítése. Lényeg, hogy a makró helyének a listából az Egyéni makró-munkafüzetben elnevezésűt jelöld be. Semmi mást nem kell módosítani. Ezt OKézod, indul a makró, amit rögzítesz, pl. módosítod a betű színét, majd a rögzítés vége gombbal befejezed. Létrejött a personal.xls, benne az első makróddal. Most lépj a makró szerkesztőbe:
Eszközök/Makró/Visual Basic (vagy Alt+F11). Bal oldalon a personalhoz tartozó Modules könyvtárban kattints duplán a Module1-re. Jobb oldalon megjelenik az általad rögzített makró. Ez alá másold be az újat. A rögzítettet le is törölheted.2. Másold be a makrót egy üres füzet makró szerkesztőjébe, majd mentsd el egy találó néven, xla kiterjesztéssel (Microsoft Excel bővítmény) formában. Az útvonalat nem kell megadni, az Excel automatikusan beállítja.
Jelöld be az Eszközök/Bővítmények között megjelenő, általad elnevezett bővítményt, ezután alkalmazhatod függvényként. A függvények között a Felhasználói kategóriában, és persze a Mind-ben találod meg ezután.
-
AvLav
csendes tag
válasz
Fehér Mancs #4455 üzenetére
Az a gond, hogy már én is írtam makrót, és tökéletesen működik. Azonban ha SAP-s adatokra futtatom, akkor már nem működik jól. De nem foglalkozom már vele...
(Ha ugyanazokat a számokat beírom én kézzel excel-be, mint ami az SAP-be van, akkor arra működik a makró...) -
Delila_1
veterán
válasz
Gabcsika #4463 üzenetére
Pontosan ezt a függvényt írta meg neked Fehér Mancs. Látod, nem Sub, hanem Function az eleje.
Másold át a füzetedbe a makrókhoz.
A függvények között a Felhasználói kategóriában és a Mindben ezután megtalálod a CountDistinc nevűt.
A példádnál maradva az Értékekhez az A oszlopodat, a Tartományhoz a B oszlopot, a Vizsg_értékhez pedig A1-et írj be. Húzd le a függvényt.
Ahogy módosulnak az adataid, a függvénnyel előállított értékek is változnak. -
Gabcsika
tag
válasz
Fehér Mancs #4453 üzenetére
Köszönöm meg fogom nézni!
Viszont általánosságban, ha egy értékhez több érték is tartozik, akkor azt hogyan lehet megjeleníteni? Szerintem függvényekkel nem... vagy igen?
(Pl.: A oszlopban egy adott érték szerepel, B oszlopban többféle és mondjuk egy C cellába beírva az A oszlop értékét egy D vagy E vagy akármennyi cellába hozza a B oszlop A-hoz tartozó értékeit, amennyi különböző van) Érzem én, hogy ez nem egyszerű... -
Macros
csendes tag
Még írok, hátha így könnyebben érthető!
Ha kiválasztom a b1-es mezőt akkor az előtte levő a1-es mezőt kellene hozzáadnom, és az utánna következő c2-es,d2-es,.....L2-es-ig.
Ha kiválasztom a d1-es mezőt, akkor az előtte levő a1,b1,c1-es mezőket kell hozzáadnom és az utánna következő e2-es,f2-es,....L2-ig.
Csak hogy ennek dinamikusnak kell maradnia, tehát én csak egy adatot változtatok meg a képletben az adott 1-es oszlopot (bármelyiket) majd a képlet alkalmazkodik és az előtte levő 1-es számmal ellátott cellákat adja hozzá és az utána következő 2-es cellákat.
Ennél jobban nem tudom elmagyarázni. Ezek a cellák csak számokat tartalmaznak, semmi mást. A jobb érthetőség kedvéért az 1-es számmal ellátott cellákban pl. az elköltött zsebpénzem van a 2-es számmal ellátott cellákban pedig a tervezett zsebpénzem. és én szeretném mondjok "C" évben megnézni, hogy az abban az évben megkapott zsebpénzem plusz az "A" és "B" évben megkapott zsebpénzem nomeg a "D"-től "L"-ig terjedő években tervezetten megkapott zsebpénzem együttesen mennyi pénzt fog jelenteni. De ezt bármelyik évben egyetlen adat megváltoztatásával tudjam kiíratni a rendszerrel!
Remélem így jobban érthető
-
Macros
csendes tag
válasz
Delila_1 #4459 üzenetére
http://kepfeltoltes.hu/view/090204/excel.01_www.kepfeltoltes.hu_.jpg
Itt vagy egy kép a táblázat egy módosított változatáról.
Nem tehetem be a munkámmal kapcsolatos táblázatot, ezért csináltam egy ilyet hogy érthető legyen.
Tehát a sorban levő számokat kellene összeadogatni de csak az eddig leírtak szerint.
-
Macros
csendes tag
Sziasztok!
Hatalmas szükségem lenne gyors segítségre!
Kellene egy olyan függvény/egyenlet nekem ami megoldana egy nagyon hülye "összeadást".
Adott egy táblázat melynek egy oszlopában rendszeresen ismétlődik három soronként néhány szám. Ezeket nevezzük A1,A2,A3,B1,B2,B3,C1,C2,C3,D1,D2,D3.....L1,L2,L3 - nak.
A feladat az lenne, hogy ha én kiszúrom például a B1-et, akkor a képletnek/függvénynek az előtte levő sorokból az összes 1-es számút és az őt követő 2-es számúakat kell összeadnia! De ugyanerre képesnek kell lennie akkor is ha J1-et választok, de akkor egészen A-J-ig minden 1-est kell összeadnia és az utána következő egy darab L2-est!
Lehet hogy ez egy barom egyszerű feladat, de nem tudom megcsinálni, és nagyon kellene a munkámhoz!
Kérlek segítsetek!
Előre is köszi!
-
Delila_1
veterán
válasz
Fehér Mancs #4454 üzenetére
Klassz!
-
Fehér Mancs
tag
Azt hittem, hogy ez már megoldódott... A lényeg, hogy amikor macro-val cserélsz, akkor az excel angol formátumú számokban gondolkodik, neki a pont a tizedesvessző és a vessző az ezres elválasztó, ilyen formáumra kell hozni a cserével a szöveget. Csere után, ha általános formátumú a cella, mindig megvizsgálja a progi, hogy számmá vissza lehet-e e formában írni.
Vagyis, ha a 1.800,12-ben kicseréled a pontot macroval, akkor 1800,12-t akar visszaírni, ami számára nem szám/vagy pedig, ami még rosszabb, ezres elválasztónak érzékeli a vesszőt. Ha ilyenkor a pontot pontra cseréljük (mintha nem is csinálnánk semmit), akkor az angol számformátum alapján felismeri, hogy mi a valódi ezres elválasztó és a pont, és azt írja vissza.
Amúgy adatok importjánál nem lehet ezt már lekezelni? Ha előtte beállítod az ezres elválasztót és a pont formátumot, az excel rögtön felismeri, hogy szám (options->International menűpont).
-
Fehér Mancs
tag
válasz
Gabcsika #4442 üzenetére
Még egy észrevétel, ha macroval számoltatjuk ki ezt, akkor saját függvényt érdemes használni, mivel az nem módosítja az adataidat, változásnál újra is számol, másolható, stb.
Erre egy megoldás:
Function CountDistinct(Ertekek As range, Tartomany As range, Vizsg_ertek) As Variant
Dim Taroltak()
Dim i, j, Talalat
Dim VanMar As Boolean
Talalat = 0
For i = 1 To Ertekek.Rows.Count
If Ertekek(i) = Vizsg_ertek Then
If Talalat = 0 Then
ReDim Taroltak(1)
Taroltak(1) = Tartomany(i)
Talalat = 1
Else
VanMar = False
For j = 1 To Talalat
If Taroltak(j) = Tartomany(i) Then
VanMar = True
Exit For
End If
Next j
If Not (VanMar) Then
ReDim Preserve Taroltak(Talalat + 1)
Taroltak(Talalat + 1) = Tartomany(i)
Talalat = Talalat + 1
End If
End If
End If
Next i
CountDistinct = Talalat
End Function -
Fehér Mancs
tag
válasz
Gabcsika #4442 üzenetére
Az excel 2007-es verziójában képlettel is ki lehet ezt számolni ezt:
=SZUM(HA(értékek=vizsg_érték;HA(tartomány<>"";1/DARABHATÖBB(értékek;vizsg_érték;tartomány;tartomány);0);0))
(Tömbképlet, vagyis shift+ctrl+enter-et kell használni)Az értékekben keressük meg a vizsg_értéket, és csak ezeket vesszük figyelembe a darabszámlálásnál (tartományban a különbözők kiszedése).
Ha nem lehet érteni, ne aggódj, én sem igazán értem, de működik
-
AvLav
csendes tag
Na jó, kész, nincs tovább!
Valaki elmagyarázná, hogy ez a **** excel miért kezeli másként a SAP-ból kinyert adatokat? Miért van az, hogy ha egy szám esetén (pl. 18.000,12) csinálok egy pont semmi cserét kézzel, akkor működik, ha makróval, akkor átalakítja a vesszőt is ponttá és kiveszi azt is? Már lassan másfél hónapja "szórakozok" ezzel és nem tudom megoldani. Már mindennel próbálkoztam -
Gabcsika
tag
...és őőő... legördülő menüt hogyan lehet készíteni? Ráklikk és mint amikor autoszűrő van, egy lista jön elő. Ha valamelyik elemet kiválasztom, akkor mondjuk a mellette levő cellában egy érték hozzárendelődik.
Ezt nehéz?Köszi!
-
Delila_1
veterán
válasz
Gabcsika #4445 üzenetére
Akkor két részletben add meg a színezést, az A28: P65536, és a Q1:IV65536 tartományra. 2007-es Excelnél nagyobb a tartomány.
Alapértelmezésben a cellák zárolva vannak, de ez a zárolás csak akkor lép érvénybe, mikor beállítod a lapvédelmet. A nem védendő cellák kijelölése után a cellaformázásnál a védelem fülön kiveszed a pipát a Zárolt elől. Ugyanitt a cella rejtését is beállíthatod, ha azt akarod, hogy a szerkesztőlécen ne jelenjen meg a képlet. Ez utóbbi is csak a lapvédelem beállítása után lép érvénybe.
A lapvédelmet az Eszközök/Védelem/Lapvédelemnél állíthatod be, és jelszót is adhatsz a feloldásához. -
Gabcsika
tag
válasz
Delila_1 #4444 üzenetére
Köszi szépen!
Ez jó, de abban a tartományban (A1-P27) van már egy formázás, és azt szeretném, hogy ahhoz ne nyúljon a macro, az azon kívüli területeket viszont színezze be.Másik kérdés: meglehet-e oldani, hogy olyan lapvédelmet teszek fel, amivel bizonyos cellákba lehet beírni, a többibe nem. Sehova sem, csak az eredményt lehessen látni (a többi cellából jó pár be függvényezve).
Köszi szépen!
-
Delila_1
veterán
válasz
Gabcsika #4443 üzenetére
A font.color a karakter színét adja, az interior.color a kitöltését. A kitöltés nélkülit próbáltam a vbNone kifejezéssel megadni, de az fekete lett, ezért inkább a ColorIndexet írtam be, a -4142-t.
Sub colour()
Cells.Interior.Color = vbRed
Range(Cells(1, 1), Cells(27, 16)).Select
Selection.Interior.ColorIndex = -4142
Range("A1").Select
End Sub -
Gabcsika
tag
Utánanéztem egy macronak, ami beszínezi a cellát.
Sub colour()
With Cells(1, 17).Font.Color = vbRed
End With
End SubEz a Q1 cellát pirosra színené. De nem teszi. Miért?
Illetve azt hogy kell, hogy egy tartomány kivételével az egész sheet-et színezze be?
Mondjuk a békén hagyandó tartomány az A1-P27, a többi legyen piros.Köszi szépen!
-
Delila_1
veterán
válasz
Gabcsika #4436 üzenetére
Nagy nehezen megszületett.
Sub Egyezo()
Sheets("Sheet1").Select
'******* Rendezés ***************
Range("A2").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("B1") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
'************************************
sor_1 = 1: sor_2 = 1
Sheets("Sheet2").Select
Do
első = sor_1
A = Cells(sor_2, 1)
Sheets("Sheet1").Select
Do While Cells(sor_1, 1) <> ""
If Cells(sor_1, 1) = A Then
If Cells(sor_1 + 1, 1) > A Or Cells(sor_1 + 1, 1) = "" Then
ucsó = sor_1
Range("B" & első & ":B" & ucsó).Select
ActiveWorkbook.Names.Add Name:="tartomány", RefersTo:=Selection
Sheets("Sheet2").Select
Cells(sor_2, 2).Select
Selection.FormulaR1C1 = "=SUMPRODUCT((tartomány<>"""")/COUNTIF(tartomány,tartomány))"
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Sheets("Sheet1").Select
ActiveWorkbook.Names("tartomány").Delete
sor_1 = sor_1 + 1
Exit Do
End If
End If
sor_1 = sor_1 + 1
Loop
sor_2 = sor_2 + 1
Sheets("Sheet2").Select
Loop While Cells(sor_2, 1) <> ""
Application.CutCopyMode = False
End SubA csillagokkal határolt rész a Sheet1-en való rendezés. Nálam nincs rovatfej. Ha ez nem jó, helyette rögzítsd makróban a kétkulcsos rendezést, első kulcs az A, második a B oszlop, emelkedő sorrendben.
-
Delila_1
veterán
válasz
Gabcsika #4436 üzenetére
Meg lehet számoltatni az adatok "féleségét". A B oszlop adatait elnevezed tartománynak.
=SZORZATÖSSZEG((tartomány<>"")/DARABTELI(tartomány;tartomány))
avagy
=SUMPRODUCT((tartomány<>"")/COUNTIF(tartomány;tartomány))Ezzel az a baj, hogy azt mutatja meg, hány féle érték van a B oszlopban, függetlenül az A oszlop tartalmáról.
Miért nem jó a kimutatás? Már máskor is kapálóztál ellene. -
-
Gabcsika
tag
Arra gondoltam, hogy nincs-e olyan függvény az Excelben amelyik megszámolja egy adott oszlopban, hogy hány darab különböző érték szerepel? Már az is nagy segítség lenne!
-
AvLav
csendes tag
válasz
Gabcsika #4433 üzenetére
Szia!
Én valami hasonló makróval próbálkoznék, bár amit most itt mutatok még hagy egy kis kívánnivalót maga után:
Sub szamol()
Sheets("Munka2").Select
lastRow = Range("A65535").End(xlUp).Row
Sheets("Munka1").Select
lastRow2 = Range("A65535").End(xlUp).Row
Dim szamlalo
For i = 1 To lastRow
Sheets("Munka2").Select
x = Range("A" & i).Value
szamlalo = 0
For j = 1 To lastRow2
Sheets("Munka1").Select
y = Range("A" & j).Value
If (y = x) Then
szamlalo = szamlalo + 1
End If
Next j
Sheets("Munka2").Select
Range("B" & i).Value = szamlalo
Next i
End Sub!!! Ez a makró feltételezi, hogy a Sheet1-en minden A oszlopbeli elem mellett van a B oszlopban érték
-
Gabcsika
tag
Megint én...
Azt hogyan lehet (Kimutatás opció nélkül!) megcsinálni, hogy Sheet2-n (pl. A oszlopban) van egy lista (egymás alatt számok, mind különböznek), de minden érték csak egyszer szerepel ott, viszont ezek a számok a Sheet1-en is szerepelnek az A oszlopban, de nem egyszer, ha sokszor és szintén a Sheet1-en B oszlopban mellé hozzá vannak rendelve adatok.
Azt szeretném elérni, számolja össze az Excel, hogy hányféle adat van a Sheet1 B oszlopában egy-egy A oszlopnak megfelelően, amely A oszlop a Sheet2-n van.
A bibi az, hogy adott értékhez egyszerre több érték is tartozik Sheet1-en...Pl.:
Itt a Sheet2-n a 10 jelenti azt, hogy a Sheet1-en tízféle (nem tíz darab!) szám tartozik ugyanahhoz az értékhez!
Na ezt hogy kell?Símán countif-el nem lehet célt érni.
Köszi!
-
Delila_1
veterán
válasz
mimi_bacsi #4430 üzenetére
Használd egészséggel!
-
Delila_1
veterán
válasz
mimi_bacsi #4427 üzenetére
E-mail-ben elküldöm.
-
-
Delila_1
veterán
válasz
mimi_bacsi #4425 üzenetére
Eszerint ráhibáztam.
-
Delila_1
veterán
válasz
mimi_bacsi #4423 üzenetére
Próbáld meg a ROUNDUP-ot.
-
mimi_bacsi
tag
OpenOffice számolótábla, ki tud segíteni, hogy ebben az exceles kerek.fel függvény hogy van? (és az excel többi függvénye ebben hogy van, hol lehetne ezt elolvasni?)
-
bobace
addikt
Nagyon óvodás kérdés, de nem tudom a választ...
Szóval hogyan lehet megcsinálni, hogy felül maradjon egy sor, ahol a fejlécek neve látszik, és ha görgetem a listát, az nem tűnik el, hanem mindig ott marad?
Köszi. -
jpisti
senior tag
Mi lehet a gond? Az adatokat más xls-ekből másoltam... mindkét lapon a cikkszámokat tartalmazó oszlop (az A) szöveg formátumú...
-
Delila_1
veterán
Sokszor előfordul, hogy az egyik cikkszám végén van egy szóköz, ami nem látható.
Mindegyik lapon vegyél fel egy üres oszlopban egy TRIM függvényt, ami megszabadítja az adatokat a felesleges szóközöktől.
=trim(a1)
A képleted végighúzod, másolod, és irányítottan, értékként beilleszted az eredeti A oszlopba mindegyik lapodon. -
jpisti
senior tag
válasz
Delila_1 #4412 üzenetére
Nem értesz azthiszem. ez egy file. mondjuk abc.xls és tartalmaz két munkalapot: Inventory és List
Amit én szeretnék az az, hogy az Inventory lap A1 cellájában szereplő cikkszámot keresse meg a List lap A oszlopában és a találati sor B cellájának értéke legyen az Inventory lap B1 cellaértéke. Így tovább a többi sorban is (de gondolom ha a függvény végre működne akkor ezt egyszerűen "lehúzva" a többi cellában is jó lesz.) -
jpisti
senior tag
Helló mindenkinek!
Lenne egy problémám. Egy munkafüzetben az első munkalapon (leltár) vannak cikkszámok. (csak numerikus karakterek de szövegként formázva mert elég sok 0-val kezdődik.)
Egy másik munkafüzetben (árlista) ugyanezen gyártó árlistája (természetesen több ezer tétel.)
A feladat az lenne, hogy létezik-e olyan függvény amivel a leltár lapon szereplő cikkszámokat megkereshetem az árlista lapon és a cella eredménye az árlista találati sorának egyik cella értéke?
Próbáltam az FKERES függvényt de nem akar működni. -
Delila_1
veterán
válasz
Gabcsika #4409 üzenetére
Például ilyen:
Sub szétcincál()
sor = 1
Do While Cells(sor, 1) <> ""
Cells(sor, 1) = Left(Cells(sor, 1), InStr(Cells(sor, 1), "-") - 1)
sor = sor + 1
Loop
End Subde másképp is meg lehet írni.
Másik, nem makrós megoldás, hogy kijelölöd a sorokat, Adatok/Szövegből oszlopok. A varázsló második lapján a kötőjelet adod meg határoló jelnek. -
Delila_1
veterán
válasz
cellpeti #4404 üzenetére
Kétféle módon, az egyszerűbbet írom le.
Az ikonsoron (eszköztáron) jobb klikk, ott bejelölöd a Űrlapokat.
A megjelenő eszköztárból kiválasztod a kombi panelt, megrajzolod vele a legördülődet.
A jobb klikkre előjövő menüben a vezérlő formázására kattintasz. Bemeneti tartomány az, ahol a legördülőben mutatni kívánt adatok lesznek. Cellacsatolásnak azt a cellát add meg, ahova majd a kiválasztott elem listabeli sorszámát kapod meg. Ezt érdemes a kombi panel mögé tenni, hogy ne legyen zavaró a megjelenő sorszám.
Módosíthatod még a lenyíló sorok számát az alapértékként megadott 8 helyett, és bejelölheted a térhatású árnyékot. -
cellpeti
nagyúr
Sziasztok!
Hogy tudok legördülő menüt csinálni Excelben?
-
AvLav
csendes tag
válasz
Gabcsika #4400 üzenetére
Helllo!
Az adatokat tartalmazó oszlop (legyen A) mellett lévő oszlopba (B-be), a következőt kell írni:
"=SZÖVEG.TALÁL("-";A1)" :ez megadja, hogy a kötőjel hanyadik karakter a szövegbenEzután a következő oszlopba (C-be), a következőt kell írni:
"=BAL(A1;B1-1)" :ez veszi az A oszlopban lévő szövegből balról kezdve a karaktereket a kötőjeligMindez persze megoldható makróval is, de sajnos nem fogalmaztad meg pontosan, hogy szükséged van-e az eredeti oszlopra vagy hogy hogyan nézzen ki a végén a tábla.
Új hozzászólás Aktív témák
Hirdetés
- Eladó steam/ubisoft/EA/stb. kulcsok Bank/Revolut/Wise (EUR, USD, crypto OK)
- Vírusirtó, Antivirus, VPN kulcsok
- Bontatlan - BATTLEFIELD 1 Collectors Edition - Játékszoftver nélkül
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Kaspersky, McAfee, Norton, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Telefon felvásárlás!! Samsung Galaxy A50/Samsung Galaxy A51/Samsung Galaxy A52/Samsung Galaxy A53
- Lejárt a gyártói garancia? Mi tovább támogatjuk az IT infrádat!
- ÁRGARANCIA!Épített KomPhone Ryzen 7 7700X 32/64GB RAM RX 7800 XT 16GB GAMER PC termékbeszámítással
- Telenor 5G Indoor WiFi Router (FA7550) + töltő (bolti áruk 100.000Ft)
- Apple iPhone 11 64GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: PC Trade Systems Kft.
Város: Szeged