Keresés

Részletes keresés

Fferenc50 Creative Commons License 2024.02.05 0 0 37830

Szia!

Pl.

=JOBB(A1;1) & BAL(A1;HOSSZ(A1)-1)

Üdv.

Előzmény: Kexcel9 (37829)
Kexcel9 Creative Commons License 2024.02.05 0 0 37829

Sziasztok!

 

Milyen függvényt használjak ahhoz, hogy egy cellában az utolsó karakter kerüljön az első helyre?

 

Köszi!

Dangit Creative Commons License 2024.02.04 0 0 37828

Koszonom szepen!

 

Teljes siker

Előzmény: Fferenc50 (37821)
webhifi1 Creative Commons License 2024.02.04 0 0 37827

Sziasztok!

Adott egy excel táblázatom amelyben L2:L100 között felsorolt nevek vannak.

Egy makró segítségével létrehozok adatelemzést és fenti tartományban lévő neveket használva a helyes cellába be is illeszti azokat ezzel nincs is gondom.

A makró utolsó fázisaként a munkalapfüleket szeretném átnevezni az L2:L100 tartomány nevei szerint úgy hogy az adatok ha változnak akkor a munkalapfül átnevezése is kövesse le a tartalmat azaz ne a scriptben tárolt vágólap tartalma alapján legyen átnevezés hanem az oszlop adatai szerint amelyek változnak és ezt kövesse le.

 

 

Delila10 Creative Commons License 2024.02.03 0 0 37826

Jól gondolod.

 

 

A C12 jelentése, hogy az aktuális (képletet tartalmazó) oszloptól 12-vel balra lévőre hivatkozik. Lehet negatív is a szám, amivel előző oszlopra hivatkozhatunk.

Ugyanígy az R után is lehet érték, ami plusz érték esetén lentebbi sort jelent, negatívnál fentebbit.

Érték megadása nélkül az adott sorra (R), vagy oszlopra (C) hivatkozunk.

Előzmény: pimre (37825)
pimre Creative Commons License 2024.02.03 0 0 37825

Hú, ez nagyon jó!!! Köszönöm.

Ez megoldott azt, amin már több mint egy napja nyűglődöm eredmény nélkül.

 

A formulaképlettel ugyan találkoztam már, de nem mélyedtem el az értelmezésében. Most majd utánaolvasok. Talán itt: https://excelchamps.com/formulas/r1c1/, de ha tudsz jobbat, akkor azt is köszönöm.

Mert egyelőre nem teljesen világos, hogyan lesz az RC12-ből $L3, és a C12-ből $L:$L, illetve, ahogy most írok világosodik, hiszen ha az R ott van érték nélkül az aktuális sort jelenti, a C12 meg az oszlopszámot, de ha az R nincs előtte, akkor a teljes oszlopot. Ugye?

 

Előzmény: Delila10 (37820)
pimre Creative Commons License 2024.02.03 0 0 37824

Köszönöm, ez így talán működne, de jól látom-e, hogy a képlet helye és a célterület ugyanazon a munkalapon kell, hogy legyen? Amikor megpróbáltam másik munkalapra tenni a képlet helyét, akkor a célterület kijelölésénél hibát kaptam. Ez meglehetősen korlátozhatja a módszer alkalmazását.

Előzmény: m54-b (37819)
Delila10 Creative Commons License 2024.02.03 0 0 37823

Fferién kívül még két módszert ismerek arra, hogyan lehet bevinni egy képletet helyesen makróba.

  1. Beviszem a képletet, majd lapfülön jobb klikk, Beszúrás, Nemzetközi Makrólap. Kapok egy új lapot Makró1 névvel. Ide bemásolom a képletet és a hivatkozási tartományát. Angolul jelennek meg a képletek, ezzel már tudok valamit kezdeni.

     2. A legkényelmesebb módszer: beírom a képletet egy cellába. Enterezés után újra erre a cellára állok, makrórögzítés, Enter a cellán. Leállítás után az igényeimnek megfelelően módosítom pl. a tartományt. Ez az R1C1 módszert alkalmazza, nem ronthatom el az idézőjelekkel.

