- gban: Ingyen kellene, de tegnapra
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- btz: Internet fejlesztés országosan!
- bambano: Bambanő háza tája
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Magga: PLEX: multimédia az egész lakásban
- Carlytoo: Pánikszindróma #3
- sziku69: Szólánc.
-
LOGOUT
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
-
Fferi50
Topikgazda
válasz
andreas49 #54336 üzenetére
Privátban megoldódott!
Ha valaki kíváncsi lenne rá:
Nem megjegyzés/jegyzet volt a cellában, hanem hivatkozás (hyperlink).
Az egérmutató rávitele pedig a HIVATKOZÁS munkalapfüggvény megjelenő szöveg paraméterbe kerülő szöveget mutatja meg.
Ezt VBA-val a Range.Hyperlink ScreenTip paraméterével lehet kinyerni. Mivel egy cellához több hyperlink is csatolható, ezért az egyikek (akár az egyetlent is!) a Hyperlinks(index) formában lehet kinyerni. Vagyis a B2 cellához kapcsolódó érték kinyerése:Range("B2").Hyperlinks(1).ScreenTip
Üdv. -
andreas49
senior tag
Küldtem e-mail-t
-
Fferi50
Topikgazda
válasz
andreas49 #54336 üzenetére
Szia!
Az egérmutató rávitele a cellára sajnos nem kezelhető eseményként, így nem lehet hozzá eseménykezelőt sem írni.
Két egéresemény van, a BeforeDoubleClick és a BeforeRightClick. Kényelmi szempontból a jobb egérkattintást látom használhatónak, erre írtam is egy makrót, amit a munkalap kódlapjára kell beírni:Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim cmts As CommentsThreaded, cmt As CommentThreaded, cmtas As Comments, cmta As Comment, cmtjel As Boolean
If Me.CommentsThreaded.Count > 0 Then
Set cmts = Munka1.CommentsThreaded
For Each cmt In cmts
If Target.Address = cmt.Parent.Address Then
Application.EnableEvents = False
Target.Offset(0, 1).Value = cmt.Text
cmtjel = True
Exit For
End If
Next
End If
If Not cmtjel Then
If Me.Comments.Count = 0 Then
Cancel = False
Exit Sub
Else
Set cmtas = Me.Comments
For Each cmta In cmtas
If Target.Address = cmta.Parent.Address Then
Application.EnableEvents = False
Target.Offset(0, 1).Value = cmta.Text
cmtjel = True
Exit For
End If
Next
End If
End If
Application.EnableEvents = True
End Sub
A makró jobb egérkattintásra indul, mind a megjegyzést, mind a jegyzetet figyeli és amennyiben a cellához kapcsolódik, akkor a mellette levő cellába kiírja az értékét.
Ezután láthatóvá válik a jobb egérkattintás menüje. (Erre azért van szüksége, mert másként nem tudnád törölni a cella megjegyzését/jegyzetét.)
Ha nincs sem megjegyzés, sem jegyzet, akkor csak a menü jelenik meg.
Amire figyelned kell: Az adott cellára akárhányszor megcsinálhatod a jobb egérkattintást, mindannyiszor újra felülírja a megjegyzés/jegyzet értékét. Ha közben változtattál a szövegen, akkor egy plusz jobb egérkatt kell ahhoz, hogy a mellett levő cellában megjelenjen az új szöveg.
Ha bármilyen más értékek lennének az adott cella mellett, azok is felülíródnak a megjegyzés/jegyzet szövegével!!!
Mindig csak azt a cellát vizsgálja, amin kattintottál - egyértemű működés érdekében csak egy db cellát jelölj ki a kattintásra!
A munkafüzetet makróbarátként kell elmentened!
Üdv. -
andreas49
senior tag
-
andreas49
senior tag
Sziasztok, létezik valamilyen VBA-s megoldás arra, ha pl. 'B' oszlop mezőiben olyan szöveg szerepel, amire mutatva az egérrel, megjelenik egy megjegyzés. Ezeket a megjegyzéseket szeretném kiíratni a 'C' oszlop megfelelő mezőjébe.
Köszönöm a segítséget előre is. -
Mutt
senior tag
válasz
Dr. Mózes #54329 üzenetére
Szia,
Szokni kell a Power Pivot-ot. Ezek szerint csak az volt a gond, hogy a képlet nem volt teljes. Én többnyire el kezdem gépelni a függvény vagy tábla/mező nevet és kiválasztom a listából egy TAB-ot nyomva.
Amire figyelni kell, hogy Power Pivot-ban a függvények csak angol nyelven vannak.
Sok munkalap függvénynek megvan a DAX-os változata, de eltérően műkődnek.Nem tudom, hogy az UDEMY-s oktatás csak Power Pivotról (és DAX-ról) szól-e vagy más Power tool is említve van (főleg Power Query, esetleg Power Automate), de a DAX nehéz.
üdv
-
Dr. Mózes
aktív tag
válasz
Dr. Mózes #54328 üzenetére
Szerk.:
MOST MEG JÓ! A függvényválasztóból elindítottam az IF függvényt, ott már ki tudtam választani az oszlopot. Próba képen visszavontam az egészet és kézzel beírva is simán működött a képletezés...Szerk2.:
Helyes metódus: Beírom a képletet majd zárójel. Ha botor módon egyből az oszlopra kattintok, akkor hiba, viszont ha előtte az egérrel oda kattintok a zárójel utáni részre, akkor minden rendben. -
Dr. Mózes
aktív tag
Újra belefutottam ugyanebbe a hibába, viszont most nincs benne dátum.
A videó anyaga szerint =IF(OR('Customer-Lookup'[education]...... DAX képletezést akartam használni, viszont ugyanazt a hibaüzenetet doba, pedig ez sima szöveges oszlop.
A lehetséges függvényeket előhívva listázza az IF és az OR képletet is, úgyhogy jó helyen kellene lennem. -
Mutt
senior tag
válasz
Dr. Mózes #54320 üzenetére
Szia,
Power Query-ben nincs DATEDIFF, ott a Duration függvények használhatóak. Ezekben DateTime és Date adattípusok használhatóak. pl.
=Duration.Days([End]-[Start])
A dátumok számként vannak tárolva, a regionális beállítás csak az év/hó/nap/óra/perc/másodperc helyes sorrendjének megadására szolgál. Ha sikeresen feldolgozta az értéket, akkor onnantól már számként műkődik.
Azt írtad, hogy amerikai dátumokat dolgoztatsz fel magyar Excelben ott meg kellene adnod az USA beállítást, hogy helyes értékek legyenek.
DATEDIFF (magyar Excelben DÁTUMTÓLIG) egy rejtett munkafüzet képlet, amelynél az első paraméter a kezdő, a második a végdátum. A harmadik pedig hogy milyen egységben (eltelt napok, hónapok, évek stb) jelenítse meg a két dátum különbségét. Itt annyi kavarás van, hogy magyar Excelben is az angol rövidítéseket ("d", "m", "y") kell használni.Power Pivot-ban a DATEDIFF már a DAX-ot használja. Ott a hibaüzeneted más hibára utal.
Tippre az lehet a gond, hogy van olyan dátumod ami 1900 előtti.Excel munkalapon az ilyen dátumok szövegek. Ha ezt közvetlenül töltöd be Power Pivotba, akkor nem minden sorod lesz dátum típus amire kiakad a DATEDIFF.
Egy ISNUMBER([dátum oszlopod]) megadja hol van hiba.Power Pivotba Power Query-vel célszerű adatokat betölteni, ilyenkor már nem él az 1 millió soros limit (ami egy munkalapon lehet). Dátumoknál több évszázadot is vissza lehet ott már menni gond nélkül. Power Pivot/Power Query Krisztus utáni 100. évtől felfelé műkődik (persze 1582 előtt sok értelme nincs).
A másik tippem az lehet, hogy a [YEAR] és a [Mai nap] közötti éveket akarod, csakhogy a YEAR nekem szövegnek tűnik (balra van rendezve) és mégha szám lenne akkor se lenne jó, több dolog miatt. Ha ez kell akkor a számított oszlop, csak ennyi
=YEAR([Mai nap])-[YEAR]
üdv
-
Fferi50
Topikgazda
válasz
Dr. Mózes #54324 üzenetére
Szia!
Bocsi, úgy látom 2 malomban őrölünk. A Power Qery nem azonos a Power Pivottal. Te a hibaüzenet szerint ez utóbbival dolgozol. Ebben valószínűleg nincs DateDiff függvény. Nem igazán ismerem, gondolom más szintaktikát használ ez is.
Egyébként mit szerettél volna a DateDiff függvénnyel kiszámítani?
Üdv. -
Dr. Mózes
aktív tag
Sziasztok!
Van egy amerikai dátumokat tartalmazó CSV fájlom, amit beolvastam a Querybe és azt automatikusan átalakította a magyar dátumformátumokra.
Használni akartam a DATEDIFF képletet, viszont hibát dob ahogy ki akarom választani az oszlopot.
Próbáltam átállítani a regionális beállításokat, hogy angol legyen a dátum kiosztás, de maradt a magyar, megpróbáltam az oszlopformátumot módosítani a regionális dátum módosításával, az sem segített.
Nem is nagyon szeretném ha át kellene állítani mindenhol a régiót, maradnék inkább a magyar formátumnál ha lehetséges.
Szerintetek mi okozza a hibát, és hogyan lehetne javítani? -
Fferi50
Topikgazda
válasz
csferke #54317 üzenetére
Szia!
Akkor próbáld ki légy szíves ezt:
Nézet - Új ablak majd az egyik ablakban Nézet - Ablak - Mozaik - a megjelenő párbeszéd ablakban bejelölöd Egymás mellett.
Így a két ablakod egymástól függetlenül fog mozogni, viszont a változtatás mindkét ablakban megjelenik. Amikor elhagyod az excelt, majd ismét visszatérsz, akkor a Nézet menüben a Ablakváltással tudod mindkét ablakot ismét megjeleníteni.
Üdv. -
csferke
senior tag
válasz
Fferi50 #54316 üzenetére
Szia, köszi de úgy látom nem tudtam elég pontosan megfogalmazni, hogy mit is szeretnék.
Pl. A-F oszlopok egyik "ablakban" G és a tőle jobbra a többi. Amikor az egérrel görgetek az A-F oszlopokon, bárhol, akkor csak azok mozogjanak le-fel. A G és a tőle jobbra lévők ne mozogjanak. Ez persze fordítva is így működjön. -
csferke
senior tag
Sziasztok!
Ezzel a képernyő/táblázat felosztással lehet vízszintesen elosztani a képernyőn a táblázatot.
Lehetséges-e valahogy függőlegesen is felosztani?
kösziExcel 2007
-
jjohn
aktív tag
válasz
szbjns #54310 üzenetére
Megpróbálok egy példán keresztül segíteni, talán hasznos lesz!
-Először behívjuk a adatokat a két táblából, a példában több van de na zavarjon.
A képeken próbáltam levezetni. De látom elég kicsi lett, de olvasható azért.
-A PQ-ban kiválaszthatod ami nem kell, illetve variálhatod.
-Bezárás betöltés után egy excel táblát kapsz.
-Ebből lehet kimutatást készíteni ezt testre szabhatod. -
Fferi50
Topikgazda
válasz
szbjns #54311 üzenetére
Szia!
A PQ szerkesztés lépései (az előző leírásnak megfelelően):
3. Pont: Kijelölöd a Tervezett oszlopot majd Ctrl nyomva a Bevétel oszlopot. Ezután Átalakítás fülön Oszlopok egyesítése - a párbeszéd panelen elválasztó nincs és beírod az új oszlop nevét (nálam Adatok).
Ezután: Az új oszlop kijelölve - Kezdőlapon - Adattípus - egész szám
4. pont
Nem a Rendelés mezőbe, hanem a Típus_terv oszlopba fogunk helyettesítőt írni:
Kijelöljük a Típus_terv oszlopot. Ezután Átalakítás fülön Értékek lecserélése:
Null helyett Bevétel lesz az oszlopban.
Ezután Kezdőlapon Bezárás és betöltés.
Innen már jöhet a kimutatás.
Még annyi turpisság, hogy a Típus_terv mezőnél a részletezést kikapcsoljuk, de az összesítést meghagyjuk Automatikus opción.
A Típus mezőnél kikapcsoljuk az összesítést, a Rendelés mezőné pedig meghagyjuk az Automatikus opciót.
A kimutás akkor változik meg, ha rajta állva a Kimutatás_tervezés menüben a Frissítésre kattintunk.
Üdv. -
szbjns
újonc
válasz
Fferi50 #54309 üzenetére
Szia, neked is köszönöm a segítséget!
Ez már olyan, amit keresek, meg is próbáltam a leírásod alapján elkészíteni, de az összefűzés után nekem nem sikerül szerkeszteni a power query (mergelt) táblázatot.
Ha pedig csak simán a létrehozott munkafüzetben szerkesztem, az nem működik (ha ráeresztem a pivotot, amit beírtam, eltűnik).A te megoldásodba még az kellene nekem, hogy a bevételeket is lássam havi szinten összeadva. És akkor rögtön látni, hogy a bevétel és a terv hogy áll egymáshoz képest. A te megoldásodban azokat még össze kell adni nekem, hogy lássam - ami 20-30 tételnél nehézkes.
-
Fferi50
Topikgazda
válasz
szbjns #54305 üzenetére
Szia!
Power Queryvel (PQ) egy kis munkával össze lehet fésülni a két fájlt úgy, hogy utána a kívánt formában jelenjen meg a kimutatásod.
1. Először a két fájlt olvastam be PQ-ba. Adatok – Adatok beolvasás – Más forrásokból – Táblázatból vagy tartományból menüpontban. (Van erre egy külön kis ikon is a menücsoportban.)
2. Az Adatok – Adatok beolvasása – Lekérdezések kombinálása – Összefűzés menüpontban kiválasztottam a két előző táblázatot és beolvastam.
3. Ezután egy új oszlopba egyesítettem a Tervezett és a Bevétel oszlop adatait – határoló jel nélkül, majd megváltoztattam a típusát egész számra.
4. A következő lépésben a Rendelés oszlop üres (null értékű) celláiba beírtam a Terv szót.
5. Mentettem az egészet, a továbbiakban nincs szükség a PQ használatára.
6. Az így kapott táblázatra elkészítettem a kimutatást a képen látható mező elrendezésekkel. A terv sorokat felvittem a Típus alá elsőnek és félkövér betűket adtam neki. (Kijelölöd a cellát és addig mozgatod az egeret, amíg a szálkereszt meg nem jelenik, amivel mozgatható.)
7. Így változáskor csak frissíteni kell a lekérdezéseket és a kimutatást.
(A PQ „makrója” az alábbi --- a szerkesztés, kezdőlap – speciális szerkesztő menüpontjában érhető el:let
Forrás = Table.Combine({Táblázat1, Táblázat3}),
#"Oszlopok eltávolítva" = Table.RemoveColumns(Forrás,{"Dátum"}),
#"Egyesített oszlop beszúrva" = Table.AddColumn(#"Oszlopok eltávolítva", "Adatok", each Text.Combine({Text.From([Tervezett], "hu-HU"), Text.From([Bevétel], "hu-HU")}, ""), type text),
#"Típus módosítva" = Table.TransformColumnTypes(#"Egyesített oszlop beszúrva",{{"Adatok", Int64.Type}}),
#"Érték felülírva" = Table.ReplaceValue(#"Típus módosítva",null,"Terv",Replacer.ReplaceValue,{"Rendelés"})
in
#"Érték felülírva")
A képek:
1.Részle az összefűzött fájlból:
2.
A kimutatás mező elrendezése:
3. A kimutatás maga:
Ha bármilyen kérdésed lenne, keress bátran.
Üdv. -
szbjns
újonc
Szia,
ha csak behúzom őket egybe, akkor jobbra elkezd szélesedni a pivot táblám, veszi pl. ott az első hónapot és alá berakja a másik tábla 1-12. hónapját. 2. hónap alatt ugyancsak berakja a másik tábla 1-12. hónapját, és így tovább.
Próbáltam kapcsolatot létesíteni a kettő között, de nem sikerült még rájönnöm, mi a jó megoldás. -
szbjns
újonc
Sziasztok.
Egy kimutatást kell készítenem, ahol a tervezett költségekhez kellene kimutatnom, jelenleg hogy állnak a kiadások. Havi bontás, éves szinten.
Ebben kérném a segítségeteket.Két külön táblázatom van.
Az egyik - Terv:
- Típus oszlop, pl. édesség, tertermék, pékáru, hentesáru, ital .. tervezett ktg-ei
- Hónap oszlop, amire az előrejeltés vonatkozik
- Tervezet oszlop, adott hónapra az előrejelzett keretMásik - Bevétel:
- Rendelésazonosító
- Dátum, Hónap oszlopok
- Típus oszlop (ugyan azok a típusok)
- Bevétel oszlop - adott rendelés költsége
A cél egy olyan Pivot kimutatás készítése, ami a két külön munkafüzeten lévő táblázatot összehúzza a következők szerint.Az egyes sorok a típusok, de egymás alatt kellene látnom a tervet és a valós költést.
Viszont az egyes kategóriák alatt listázva a rendelésazonosító.
- édesség (terv)
- édesség
-- rendelésazonosítók édesség típusban
- hentesáru (terv)
- hentesáru
-- rendelésazonosítók hentesáru típusban
- ital (terv)
- ital ... stbOszlopok soronként: a hónapok (1-től 12-ig)
Két külön kimutatásként meg tudom csinálni egymás
felett,de úgy szeretném, hogy egy kimutatásban szerepeljenek.
Tehát a felső kimutatásból a terv sorok pont az adott kategória felett jelennének meg.
Remélem érthetően írtam le.Van valami ötletetek?
A két forrás táblázat viszonylag szabad szerkeszthető még.
Azt nem szeretném, hogy a kettő táblázatból egyet csináljak, úgy meg tudnám oldani. De a Bevétel táblázatot többen kezelik. A Terv csak a vezetőségé.köszönöm előre is.
-
blountex
senior tag
Közben megoldódott. ...
-
Fferi50
Topikgazda
válasz
flash- #54298 üzenetére
Szia!
Egyéni ormázással megoldható, hogy a számok az általad kívánt formátumban jelenjenek meg. A formátum az alábbi:[<=3619999999]"+"##_ #_ ###_ ####;[<=3699999999]"+"##_ ##_ ###_ ###;"+"##_ ##_ ###_ ##_ ##
Ezt kell bemásolnod a formátumkód mezőbe.
Ráállsz egy cellára, azon jobb egérgomb, cellaformázás - egyéni majd a formátumkód mezőbe bemásolod a fentieket nagyon pontosan.
Ha egy cellát megformáztál, utána a formátum másolható.
Ez a kód csak a magyarországi telefonszámokat formázza az általad kívánt formába (nem csak a mobil számokat).
A telefonszámot + nélkül, mindig 36-tal kezdve számként! kell a cellába beírni, akkor hatásos a formázás. Ha a celláidban benne van a + is a számok előtt, azt le kell vágni. ha szöveg maradna azt számmá kell alakítanod formázás előtt.
Üdv.
Új hozzászólás Aktív témák
Hirdetés
- A nagy Szóda, Szódakészítés topic - legyen egy kis fröccs is! :-)
- PlayStation 5
- REpont és hulladékgazdálkodás
- Motoros topic
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Xbox tulajok OFF topicja
- Milyen videókártyát?
- Melyik tápegységet vegyem?
- Villanyszerelés
- Háztartási gépek
- További aktív témák...
- ROBUX ÁRON ALUL - VÁSÁROLJ ROBLOX ROBUXOT MÉG MA, ELKÉPESZTŐ KEDVEZMÉNNYEL (Bármilyen platformra)
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap
- Játékkulcsok a legjobb áron: Steam
- Telefon felvásárlás!! iPhone 15/iPhone 15 Plus/iPhone 15 Pro/iPhone 15 Pro Max
- HIBÁTLAN iPhone 13 Pro 128GB Sierra Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3026, 91% Akkumulátor
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9700X 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- AKCIÓ! DELL PowerEdge R630 rack szerver - 2xE5-2680v4 (28c/56t, 2.4/3.3GHz), 128GB RAM, 1G, áfás
- DELL PowerEdge R630 rack szerver - 2xE5-2680v4 (28c/ 56t, 2.4/3.3GHz), 128GB RAM, 10G, áfás szla
Állásajánlatok
Cég: FOTC
Város: Budapest