- Megjelentek az első HMD okostelefonok, ezek a magyar áraik
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
- Itt az első kép a 2024-es Nokia 3210-ről
- Készülőben a Xiaomi 2021-es csúcsmodelljeinek HyperOS frissítése
- Redmi Note 13 Pro+ - a fejlődés íve
- Samsung Galaxy A54 - türelemjáték
- Yettel topik
- Oppo Find X5 Pro - megtalálták
- iPhone topik
- Honor Magic6 Pro - kör közepén számok
Hirdetés
-
Új Beats fej- és fülhallgatók jelentek meg
ma Frissítette a Solo termékcsaládot az Apple házi audiomárkája.
-
Kicsit extrémre sikerült a Hyte belépője a készre szerelt vízhűtések világába
ph A cég megoldása centralizált vezérelhetőséggel, masszív radiátorral és robusztus ventilátorokkal igyekszik vásárlásra csábítani.
-
Konzolokra is megjelenik a Fera: The Sundered Tribe
gp A kooperatív szörnyvadászós játékhoz a minap egy friss trailert kaptunk.
-
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
-
fjns
lelkes újonc
válasz Delila_1 #49550 üzenetére
Szia Delila!
Úgy érzem, félreértetted az előző bejegyzésemet. Az általad #33224-ben idézett szöveg alapján teljesen egyértelmű, hogy a szintén #33224-ben lévő link a szerző feltöltése volt, ráadásul ez egy szuper anyag lehetett a könyv mellett megtalálható egyéb kiegészítésekkel együtt. Troy jelezte, hogy sajnos az a link már jelenleg nem működik, és helyette megtaláltam másik helyen Troy számára Kovalcsik Géza könyvét. Az általam megadott linkre vonatkozott, hogy valószínűleg ezt nem a szerző tette fel, hanem valaki beszkennelte a könyvet, és ily módon osztotta meg másokkal is...
Üdv, János -
MasterMark
titán
Üdv,
Van arra jó mód vba scriptből, hogy adott cellában lévő képletben lévő más cellahivatkozásokat bővítsek?
Hozzáadok egy új sort scriptből, de a képletek nem frissülnek rá, hogy hozzávegyék, ezt szeretném megoldani.
Köszi.
Switch Tax
-
Delila_1
Topikgazda
válasz MasterMark #49555 üzenetére
Nem szükséges makró. Formázd az adataidat táblázatként.
Vegyük, hogy a B oszlopban számadatok vannak, az oszlop címe Összeg.
A következő (C) oszlopban a B oszlop értékeit fel akarod szorozni 3-mal.
A C2 képlete =[@Összeg]*3
Amint bővíted a táblázatodat, a C oszlop képlete automatikusan beíródik az új sorba.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
MasterMark
titán
válasz Delila_1 #49556 üzenetére
Van vagy 300 ilyen sor amit módosítani kéne, soronként 6 érték +2 még külön. Nem fogom kézzel csinálni.
A gond az hogy be van fixálva mondjuk A1:A10 közé, én hozzáadok egy A11 sort, az összes képletet át kéne írnom hogy benne legyen ez az új sor is.
Biztos meg tudnám csinálni mindenféle string replace meg stringben keressésel, meg regexelni a számokra, aztán a számot növelni egyel, aztán újra összerakni a képletet és visszaírni a cellába, de reméltem hogy erre van valami jobb módszer.
[ Szerkesztve ]
Switch Tax
-
Fferi50
őstag
válasz MasterMark #49557 üzenetére
Szia!
Ha A1:A10 esetén plusz sort szeretnél hozzáadni, akkor ne A11-be írd az új értékeket, hanem szúrj be egy sort a 10 sor elé. Az így hozzáadott sor miatt automatikusan módosul az A1:A10 -re hivatkozó képlet A1:A11-re.
Talán tudod használni ezt (is).
Üdv. -
Delila_1
Topikgazda
válasz MasterMark #49561 üzenetére
A kulcs a táblázatkénti formázás.
Az első képlet beírása után az összes többi sorban is megjelenik a képlet, sorhelyesen.
Új sor bevitelekor ott is szerepel a képlet.[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
lappy
őstag
válasz MasterMark #49561 üzenetére
Akkor konvertald át a hivatkozást majd beszúrsz egy sort es visszalakítod
Bámulatos hol tart már a tudomány!
-
Fferi50
őstag
válasz MasterMark #49563 üzenetére
Szia!
Irónia on:
Esetleg kiadhatnád valakinek, aki jó pénzért biztosan szívesen megcsinálja az átalakításokat
Irónia off
Talán meg lehetne beszélni a forrás előállítójával, hogy komfortosabb formában adja meg számodra az adatokat.
Egyébként pedig makró a legegyszerűbb megoldás, lehet paraméterezni is.
Ha felteszel valahova egy mintát - valós szerkezettel, légből kapott adatokkal - akkor biztosan lesz itt valaki, aki csinál egy használható makrót rá.
Sajnos nem vagyunk (még) gondolatolvasók.
Üdv.
Üdv. -
Mutt
aktív tag
válasz MasterMark #49563 üzenetére
Szia,
Egy próba fájlon próbáld ki ezt a makrót.
Csak pontos egyezés esetén cseréli a képletben az első találatot (Count:=1 -et törölve ez a korlátozás megszűnik) pontossan arra amit megadtál.Sub UpdateRangeInFormulas()
Dim ws As Worksheet
Dim rng As Range
Dim rngFormulas As Range
Dim mit As String
Dim mire As String
Dim keplet As String
mit = Application.InputBox(Prompt:="Mit cseréljünk?", Title:="Keresendõ", Default:="A1:A10", Type:=2)
mire = Application.InputBox(Prompt:="Mire cseréljük?", Title:="Új érték", Default:="A1:A11", Type:=2)
For Each ws In ThisWorkbook.Worksheets
Set rngFormulas = Selection.SpecialCells(xlCellTypeFormulas, 23)
For Each rng In rngFormulas
keplet = rng.Formula2
If InStr(1, keplet, mit) > 0 Then
rng.Formula2 = Replace(keplet, mit, mire, Count:=1)
End If
Next rng
Next ws
End Subüdv
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
-
MasterMark
titán
válasz Fferi50 #49565 üzenetére
Iránymutatásért jöttem, nem veletek megcsináltatni, vagy pénzért mással.
Scriptelni tudok, viszont az excel sajátosságait nem ismerem. Olyanokat nem szeretnék megírni amire már gyárilag is van megoldás, ezért előszőr itt megkérdeztem mielőtt elkezdek írni minden hülyeséget.
Bocsmá hogy megkérdeztem.
[ Szerkesztve ]
Switch Tax
-
Fferi50
őstag
válasz MasterMark #49567 üzenetére
Szia!
Ez a mondat:
"Miegegyszer mondom, hogy nem fogom kezzel atalligtani egyesevel. "
kiakasztott egy kicsit.
Próbáltunk ötleteket adni, de a probléma pontosabb ismerete nélkül nehéz eltalálni, mit is szeretnél tkp.
Ezért javasoltam a minta fájl közzétételét.
És sajnos néha nincs más, mint kézzel átírni (mert még makrón sem érdemes gondolkodni), a makróhoz pedig kellenek az infók.
Remélem, sikerül megoldanod a problémát.
Üdv. -
MasterMark
titán
válasz Fferi50 #49568 üzenetére
A kérdés az, hogy hogy tudok beletenni egy már meglévő képlet mögé egy kiegészítést mégpedig úgy hogy én mondom meg hogy mi legyen benne.
Azaz ami konkrétan kéne a mostani VBA scriptembe:
-Cellába konkatenálás, de úgy hogy formula maradjon.
-Változó alapján az új sor cellájának címének összerakása (offsetelni tudok jelenleg, azt nem tudom utána a címet hogy kérem le a jó formátumban)Utoljára mondom, hogy nem fogom kézzel átírni, mert scriptből is biztosan megoldható, csak nem ismerem az eszközöket hozzá, és googlén sem találom amit szeretnék.
Esetleg amit írtak a többiek hogy levenni a fixelést róla az talán segíthet, de szerintem ez túl bonyolult hogy magától kitalálja.
A képlet:
=HA(D10=0;0;$C10-$B10)+HA(D11=0;0;$C11-$B11)+HA(D12=0;0;$C12-$B12)+HA(D13=0;0;$C13-$B13)+HA(D14=0;0;$C14-$B14)+HA(D15=0;0;$C15-$B15)+HA(D16=0;0;$C16-$B16)+HA(D17=0;0;$C17-$B17)+HA(D18=0;0;$C18-$B18)+HA(D19=0;0;$C19-$B19)Amit hozzá kéne adni: +HA(D20=0;0;$C20-$B20)** Jobban megnézve igazából a fix oszlop az indokolt, de mégsem találja ki az excel magától ha beteszek egy új sort.
Ha fölé szúrom be akkor ez lesz a vége:
...$C16-$B16)+HA(D17=0;0;$C17-$B17)+HA(D18=0;0;$C18-$B18)+HA(D20=0;0;$C20-$B20)Az új 19-es sor kimarad. Azt kéne hozzáadnom, ennyi a feladat.
**szerk.: Nyilván a 19-es kell ha fölé szúrom be, eddig alá tettem, de igazából mindegy.
Amúgy nem tudom miért akasztott ki az hogy nem akarom kézzel állítgatni. Nem fogok órákat ezzel eltölteni, mire mindenhol megcsinálom. Inkább töltöm azzal az időt, hogy scriptelve kitaláljam.
[ Szerkesztve ]
Switch Tax
-
lappy
őstag
-
MasterMark
titán
Köszi, tökéletes.
Ez lett belőle:
For Offset = 3 To 7
Formula = Loc.Resize(1).Offset(0,Offset).Formula
ExpArray = Split(Formula, "+")
Exprr = ExpArray(UBound(ExpArray))
Exprr = Replace(Exprr, CStr(Loc.Row - 1), CStr(Loc.Row - 2))
Loc.Resize(1).Offset(0,Offset) = Formula & "+" & Exprr
Next OffsetSwitch Tax
-
classic B
aktív tag
Sziasztok!
Exportáltam egy lekérdezést, ami CSV-ben jött le (azóta átmentettem xlsx-be). Van egy TAJ számos oszlopom, ami általános típusú mező, és a 0-val kezdődő TAJ számoknál nincs ott az elején a 0. Ez így természetesen nem jó. Milyen megoldás létezik, hogy 0-val kezdődjenek azok a sorok? Egyesével eléírogatni nem opció.
Köszönöm előre is. -
spe88
senior tag
válasz Delila_1 #49576 üzenetére
Köszi, de az eredeti táblában az adatok jóval bonyolultabban helyezkednek el, a minta sem olyan egyszerű (hol több szó, hol egy tb.)
Szóval ez jóval komplikáltabb annál, hogy az Excel automatikusan észlelje.Csak az egyszerűség kedvéért kreáltam úgy a képet.
Kipróbáltam amúgy, de sok hibásan jelenik meg, illetve üresen marad stb.
Spóroljunk! Kerül, amibe kerül!
-
spe88
senior tag
Közben megoldottam de kellett hozzá 200+ segédoszlop, nem túl elegáns, de nekem csak így ment
Spóroljunk! Kerül, amibe kerül!
-
SwissAirplan
aktív tag
Sziasztok! Igaz nem Excel, hanem Google táblázat, de remélem ebbe is tudtok segíteni.
ha minden igaz akkor a LOOKUP függvényt keresem... mégpedig a lényeg az lenne hogy mondjuk a d10-es cellába meg akarom jeleníteni a "B" oszlopba irt utolsó adatot.
B1:üres B2:kapacitás B3:2002 B4:1987 B5:1982
És a lényeg az lenne hogy ha írok be a B6-ba akkor a D10-esen az jelenjen meg, ha utána írok a B7 be akkor pedig az... és ez igy szépen sorba.
A Példa kedvéért az értékeket mondjuk B3 tól B50 ig lehet beirni
Köszönöm -
lappy
őstag
válasz SwissAirplan #49582 üzenetére
=INDEX(A:A,MATCH(143^143,A:A))
Bámulatos hol tart már a tudomány!
-
SwissAirplan
aktív tag
Nem tudom miért nem engedi szerkeszteni!.. ugyhogy sajnos új hsz-t kell irjak. itt van megosztva a táblázat:
-
lappy
őstag
-
Delila_1
Topikgazda
válasz SwissAirplan #49586 üzenetére
A G3 cella képlete legyen
=INDIREKT("B"&HOL.VAN(1000000;B:B))
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
dellfanboy
senior tag
tudtok olyan hirlevelet, ami excel feladatokat kuld gyakorlas cellal? vagy vmi jo YT csatorna?/blog? kezdem azt eszrevenni, hogy altalaban ugyanazt a 10-20 fv-t hasznalom es nem lenne rosz boviteni a tudasomat.
eladó dolgok:mondd az árát és vidd http://hardverapro.hu/tag/dellfanboy#aprohirdetesei
-
angelus8925
tag
Sziasztok,
Google táblázatot exportáltam XLSX formátumba, és Microsoft 365-el (magyar felhasználói felület) szeretnénk majd tovább használni.
Két kérdésem is lenne:
Az első, hogy van benne egy oszlop, ami Google Táblázatokban jelölőnégyzet volt, itt most Hamis- vagy Igaz-al jelenik meg, de szerencsére a Megjegyzések átjöttek. Hogyan tudnék újra az egész oszlopból jelölőnégyzeteket csinálni, aminek amúgy csak esztétikai szerepe van, meg max szűrésnél jön jól úgy, hogy a némelyiknél beírt megjegyzések is megmaradjanak
A másik, hogy hogyan lehet formázni több száz sort úgy, hogy mondjuk normál sor, majd szürke, normál, szürke háttérszín váltogassa egymást, anélkül, hogy a már áthozott egyéb formázásokat ne töröljem (pl. pirossal jelölt összeg). Illetve néhány oszlopnak saját formátuma is megmaradjon, pl. szoveg formázás, összeg, telefon. És mindez egy új sor letrehozásával öröklődjön tovább, és amúgy maradjon formázható (pl. piros rublika, ha azzal még további feladat lenne) .
Előre is köszi a hatalmas segítséget
[ Szerkesztve ]
-
Luckyyy23
friss újonc
Sziasztok a segítségeteket szeretném kérni. Azt szeretném megcsinálni hogy, van az „A” oszlopom „B” oszlop értékkel és szeretném a „D” oszlopot „E” oszlopértékkel berendezni az „A” oszlop azonos sorai mellé, és ami nincs az „A” oszlopban csak a „D” oszlopban az kerüljön alulra. (kép csatolva)
-
lappy
őstag
válasz angelus8925 #49590 üzenetére
a másodikra:
beszúrás - táblázat - kijelölöd a táblázatot - fejlécsor eltávolítás ha nem kell - táblázat stílusaBámulatos hol tart már a tudomány!
Új hozzászólás Aktív témák
- Kertészet, mezőgazdaság topik
- Kihívás a középkategóriában: teszten a Radeon RX 7600 XT
- Tőzsde és gazdaság
- Villanyszerelés
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Viccrovat
- Gaming notebook topik
- Székesfehérvár és környéke adok-veszek-beszélgetek
- Elemlámpa, zseblámpa
- Azonnali VGA-s kérdések órája
- További aktív témák...
- Game Pass Ultimate előfizetések 1 - 25 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN!
- Windows, Office licencek a legolcsóbban, egyenesen a Microsoft-tól - 2990 Ft-tól!
- Canva Pro előfizetés - 1 éves
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! LEGOLCSÓBB! Automatikus 0-24
- Adobe Creative Cloud - 2024. 04. 05 - 2025. 04. 05-ig