Előzmény: pimre (37816)
Fferenc50 Creative Commons License 2024.02.03 0 0 37822

Szia! 

A VBA nézet Immediate ablakában lekérdezheted a képlet VBA-s formáját:

Ráállsz a cellára, majd az ablakban:

? ActiveCell.Formula (enter)

Itt láthatod a képletet. Amikor beírod a makróba, a következőre kell figyelned:

Range("A1:A98").Formula="=a kapott képlet, úgy, hogy az idézőjeleket meg kell duplázni,végén pedig"

Ahogyan látod, egy menetben lehet egész tartományra képletet megadni, csak a hivatkozások megfelelő rögzítésére kell ügyelned.

Üdv.

Előzmény: pimre (37816)
Fferenc50 Creative Commons License 2024.02.03 0 0 37821

Szia!

Szerintem a Részösszeg függvényt kellene használnod 109-es függvényszámmal. Ilyenkor csak a szűrés után fennmaradó értékeket veszi figyelembe.

A Szum függvény függetlenül a szűréstől, mindig mindent figyelembe vesz.

Üdv.

Előzmény: kalotailaszlo (37815)
Delila10 Creative Commons License 2024.02.03 0 0 37820

Szia!

 

Sub Keplet()

   Dim aktlap As String, aktoszlop As Integer, usor As Integer

 

   aktlap = "Munka1"

   aktoszlop = 2  'B oszlopba írja a függvényt

 

   'eddig van adat a Teljes lista lap AL oszlopában

   usor = Sheets("Teljes lista").Range("AL" & Rows.Count).End(xlUp).Row

 

   ’1 lépésben bemásolhatjuk a teljes aktoszlop-ba a képleteket

   Range(Cells(3, aktoszlop), Cells(usor, aktoszlop)).FormulaR1C1 = "= INDIRECT(""'Teljes lista'!$AL"" & MATCH(RC12,'Teljes lista'!C12,0))"

End Sub

Előzmény: pimre (37816)
m54-b Creative Commons License 2024.02.03 0 0 37819

Sub masolas()

    Range("B3").Select 'itt van a képlet
    Selection.Copy
    Range("B8").Select 'ide másol
    Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
    Application.CutCopyMode = False
    Selection.AutoFill Destination:=Range("B8:B12"), Type:=xlFillDefault
End Sub

 

Vagy nagyon nem értem?

Előzmény: pimre (37818)
pimre Creative Commons License 2024.02.03 0 0 37818

Kösz, de ez nem jó. Akkor az  "INDIREKT(" részt tekinti adatnak, és az aposztroftól kezdődőt pedig megjegyzésnek értelmezi.

 

De most találtam valamit. Az a gyanúm, hogy munkalap függvényként felismeri az INDIREKT-et, viszont VBA függvényként az INDIRECT-et nem.

 

Lehet,hogy a Referencesből hiányzik valami. Nekem ez van bejelölve, és nem tudom, mi kellene hozzá:

 

 

Ha viszont ez a helyzet, akkor nem tudom, van-e garancia arra, hogy más helyen, más környezetben elérhető lesz-e a függvény.

 

Akkor talán marad a Copy-Paste, ha találok rá megoldást. Ezt holnap megpróbálom egy segéd munkalappal. Hacsak nem kapok jobb ötletet.

Előzmény: m54-b (37817)
m54-b Creative Commons License 2024.02.03 0 0 37817

Szerintem

aktlapws.Cells(3, aktoszlop) = "INDIREKT

oda is kell egy idézőjel.

Előzmény: pimre (37816)
pimre Creative Commons License 2024.02.03 0 0 37816

