- Xiaomi 14T - nem baj, hogy nem Pro
- Motorola Razr 60 Ultra - ez a kagyló könnyen megfő
- Apple iPhone 16 Pro - rutinvizsga
- iPhone topik
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Az Oppo Find X8 Ultra lett a legvékonyabb kameramobil
- Apple Watch
- Honor Magic7 Pro - kifinomult, költséges képalkotás
- Íme az új Android Auto!
- Samsung Galaxy S20 és S20+ duplateszt
-
Mobilarena
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
-
föccer
nagyúr
Egy cella érékének módosítása alapvetően csak akkor hat a többi cellára, ha össze vannak képletezve. Ha a forrás listában módosítod a választék listát, nem fog változni azon cellák értéke, ahol korábban be volt választva. A legördülő lista csak a cellába bevihető értékekt korlátozza, de utólag nem csinál vele semmit.
Használd a csere funkciót, amit ctrl+H-val tudsz előszedni.
üdv, föccer
-
Fferi50
Topikgazda
Szia!
Szerintem csinálj egy segédoszlopot, ahol a dátumokból az évet számítod ki.
Azt nézd meg, hogy a mutatott formátum mögött valódi dátum van vagy szöveg formátum. Ezt úgy tudod legegyszerűbben megnézni, ha a cella formátumot megpróbálod számmá (vagy általánossá) változtatni. Ha a cella tartalma számmá változik, akkor az ÉV függvénnyel kapod meg az évet és az szám lesz. Ha marad változatlanul, akkor a BAL(cella,4) lesz az év és szöveg marad.
Utána DARABHATÖBB függvényt nézd meg. Az év feltételét a fentiek alapján vagy számként vagy szövegként kell megadnod.
Üdv. -
Fferi50
Topikgazda
Szia!
A esetben: jobb egérgomb - cellaformázás - szám - egyéni, a formátum pedig:[>=1000000]#,0 "M";[>=1000]##0,0 "K";## ##0
A formázás természetesen másolható.
A B eset komplikáltabb, egyedi cellákra/tartományra csak képlettel megvalósítható, direktben nem írhatod be a konkrét cellába a számot.
A képlet, ha az eredeti szám az A1 cellában van:=HELYETTE(SZÖVEG(A1;"# ##0");" ";".")
Viszont általános érvénnyel megváltoztatható az ezres elválasztó:
Fájl - Beállítások - Speciális - Rendszerbeállítás szerinti elválasztók használata
előtt kiveszed a pipát, majd az Ezreselválasztó melletti kockába beírod a pontot.
Ezután a cellaformázás - szám fülön kiválasztod a szám-ot, bejelölöd a kívánt tizedesjegy számot és bejelölöd az ezres csoport kockát (ami mellett pontot fogsz látni zárójelben).
NE FELEDD! Ez utóbbi beállítás - hogy pont az ezres elválasztó és nem szóköz - minden számra igaz lesz a munkafüzetben.
SŐT az Excelben a régi és új munkafüzetekben is ez a beállítás fog érvényesülni, bármi is volt korábban a beállítás!!!
Vagyis vissza kell állítanod a rendszerbeállítás szerinti használatot a többi fájl használata érdekében.
Ezért talán mégis jobb a képlet használata - bár nyilván kényelmetlen, hogy nem írhatod azonnal a saját helyére.
Üdv. -
Delila_1
veterán
Több mód is van erre.
Pl. az adataidat táblázattá alakítod. Az adataid között állva a Kezdőlapon a Formázás táblázatként menüponttal egy kattintással elintézheted. Ennek az előnyeiről sokat olvashatsz.
Másik megoldás, hogy a Beállítások, Képletek pontban bejelölöd a Képletek automatikus kiegészítését. -
Mutt
senior tag
Szia,
Szerintem az alapokat kell elsajátítani/magabiztossan kezelni és utána lehet elővenni a haladó dolgokat, amelyek véleményem szerint az alábbiak lehetnek hasznossági sorrendben:
- táblázatok,
- kimutatás/pivot,
- Solver,
- tömbfüggvények (annó CSE bevitel, pl. SZORZATÖSSZEG/ÖSSZESÍT mindenre),
- Power Query/Power Pivot,
- dinamikus tömbök (spill, @ és # jelentése) illetve újabb függvények (LET, LAMBDA, XLOOKUP/XMATCH/BY...)
- VBA,
- DAX függvények (itt Power BI felé lehet kacsingatni)
- Office Script illetve Py szkript (ezek MS365-ben),
- Excel4 függvények (talán egyedül EVALUATE)Szerintem ne azt keresd, hogy mi a legfrissebb, mert nagyon sokan még régi verziójú Excelt használnak, nekik is mindig van megoldás a problémára. Az elmúlt években a Microsoft önti az újabb függvényeket az Excelbe, de ezek elterjedése lassan megy és nincs is mindenkinek szüksége rá.
pl. mindenki adott össze már számokat Excelben, 2 éve van a REDUCE amivel lehet összeadni is, de nem hinném hogy a SZUMHATÖBB (eseteg SZORZATÖSSZEG/ÖSSZESÍT) helyére fog valaha is lépni.Ha a fenti listában lévő dolgok újdonságok neked, és nincs időd mindet megismerni, akkor Power Query-vel kezdj szerintem.
Youtube-on én az alábbi csatornákat tudom javasolni:
1) Mike Girvin: https://www.youtube.com/@excelisfun
Erőssége: tömbfüggvények (kb. 4 évvel ezelőtt, van is könyve róla), az elmúlt időszakban főleg Power Query/Power Pivot/DAX és az új Excel függvényeket használja.Sok hosszabb videója van, ami alapokat magyaráz hogy a haladó dolgokat meg lehessen érteni.
2) Bill Jelen aka MrExcel: https://www.youtube.com/@MrXL
Erőssége: rövid videók a legfontosabb változásokról, illetve ha 4-5 évet visszamész a csatornán, akkor tipikus problémákra mutat megoldásokat. volt egy Duelling Excel sorozat, amiben jó példák voltak.
3) Mynda: https://www.youtube.com/@MyOnlineTrainingHub
Erőssége: változatos videók, alaposan bemutatva adott függvényt vagy problémát.
4) VBA-hoz Paul csatornája: https://www.youtube.com/@Excelmacromastery
Kezdőknek jó a csatorna, mert tippeket ad hatékony kód íráshoz. Hátránya, hogy szinte mindig vagy collection vagy class module lesz a vége.
5) DAX/Power BI/Power Query:
- Goodly: https://www.youtube.com/@GoodlyChandeep
- Marco/Alberto: https://www.youtube.com/@SQLBI
- BAS: https://www.youtube.com/@HowtoPowerBIüdv
-
Delila_1
veterán
Módosítottam a makrón. Mint írtam, nem szükséges a D oszlop, ami a két dátum között eltelt napokat számolja.
Sub Masolas()Dim sor As Integer, ide As IntegerSheets("Munka2").Columns("A:D").ClearContentsRange("A1:C1").Copy Sheets("Munka2").Cells(1) 'címsor másolásaSheets("Munka1").Selectide = 2: sor = 2Do While Cells(sor, 1) > ""If Cells(sor, 3) - Cells(sor, 2) >= 360 ThenRows(sor).Copy Sheets("Munka2").Range("A" & ide)Rows(sor).EntireRow.Deleteide = ide + 1: sor = sor - 1End Ifsor = sor + 1LoopEnd SubA Munka1 lapon az első sort magasabbra vettem, hogy rendesen elférjen a frissítő gomb. Ez egy alakzat (lekerekített sarkú téglalap, de lehet bármi más is), ehhez rendeltem a Masolas makrót.
Eredeti Munka1 lap:
A makró indítása után:
-
Delila_1
veterán
Egy másik módszer (nem kell hozzá segédoszlop).
Sub Masolas()Dim sor As Integer, usor As Integer, ide As IntegerSheets("Munka1").SelectRows(1).Copy Sheets("Munka2").Cells(1) 'címsor másolásausor = Range("A" & Rows.Count).End(xlUp).Rowide = 2For sor = 2 To usorIf Cells(sor, 3) - Cells(sor, 2) >= 360 ThenRows(sor).Copy Sheets("Munka2").Range("A" & ide)ide = ide + 1Rows(sor).EntireRow.DeleteEnd IfNextEnd Sub -
lappy
őstag
Kiszámolod egy segédoszlopba és ezzel át tudod helyezni ami nagyobb
Sub Rhair()
Dim xRg As Range
Dim xCell As Range
Dim I As Long
Dim J As Long
Dim K As Long
I = Worksheets("Munka1").UsedRange.Rows.Count
J = Worksheets("Munka2").UsedRange.Rows.Count
If J = 1 Then
If Application.WorksheetFunction.CountA(Worksheets("Munka2").UsedRange) = 0 Then J = 0
End If
Set xRg = Worksheets("Munka1").Range("D1:D" & I)
On Error Resume Next
Application.ScreenUpdating = False
For K = 1 To xRg.Count
If CStr(xRg(K).Value) > "360" Then
xRg(K).EntireRow.Copy Destination:=Worksheets("Munka2").Range("A" & J + 1)
xRg(K).EntireRow.Delete
If CStr(xRg(K).Value) = "Done" Then
K = K - 1
End If
J = J + 1
End If
Next
Application.ScreenUpdating = True
End Sub -
föccer
nagyúr
-
#49482
Fire/SOUL/CD
félisten
Rhair
#49480
Új hozzászólás Aktív témák
Hirdetés
Fferi50- Xiaomi 14T - nem baj, hogy nem Pro
- Motorola Razr 60 Ultra - ez a kagyló könnyen megfő
- Apple iPhone 16 Pro - rutinvizsga
- Synology NAS
- OLED TV topic
- One otthoni szolgáltatások (TV, internet, telefon)
- Revolut
- iPhone topik
- Mielőbb díjat rakatnának a görögök az olcsó csomagokra az EU-ban
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- További aktív témák...
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most kedvező áron!
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - NYÁRI AKCIÓ!
- Kaspersky, McAfee, Norton, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- ROBUX ÁRON ALUL - VÁSÁROLJ ROBLOX ROBUXOT MÉG MA, ELKÉPESZTŐ KEDVEZMÉNNYEL (Bármilyen platformra)
- Gyermek PC játékok
- BESZÁMÍTÁS! MSI B450 TomaHawk R5 3600 16GB DDR4 512GB SSD RX5500 XT 8GB Rampage SHIVA TT 530W
- Apple iPhone 13 Pro , 128GB , Kártyafüggetlen
- LG 77G3 - 77" OLED evo - 4K 120Hz 0.1ms - MLA - 2000 Nits - NVIDIA G-Sync - AMD FreeSync - HDMI 2.1
- LG 65BX - 65" OLED - 4K 120Hz 1ms - NVIDIA G-Sync - FreeSync Premium - HDMI 2.1 - PS5 és Xbox Ready!
- BANKMENTES részletfizetés Noblechairs HERO Fekete/Platinafehér Gamer Szék
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft
Város: Budapest
Cég: Promenade Publishing House Kft.
Város: Budapest