-
GAMEPOD.hu
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
-
Tok_Kezdo
csendes tag
Köszönöm ez is több mint a semmi.
-
bozsozso
őstag
Sziasztok,
Olyan segítséget szeretnék, hogy van egy cellában pl.: ABC/ DCB/ EEE/ CCC/ FFF
Szeretném a szöveget a harmadik / jelig elvágni és csak azt megjeleníteni. Milyen függvénnyel tudnám ezt megoldani?
Végcél: ABC/ DCB/ EEE
Előre is köszönöm a segítséget..
-
bozsozso
őstag
-
Delila_1
Topikgazda
Úgy tűnik, az ÖSSZ.MUNKANAP függvény nem minden esetben felel meg. Régebbi függvényekkel megoldható a feladat.
H3:
=DARABTELI(INDIREKT("B" & HOL.VAN($F$3;$A:$A;0) &":B"&HOL.VAN($G$3;$A:$A;0));H$2)
I3:=DARABTELI(INDIREKT("B" & HOL.VAN($F$3;$A:$A;0) &":B"&HOL.VAN($G$3;$A:$A;0));I$2)
J3:=H3+I3
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
mouzrr
őstag
Sziasztok!
Egy kis segítséget kérnék:
adott egy több ezer soros táblázat, melyben számok találhatóak.
Hogyan lehetne legegyszerűbben megoldani ezt a feladatot:A oszlopban random távolságra vannak egymástól a számok, míg B oszlopban ugyan ez.
Pl:
A--- B
------1
23
------4
5
-------6
7
8
9
Azt szeretném, ha a B oszlopban a számok mellett ki lenne írva, hogy alatta hány ilyen szám található. 1 alatt 2db, 4 alatt 1db, 6 alatt 3 db stb.
Az oszlopokat meg tudom cserélni ha az megkönnyíti a képletezést, a lényeg tényleg annyi lenne hogy a B oszlopban 2 szám között hány egység fordul elő, és ez a mennyiség mindig az előző számhoz kerüljön.Remélem érthetően fogalmaztam, ha kicsit túlbonyolítottam nekiugrok még1x. Előre is köszönöm a tanácsokat/Segítséget!
Angol/2016Excel[ Szerkesztve ]
-
Fferi50
őstag
válasz mouzrr #43619 üzenetére
Szia!
Egy javaslat:
Tegyél az A oszlop minden olyan cellájába egy jelet (pl. x), amely mellett a B oszlopban szám van.
Ezután a képlet a C1 cellába:=HA(A1="x";DARAB(INDIREKT("A"&SOR()+1&":A"&HOL.VAN("x";INDIREKT("A"&SOR()+1&":A10000");0)));"")
Ez lehúzható végig az oszlopon.
Ha nem szeretnéd az A oszlopot "elcsúfítani", akkor segédoszlopba tedd be az x-eket azon cellák mellé, amelyekben van a B oszlopban érték. Akkor a HOL.VAN függvényben erre az oszlopra kell hivatkoznod.Ha esetleg megfelel az a megoldás, hogy a számok mellett nem az alattuk, hanem a felettük levő darabszámok szerepelnek, akkor a C2 cella képlete:
=HA(ÜRES(A2);DARAB(A$1:A1)-SZUM(D$1:D1);"")
Ez húzható le az oszlopon. Nem kell hozzá segédoszlop/vagy jelek elhelyezése sem.
Üdv.[ Szerkesztve ]
-
Mutt
aktív tag
válasz mouzrr #43619 üzenetére
Szia,
C2-ben próbáld ki vmelyik képletet a kettő közül:
=IF(B2<>"";AGGREGATE(15;6;ROW(A3:A10000)/NOT(ISNUMBER(A3:A10000));1)-ROW()-1;"")
=IF(B2<>"";SUMPRODUCT(MIN(ROW(A3:A10000)*IF(ISNUMBER(A3:A10000);2^99;1)))-ROW()-1;"")
üdv
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
-
dave0825
őstag
Üdv. Van egy kis problémám. Csináltam egy táblázatot, ami számolja a beírt felhasználónevek darabszámát. Egyszerűbben nem tudtam, és már nem mostani, nem is látom át, hogy miért így lett csinálva. Esetleg valaki meg tudná nézni, hogy mi a baj vele, amiért egy adott sortól lefelé nem számolja tovább, nem adja hozzá az újakat, és ami hozzá van adva, nem ír mellé semmit? Ti azért jobban képben vagytok, hátha előbb rájöttök. Esetleg ha valami egyszerűbb módja is van, példát tudnátok írni? Nem vagyok nagy Excel-es.
Erről lenne szó.
Köszi.Huawei P30 // Suzuki DL650XT '15 <-- Kawasaki Z750 '07 <-- Aprilia RS 125 '99
-
Mutt
aktív tag
válasz dave0825 #43624 üzenetére
Szia,
A B:C segédoszlopokból hiányoznak a képletek a 101-es sortól.
Ha nem akarsz segédoszlopokkal jatszánai, akkor ezek a lehetőségek vannak:
1. Office365-ben van UNIQUE(EGYEDI) függvény az egyedi nevek előállításához.
2. Pivot (Kimutatás) is tud segíteni. Ez nem frissül automatikusan, de be lehet állítani, hogy a fájl megnyitásakor frissüljön.
3. Tömbfüggvénnyt is lehet használni.
üdv
[ Szerkesztve ]
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
-
dave0825
őstag
Köszi mindkettőtöknek. Valahogy elkerülte a figyelmem az elrejtett oszlop, pedig a többit már lehúztam 100-ról 1000-re.
Egyébként lehúztam ezt a 2-t is, megjöttek az új nevek, viszont "Arvisura" neve mellett üres maradt a cella. Ez mitől lehet?Végülis nem fontos, Delila_1 ajánlása szerint lehúztam végig a cellák képletét, így jó, megjött a hiányos is.[ Szerkesztve ]
Huawei P30 // Suzuki DL650XT '15 <-- Kawasaki Z750 '07 <-- Aprilia RS 125 '99
-
botond187
csendes tag
Sziasztok,
Segítséget szeretnék kérni, 2013-as angol excelben.
A feladat az lenne, hogy nevek szerepelnek 2 oszlopban, van hogy ugyanaz, van, hogy fel van cserélve a vezetéknév a keresztnévvel, van, hogy egyik oszlopban ekezettel szerepel, másikban nem, és van, hogy 2 eltérő név van.
Azt kellene ha eltérő név szerepel, azt jelölje meg (mondjuk beszinezi), ahol még fel van cserélve a vezetek-keresztnev vagy ékezet eltérés van, azt vegye úgy, hogy ugyanaz, így azt ne szinezze.Biztos van rá valami képlet, vagy feltételes formázás, de nem találtam..
Köszi a segítséget előre is.
-
glocker
tag
sziasztok!
ki lehet kapcsolani / át lehet állítani azt a működését az EXCELnek, hogy CSV-megnyitásakor a számnak kinéző szövegeket számként kezelje?! (azt akarom, hogy ne vágja le a vezető nullákat)
"00123";"01256"
nem egy két esetről van szó, sokat dolgozom CSV-vel, és sok oszlop van... a szövegből importálás varázsló (ahol megadható, hogy mely oszlopot hogyan kezelje) nem megoldás... azt akarom, hogy az ECXEL egyszerűen hagyja / kezelje szövegként ami az...
előre is kösz
bocs a béna kérdéseket :-(
-
Fferi50
őstag
válasz botond187 #43628 üzenetére
Szia!
Nem olyan egyszerű ez a dolog, hiszen több körülményt is figyelembe kell venni. Csak egyéni függvényekkel lehet megoldani. Ezeket másold be egy modulba. (Alt + F11, Insert - Module)Function nemegyezo(mit As Range, mivel As Range) As Boolean
Dim erteke1 As Long, erteke2
erteke1 = osszeado(LCase(mit.Value))
erteke2 = osszeado(LCase(mivel.Value))
nemegyezo = erteke1 <> erteke2
End Function
Function osszeado(mit As String) As Long
Dim ckar As String * 1, x As Integer, erteke As Long
For x = 1 To Len(mit)
ckar = Mid(mit, x, 1)
Select Case ckar
Case "á"
erteke = erteke + Asc("a")
Case "é"
erteke = erteke + Asc("e")
Case "í"
erteke = erteke + Asc("i")
Case "ó", "ö", "ő"
erteke = erteke + Asc("o")
Case "ú", "ü", "ű"
erteke = erteke + Asc("u")
Case " "
Case Else
erteke = erteke + Asc(ckar)
End Select
Next
osszeado = erteke
End Function
A következőket a magyar Excel szerint írom, gondolom nem okoz problémát:
Kijelölöd a formázni kívánt cellákat.
Ezután a feltételes formázás - a formázandó cellák kijelölése képlettel a képlet pedig:=nemegyezo($A1;$B1)
Ha nem ebben a két oszlopban vannak a nevek, akkor annak a két oszlopnak a címét írd ide. Az elválasztójelet is az Excelednek megfelelően írd be.
Ezután kiválasztod a formátumot, majd ok.
A szabályok kezelése menüben módosíthatod az érvényességi területet.
Figyelem: Ha nagyszámú neved van, akkor lassan fog érvényesülni a feltételes formázás, mert betűről-betűre hasonlít össze két oszlopot a függvény. Tehát légy türelmes.
Remélem sikerül.
A munkafüzetet makróbarátként vagy binárisként kell elmentened!!!
Üdv.[ Szerkesztve ]
-
Fferi50
őstag
válasz glocker #43629 üzenetére
Szia!
Ha megváltoztatod a kiterjesztést txt-re, akkor megnyitáskor felajánlja a szövegből importálást (lsz. olvass tovább).
Megadod, hogy tagolt, bejelölöd a határoló jelet, majd utána kijelölöd az összes oszlopot és bejelölöd szövegnek.
Ezután Befejezés.
Ha mégis lenne olyan oszlop, ahol számokra van szükséged, akkor azokat megszorzod 1-el a következők szerint: 1 cellába beírod 1. Ezután Ctr+c (másolás). Kijelölöd az oszlopot - irányított beillesztés - művelet - szorzás.
Ennél egyszerűbb makró nélkül szerintem nincs.
Makróból megoldható, hogy a beolvasáskor az eredeti formátum megmaradjon.Üdv.
-
glocker
tag
válasz Fferi50 #43632 üzenetére
Kösz a választ!
A beolvasáskori vagy előformázó (pl "=""00123";"=""0123456") megoldások nem életszerűek nálam...
Egyrészt, pl powershell-el objektumokból generálom a csv-t... itt nem lehet megadni, hogy egy objektum adott tulajdonságát miként exportálja... alapértelmezett, hogy "00123" formátumba kerül kiírásra... (ami szerintem rendben is van... csupán annyi kellene, hogy az excel beolvasáskor ne erőltesse és kellő infó hiányában... ne hibázza el a konverziót...)
Másrészt nincs idő / energia... beolvasáskor a (irányított, akár varázslós)konvertálással foglalkozni...sajnálom, hogy az alakotók megváltozhatatlan alapértelmezetté tették és erőltetik ezt a jelen konverziós működést... sokkal barátságosabb lenne, ha választható lenne, pl...
- csv beolvasáskor az excel automatikusan detektálja és konvertjálja az adatokat (jelen működés)
- csv beolvasáskor az excel kezelje az adatokat szövegként
- csv beolvasáskor az excel kezelje az adatokat számként
- stb...a makrós megoldás jól hangzik... az, hogy működne?!
bocs a béna kérdéseket :-(
-
Fferi50
őstag
válasz glocker #43633 üzenetére
Szia!
Nézd meg a következő makrót, ami az aktív munkalapra másolja a megnyitni kívánt fájl adatait az első sortól kezdődően. Utána a munkalapot egy új excel fájlba menti el, de az eredményt láthatod a munkalapon is. Az elmentett fájlt már megnyithatod.
A makrót egyenlőre egy üres munkafüzetbe másold be egy modulba és mentsd el makróbarátként ezt a munkafüzetedet. (Alt+F11 - Insert menü - Module)Sub beolvaso()
Dim fs As Integer, fnev As String, bestr As String, kistr As Variant, x As Long, valjel As String
x = 1
fs = FreeFile()
fnev = "C:\Users\user\Downloads\makroteszt\Munka2.csv" ' ide írd a saját fájlod nevét
ActiveSheet.UsedRange.ClearContents 'kitöröljük ami a lapon van
Open fnev For Input Access Read As #fs
Do While Not EOF(1)
Line Input #1, bestr
If x = 1 Then 'megállapítjuk az elválasztó jelet
If InStr(bestr, ";") > 0 Then
valjel = ";"
Else
If InStr(bestr, vbTab) > 0 Then
valjel = vbTab
Else
If InStr(bestr, ",") > 0 Then
valjel = ","
End If
End If
End If
If valjel = "" Then valjel = ";"
End If
kistr = Split(bestr, valjel)
Range(Cells(x, 1), Cells(x, UBound(kistr) + 1)).Value = kistr
x = x + 1
Loop
Close #1
'A beolvasott fájlt elmentjük xlsx formátumban --ezeket a sorokat ki is törölheted
ActiveSheet.Copy 'de akkor magadnak kell menteni a munkalapot
ActiveWorkbook.SaveAs "C:\Users\user\Downloads\makroteszt\Munka22.xlsx" 'ide írod a saját neved
ActiveWorkbook.Close False
End Sub
Természetesen megoldható az is, hogy a beolvasandó fájlt választani lehessen a szokásos módon.
Ha bármi gondod keletkezik, írj, akár priviben is.
Üdv. -
Sesy
aktív tag
sziasztok
a következőt szeretném megoldani ha lehet akkor makró nélkül (office365):legördülő menüből választanék adatot, de feltételhez kötve
tehát, ha mondjuk az A1 cellában 1 van írva akkor a B1 cellában csak bizonyos tételek jelennek meg a legördülő menüben, ha 2 akkor pedig másik tételek...lehet ilyet csinálni, viszonylag egyszerűen?
Born stupid... Try again!
-
jpisti
senior tag
Üdv ismét a topik lakóinak és guruinak is!
Ismét lenne egy kérdésem: Adott egy tartomány (mondjuk egy munkafüzet A oszlopa) ahol dátumok vannak, méghozzá YYYY.MM.DD formátumban. Egy cellában meg szeretném számolni, hogy az adott tartományban hányszor szerepel egy bizonyos évszám. Ha jól tippelek akkor a COUNTIF függvényt kell használnom. Meg is adom a tartományt (A:A) de a feltételnél vagyok bajban. Próbáltam már a "2018*" vagy a "2018.*" vagy a "=2018" vagy a "=2018.*) feltételeket is de eddig nem jártam eredménnyel.
Hogyan kellene a feltételt megadni, ahhoz hogy működjön a dolog?Az eredeti munkafüzetben minden dátumhoz tartozik egy időtartam is. A következő feladat az lenne, hogy egy másik cellában ezeket a időtartamokat kellene összesíteni, méghozzá az adott év szerint. Ezt gondolom, hogy a SUMIF függvényt kell alkalmazzam, de ha fentebb nem tudom megadni a feltételt jól, akkor itt sem fog sikerülni...
A vok és a vagyok között pontosan egy "agy" a különbség!
-
félisten
válasz Vladek83 #43643 üzenetére
Ezt a 2 dolgot próbáld meg elsőre
1. Excel indít, Fájl/Beállítások/Általános/Élő minta engedélyezése elől pipa ki, OK, kilép Excel-ből, majd újra elindítod
ha ez nem hoz eredményt, akkor az 1. pontban levő opciót engedélyezd újra
2. Excel legyen bezárva (ill. minden Office app), WIN gomb + R, excel /regserver beír és enterha ez sem jó, akkor meg
3. Google keresés erre: microsoft excel there's a problem with the clipboard but you can still paste
Itt lesznek olyan megoldások, amiket könnyebb elolvasni, mint ide beírni...UI: Office legyen uptodate, és ha van esetleg tudomásod olyan háttéralkalmazásról, ami a vágólapot kezeli, az legyen kilőve. Az, hogy egyszer jó, egyszer meg nem, az igazából erre utal, tehát az Excel-el együtt valami még meg van nyitva. Ez lehet egy olyan progi is, ami a háttérben "sumákol", de olyan is, amit gyakran használsz és láthatóam meg is van nyitva, amikor az Exceltt használod... Ez utóbbi esetben magad is rájöhetsz, hogy ki a hunyó, mert az általában Excel-el egyidőben megnyitott app-okat egyesével megnyitod, és ellenőrződ a hibát, amelyik app megnyitása után befigyel a hiba, jó eséllyel az a gond...
[ 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)
-
Vladek83
tag
válasz Fire/SOUL/CD #43644 üzenetére
Szia,
köszönöm!
a 2. pontot próbáltam.. nem lett siker.
Viszont a többit tesztelem!üdv,
-
Hintalow
senior tag
Sziasztok!
Megkértek, hogy segítsek könnyen kereshetővé tenni egy kis excel adatbázist, de elakadtam egy lépésnél
Office Professional Plus 2013-ban dolgozok
A lényegy annyi, hogy az "A" oszlopban vannak az ügyfelek azonosító számai, és az utána következő oszlopokban az adatok, milyen irat, mikortól érvényes stb.
Egy külön fülön lenne egy keresőfelület, ahová csak beírnak egy dedikált mezőbe egy azonosító számot, és kidobja a vonatkozó sorokat.
Első blikkre eztsimán vlookup-al oldanám meg, de több sora is van sok ügyfélnek, ahol is az azonosító ugyanaz, így több sornyi adat kéne, amire a vlookup nem jó.
Hogy érdemes ezt szerintetek megoldani?üdv & köszi
Ha a multiverzum teória igaz, akkor van egy univerzum, ahol nem az.
Új hozzászólás Aktív témák
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Ozeki Kft.
Város: Debrecen