A következő gondom van. Egy több munkalapot tartalmazó Excel fájlban van egy úgynevezett teljes lista, és vannak hozzátartozó munkalapok. A teljes listában a többi munkalap valamennyi rekordja szerepel, ami pedig összeköti őket, az az L oszlopban szereplő azonosító. Tehát amikor egy munkalapra szeretnék bemásolni egy adatot, akkor a munkalap L oszlopában lévő azonosítót keresem meg a teljes listában, és a negtalált sor megfelelő adatát olvasom ki, és helyezem el a munkalapon.

 

Az erre használt függvény, amit a korábbi években kézzel (Copy-Paste) másoltam be a munkalapok 3. sorába (majd húztam végig lefelé, kitöltve a teljes oszlopot a teljesből átvett értékekkel) így nézett ki: 

 

 = INDIREKT("'Teljes lista'!$AL" & HOL.VAN($L3;'Teljes lista'!$L:$L;0);1) ' Itt lehet, hogy hibát követtem el, hogy az aktuális munkalap L3 cellája előtt nem adtam meg a munkalap hivatkozást saját magára, de a rendszer elfogadta, és jól működött a dolog.

 

A komplett feladatot egy sokszáz soros makró kezeli, és mivel idén szeretném kiadni a kezemből a feladatot, ezt a másolást is a makróban szeretném automatizálni. Viszont órák óta képtelen vagyok megtalálni a helyes szintaxist. és a szerkesztő vagy a képleten belül talál hibát, vagy azt állítja, hogy  sub or function not defined. AKár C-vel, akár K-val írom az INDIREKT-et:

 

aktlapws.Cells(3, aktoszlop) = INDIREKT("'Teljes lista'!$AL" & HOL.VAN(aktlapws.Cells(3, "L"), "'Teljes lista'!$L,$L", 0), 1)

 

Elkeseredésemben arra is gondoltam, hogy az eredeti - kézi - megoldást imitálva alkalmazom, de a Copy részt nem tudom megoldani tehát, hogy a vágólapra kerüljön a formula.

 

Mit ronthatok el? 

kalotailaszlo Creative Commons License 2024.02.03 0 0 37815

Sziasztok!

 

=Szum(l6:l1500) formulaval összegezte meg az értéket de mihelyst szeletelon felsorolast valtok, az ertek a cellaban nem valtozik. Segitseg! ☺️

local75 Creative Commons License 2024.01.31 0 0 37814

Sziasztok!

 

Hogyan lehet egyesíteni az ablakokat hogy az Excel munkafüzetek az ablakfülek segítségével egyetlen ablakon belül jelenjenek meg?

 

A ChatGPT szerint van rá mód, de nem találom egyik módszert sem amit ír.

 

 

 

verzió: Microsoft® Excel® LTSC MSO (2305 buildverzió16.0.16501.20002) 64 bites

 

GPT: "A leírt verziószám alapján a Microsoft Excel 2023 Long-Term Servicing Channel (LTSC) verzióját használod."

MM10 Creative Commons License 2024.01.28 0 0 37813

És ebben a helyzetben már kapcsolgatni sem bírom őket

Előzmény: MM10 (37812)
MM10 Creative Commons License 2024.01.28 0 0 37812

Nagyon szépen köszönöm,egy utolsó kérdésem még lenne. A Jelölő négyzetet miért nem jelölőnégyzetként jeleniti meg a tábla? Már az elején is problémám volt vele,de megoldottam,most viszont kilépés utáni újra megnyitásnál már megint nem jelölőnégyzetként jeleniti meg. A kikapcsolt négyzetek helyén "FALSE" ,a bekapcsolt négyzetek helyén pedig a "TRUE" jelenik meg,tehát a helyzetüket írja le ahelyet hogy megjeleníteni őket

Delila10 Creative Commons License 2024.01.28 0 0 37811

=HA(VAGY(C4="A";C4="B";C4="C");3;HA(VAGY(C4="D";C4="E");4;HA(VAGY(C4="F";C4="G");5;"")))

Angolban HA -> IF, VAGY -> OR

Előzmény: MM10 (37810)
MM10 Creative Commons License 2024.01.28 0 0 37810

Köszönöm. Még olyan kérdésem lenne,hogy HA képlettel hogy tudok több lehetőséget megadni?

pl =IF(C4="A",;3)
ez így tökéletesen műkődik,de hogyan tudok mellé csatolni más lehetőséget is,pl nem csak akkor lesz 3 ha c4=A ha nem c4="A" és "B" és "C" akkor ;3.ha c4="D","E";akkor;4,c4="F","G",akkor =;5. Ezt meglehet oldani egy képletbe és egy cellába beépíteni?

Delila10 Creative Commons License 2024.01.28 0 0 37809

Szia! Esetleg:

Private Sub CheckBox1_Click()

    If CheckBox1 Then

        CheckBox1.BackColor = &HFF0000

    Else

        CheckBox1.BackColor = &HE0E0E0

    End If

End Sub

 

Private Sub CheckBox2_Click()

    If CheckBox2 Then

        CheckBox2.BackColor = &HFF0000

    Else

        CheckBox2.BackColor = &HE0E0E0

    End If

End Sub

Előzmény: MM10 (37808)
MM10 Creative Commons License 2024.01.27 0 0 37808

Sziasztok. Az lenne a kérdésem hogy lehetséges e egy cellán belül több jelölőnégyzetet berakni,és hogy ezeket a jelölönégyzeteket színezni valamilyen módon? Arra gondolo,hogy pl a négyzetet kipipálás helyett beszínezni különböző színekre

Fferenc50 Creative Commons License 2024.01.26 0 0 37807

Szia!

Makróból és beállításból szerintem nem.

Viszont a Fájlkezelőben ráállsz - jobb egérgomb - Tulajdonságok - Biztonság - A tiltás feloldása négyzetet bepipálod -- OK. Ezt természetesen a felhasználónál kell megtenni, ami lehet, hogy bonyolultabb lesz neki, mint engedélyezni a makrókat a kérdés után.

Ha vannak/voltak adatkapcsolatok az eredeti fájlban és nem szeretnéd a másolatban, akkor mentés előtt a kapcsolatokat törölni kell, pl.

Do While Activeworkbook.Connections.Count > 0:Activeworkbook.Connections(1).Delete:Loop

Üdv.

Előzmény: pimre (37806)
pimre Creative Commons License 2024.01.26 0 0 37806

Makróval megnyitok egy makrókat tartalmazó fájlt, és a átmásoltatom más néven más helyre, majd egy-két módosítás után mentem. Megoldható-e programból, hogy az új fájl első megnyitásakor ne figyelmeztessen a makrók letiltására, és ne kérje a felhasználótól az engedélyezést, hanem tekintse úgy, hogy az már megtörtént?

proszim Creative Commons License 2024.01.25 0 0 37805

Köszönöm.

Előzmény: Delila10 (37801)
Delila10 Creative Commons License 2024.01.24 0 0 37804

 

Szívesen. :)

Előzmény: Agko (37803)
Agko Creative Commons License 2024.01.24 0 0 37803

Nagyon köszönöm a segítségedet, így már tökéletes!

Előzmény: Delila10 (37793)
Delila10 Creative Commons License 2024.01.23 0 0 37802

A diagramcímre kattintva a szerkesztőlécen beírod: =B1

Előzmény: Delila10 (37801)
Delila10 Creative Commons License 2024.01.23 0 0 37801

Kijelölöd az A2:F14 tartományt (címsortól decemberig), a Ctrl gombot nyomva tartva kijelölöd a C2:C14, E2:E14, és G2:G14 tartományokat. Ezzel a % oszlopokat kivetted a kijelölésből.

Beszúrás, diagram, oszlopdiagram.

Rákattintasz a legmagasabb oszlopra. Az első kattintásra az összes hónap max oszlopai lesznek kijelölve. Még egy klikk az oszlopon, akkor már csak a maximumot tartalmazó oszlop van kijelölve, majd jobb klikk, adatfelirat hozzáadása.

 

Előzmény: proszim (37799)

Ha kedveled azért, ha nem azért nyomj egy lájkot a Fórumért!