-
Fototrend
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
tonermagus
#30966
üzenetére
Szia!
Örülök, hogy sikerült!
Üdv.
-
Fferi50
Topikgazda
válasz
tonermagus
#30963
üzenetére
Szia!
Az első képedből az látszik, hogy nincsenek ott a felkiáltójelek a szövegben! A képlettel módosított szöveget kell értékként beilleszteni egy új oszlopba és azt tudod szétszedni, nem az eredetit.
Üdv.
-
Fferi50
Topikgazda
válasz
tonermagus
#30960
üzenetére
Szia!
Csak az első oszlopot kell kijelölni, a többit "magától" kitölti.
Üdv.
-
Fferi50
Topikgazda
válasz
tonermagus
#30955
üzenetére
Szia!
Sajnos az derült ki, hogy az elválasztó nem egy, hanem két karakter (soremelés kocsivissza - CRLF, aminek a kódja 13 és 10 ebben a sorrendben), ezért egy kis trükköt kell alkalmazni:
Az L2 cellába írd be az alábbi képletet:
=HELYETTE(K2;KARAKTER(13)&KARAKTER(10);"!")A felkiáltójel helyett írhatsz pontosvesszőt is akár, de nekem most ez esett kézre.
A képletet végighúzod az oszlopon.
Ezután kijelölöd az egész oszlopot, másolás - irányított beillesztés értéket.Ez a halmaz már alkalmas az adatok - szövegből oszlopok végrehajtására, az elválasztó karakter egyéniben a felkiáltójel, illetve a pontosvesszőt csak be kell jelölnöd.
Üdv.
-
Fferi50
Topikgazda
válasz
tonermagus
#30950
üzenetére
Szia!
Mondanám, hogy ennek nem lenne szabad megtörténnie ... de nyilván megtörtént.
Pár soros mintát tégy fel légy szíves valahova (pl. data.hu), ahonnan elérhető és megnézhető.Üdv.
-
Fferi50
Topikgazda
válasz
Exportlaptop
#30942
üzenetére
Szia!
Semmi akadálya annak, hogy a képeket egy külön munkalapra betedd (Beszúrás - kép), majd erre állítsd be a hivatkozást, viszont azt tudni kell, hogy ekkor a fájlod mérete "rettenetesen" megnő, hiszen fizikailag tartalmazza a képek adatait, ami nem kevés. Ez pedig a megnyitásnál hosszadalmas.
Ha viszont ugyanabban a mappában vannak a képek is, mint az excel fájl maga, akkor gyors a megnyitás és meg is találja, ha nem abszolut hivatkozást használsz. Ekkor az egész mappát kell átadni a másik félnek.Üdv.
-
Fferi50
Topikgazda
válasz
Exportlaptop
#30938
üzenetére
Szia!
Szerintem az a probléma, hogy a képek nincsenek benne magában az excel fájlban, csak a rájuk mutató hivatkozás - ami viszont nyilván a te gépedre mutat. Ezért a külön képfájlt is el kellene küldeni az excel mellé ugyanabba a könyvtárba, továbbá a hivatkozást úgy lenne jó megcsinálni, hogy azonos könyvtárban van a két fájl, akkor nem kell a teljes név, elég a rövid név hozzá.
Üdv.
-
Fferi50
Topikgazda
válasz
tonermagus
#30937
üzenetére
Szia!
Adatok - szövegből oszlopok - tagolt - szöveg - a következő panelen határoló jelnél egyéb - ide beteszed a soremelés karaktert :Alt + numerikus billentyűzeten 10 vagy 13 ezt próbáld ki, hogy melyik műxik. Úgy tudhatod meg legegyszerűbben, milyen számot kell bebillentyűzni, ha a mellette levő cellába beírod ezt a képletet:
=KÓD(KÖZÉP(E3;2;1))
Ezt kell a numerikus billentyűzeten megadni határoló karakternek.
Utána már csak arra kell vigyáznod, hogy ne írd felül az eredeti cellát.Üdv.
-
Fferi50
Topikgazda
válasz
PistiSan
#30899
üzenetére
Szia!
Bár nem tudom, mit jelent, hogy más képleteket is szeretnél alkalmazni, de hidd el, a legegyszerűbb a szövegből oszlopok, ahol meg tudod adni a határoló karaktert is, bármit választhatsz.
De képlettel az alábbiak szerint lehet megoldani szerintem:
Az A1 cellában van a szétbontandó szöveg.
A B1 cellába beírod a következő képletet:=KÖZÉP(A1;SZÖVEG.KERES(",";A1)+1;HOSSZ(A1))
Ezt végihúzod az első soron, egész addig, amíg az eredmény egy hiba nem lesz.
Ezután az A2 cellába beírod ezt a képletet:=HAHIBA(BAL(A1;SZÖVEG.KERES(",";A1)-1);A1)
Addig húzod jobbra, amíg van fölötte szöveg a cellában.
Üdv.
-
Fferi50
Topikgazda
válasz
the radish
#30897
üzenetére
Szia!
Este már nem jutottam hozzá a géphez/internethez.
Nem szeretnélek elkeseríteni, de nálam szépen lefut és nyomtat - sima doksit és körlevelet is, ha a körlevelesbe beleteszem a megfelelő sort. A hozzászólásodból másoltam ki direkt a makrót és egyáltalán nem panaszkodott (persze fájlneveket átcseréltem...).
Nálam 2010-es Office van fent, nem tudom Nálad mi fut.
Nézd meg légy szíves az immediate ablakban a wdPrintFromTo értékét. Ha nem 3, akkor a változó helyett lsz. írd be a 3-as számot, idézőjelek nélkül.
Korábbi verziókban lehet, hogy nem így kell megadni, akkor viszont a word help tud segíteni. Ha mégsem megy/nem találod a megoldást, menjünk át privibe.Üdv.
-
Fferi50
Topikgazda
válasz
the radish
#30895
üzenetére
Szia!
Milyen hibaüzenettel akad el a makró?
Azt gondolom, hogy az objword.objdoc hivatkozás lesz az igazi, az is elképzelhető, hogy az activewindow kihagyható/kihagyandó belőle.Üdv.
-
Fferi50
Topikgazda
válasz
the radish
#30889
üzenetére
Szia!
Szerintem az a gond, hogy nem a word objektumra hivatkozol.
Próbáld így lsz.
objDoc.ActiveWindow.PrintOut _
Range:=wdPrintFromTo, From:="1", To:="3"Mivel két alkalmazás több különböző objektuma van benn, ezért pontosan meg kell mondani, melyiknek szánod a parancsot.
Üdv.
-
Fferi50
Topikgazda
válasz
the radish
#30876
üzenetére
Szia!
Van egy olyan paramétere a PrintOut- ami megmondja, hogy mit nyomtasson ki, ez a Range.
Pl: ActiveDocument.ActiveWindow.PrintOut _
Range:=wdPrintFromTo, From:="1", To:="3"
This example prints the first three pages of the document in the active window.Üdv.
-
Fferi50
Topikgazda
válasz
the radish
#30858
üzenetére
Szia!
Örülök, hogy sikerült adaptálnod. Pár éve egy másik fórumon volt egy kis vitánk, hogyan lehet excel - word körlevél együttműködést "optimalizálni". A VBA help alapján - no meg a Word makrórögzítés segítségével - akkor sikerült összeraknom ezt a viszonylag egyszerű megoldást. Az akkor munkafüzetet már nem találtam, de a helpek a "helyükön voltak" és az "emlékfoszlányok" is segítettek.
Remélem, nem lesz a későbbiekben sem probléma.Üdv.
-
Fferi50
Topikgazda
válasz
the radish
#30821
üzenetére
Szia!
Az alábbi makrót idomítsd a saját fájljaidhoz. A makró maga egy excel fájlban van.
Sub wordkorlevel()
Dim wd As Object
Dim wddoc As Object
Set wd = CreateObject("Word.Application") ' megnyitja a word alkalmazást
wd.Visible = True 'láthatóvá teszi
Set wddoc = wd.documents.Open("C:\Users\fferi\Documents\Körlevél.docx") 'megnyitja a körlevelet
wddoc.mailmerge.opendatasource Name:="C:\Users\fferi\Documents\Korleveles1.xlsx", linktosource:=True, sqlstatement:="SELECT * FROM `Munka1$`" ' összekapcsolja a forrással
wddoc.Activate ' csak azért, hogy lásd
wddoc.mailmerge.ViewMailMergeFieldCodes = False ' az adatokat mutatja és nem a kódokat
Stop
wddoc.Close False 'mentés nélkül bezárja
wd.Quit ' kilép a word alkalmazásból
End SubA kód egy excel munkafüzet normál moduljában van (de lehet a körlevél forrás excel fájljában is, csak akkor menteni xlsm formában kell!!
Ezen kívül a VBA Tools References menüjében be kell pipálni a megfelelő Word verzió könyvtárát!Üdv.
-
Fferi50
Topikgazda
válasz
Gaagaat
#30839
üzenetére
Szia!
Tudomásom szerint ilyen beépített excel függvény nincs jelenleg (2010-es verzióig biztosan nem volt), ezért csak úgynevezett felhasználói függvény (magyarul makró) jöhet szóba, ami egyébként nem túl bonyolultan megoldható de engedélyezni kell hozzá a makróhasználatot.
Üdv.
-
Fferi50
Topikgazda
válasz
trippla
#30752
üzenetére
Szia!
Kissé kuszának találom a kérdést. Két számot szeretnél lapfülönként összeszorozni, majd lapfülenként összeadni a szorzatot? Akkor itt nem egyszer két szám összeszorzásáról van szó lapfülenként.
"Fülenként egy számot össze tudok adatni" Ezt szintén nem értem, egy számot mivel adatsz össze.
Egyébként az egy szám helyére beírod az összeszorzás képletét a megfelelő cellákkal szerintem.
Esetleg arról van szó, hogy a 100 lapfülön levő egy-egy számot adod össze valahova?Segíts egy kicsit légy szíves a kérdés pontosításával.
(Ha minden lapon ugyanabban a két cellában levő számokatt szeretnéd összeszorozni egy adott cellába, akkor egyszerű a helyzet. Kijelölöd mind a 100 munkalapot alul a fülön - csoportos kijelölés --, majd az éppen láthatóra beírod a képletet pl. =a2*b2 a c2 cellába. Minden kijelölt lapon ott lesz a képlet. De gyanítom, nem ez a helyzet.)
Üdv.
-
Fferi50
Topikgazda
-
Fferi50
Topikgazda
válasz
Mittu88
#30642
üzenetére
Szia!
Úgy gondolom, a nyitas makró tartalmát az ujverzio.xlsm Workbook_open eseményébe kellene beletenned, így az a fájl megnyitásakor lefutna.
(Melyik excel verzióról van szó?)
De akkor sem tartom igazán szerencsésnek ezt a megoldást, mert a füzeteken keresztül-kasul ugráló makrók tudnak ám problémát csinálni.
Én egy külön fájlba tenném ezt a verzió kezelést, ami megnézné, hogy van-e új verzió, ha igen, végrehajtja a kimásolásokat és utána akár be is zárhatja magát.Üdv.
-
Fferi50
Topikgazda
válasz
alfa20
#30535
üzenetére
Szia!
1. "Dim WBmunka1 as Workbook
set WBmunka1 = Workbooks("vmi.xlsx').Sheets("zöld")"
Ez így azonnali hibát eredményez, mert a munkafüzetnek definiált változóba munkalapot szeretnél tenni!2.Range("P2") = _
"=IFERROR(VLOOKUP(RC[-11],'[" & vmi_mf & "]" & vmi_ml & "'!C1:C21,2,0),"""")"
helyett Range("P2").formula=
vmi_mf helyett pedig WBmunka1.name a helyes a képletben (ámbár az 1. pontban írtak szerint ez így nem működik).
Üdv. -
Fferi50
Topikgazda
válasz
alevan
#30533
üzenetére
Szia!
Az FKERES függvény lesz a megoldás. Pl
első "adatbázis"
D1 cella képlete: =Fkeres($A1;"Második adatbázis $A$1:$C$20000;2;0)
E1 cella képlete: =Fkeres($A1;"Második adatbázis $A$1:$C$20000;3;0)(Kis gonoszkodás - nem két adatbázisod van, hanem 2 táblád - 2 külön excel fájlban vagy egy fájlban két munkalapon).
Üdv.
-
Fferi50
Topikgazda
válasz
proradeon
#30497
üzenetére
Szia!
Sem makró, sem függvény...
Megcsinálhatod a Munka1 munkalapon is - de ha ahhoz nem szeretnél nyúlni, akkor a Munka2-n. Van erre az Excelnek pár jó eszköze.
Pl. Kimutatás - ezt teheted a Munka2 munkalapra is. Szerintem ez a legegyszerűbb.
Vagy az Adatok menüpontjaival: Sorbarendezés Gyártó majd Tipus szerint - utána részösszegek Gyártóra - részösszegek következő lépésben Tipusra - a korábbi részösszeg meghagyásával.
Ennek is kb. az az eredménye, amit látni szeretnél - kicsit többet kell vele dolgozni, mint a kimutatással....Üdv.
-
Fferi50
Topikgazda
válasz
bteebi
#30495
üzenetére
Szia!
Az utvonal nevű változódat Public ként kell definiálnod a modul elején.
Public utvonal As String
Ezután az OptionButtonokhoz tartozó eljárásokban nem szabad Dim -mel újradefiniálni az útvonalat, azt a sort felejtsd el!
Az utvonal értéke mindig az lesz, amit a legutolsó OptionButtonos eljárás megadott neki.Javaslom a VBA helpben az Understanding the Lifetime of Variables témakört nézd át hozzá még, illetve a Public utasításhoz fűzött példákat.
Üdv.
-
Fferi50
Topikgazda
válasz
PistiSan
#30493
üzenetére
Szia!
Nem látszik, hogy a tartomány, amire érvényes a formázás, hogyan van megadva.
Elvileg azokat a tételeket színezi be, amelyeknek van az X oszlopban is és a W oszlopban is párja. Viszont, ha egynek is közüle nincs párja, akkor egyiket sem színezi be.
Esetleg javaslok olyat, hogy egy segédoszlopba vidd be a következő képletet:
=MARADÉK(DARABTELI($W$5:$X$3000;$W5);2)=1Utána erre az oszlopra tegyél feltételes formázást =IGAZ képlettel.
A képlet azt mutatja, hogy az W oszlopban levő értékeknek van-e mindnek párja az X oszlopban. Ha nincs, akkor igaz lesz a képlet értéke.
Ugyanezt egy másik segédoszlopon a "biztonság kedvéért" megcsinálhatod
=MARADÉK(DARABTELI($W$5:$X$3000;$X5);2)=1 képlettel és feltételes formázással ugyanúgy.De akár az is elég lehet, ha a segédoszlopokba a DARABTELI függvénnyel beíratod, hogy az adott tételből hány db van a két oszlopban (az előző két képlet belső függvénye). (Ez sokkal egyszerűbb a kimutatásnál.)
Üdv.
-
Fferi50
Topikgazda
válasz
PistiSan
#30485
üzenetére
Szia!
Feltételes formázással megoldható szerintem a probléma. Kijelölöd a W és X oszlop adattartalmát.
Kezdőlap - feltételes formázás - új szabály - cellák kijelölése képlettel:
A képlet =DARABTELI($W5:$W3000;W5)=DARABTELI($X5:$X3000;W5)Beállítod a kitöltőszínt zöldre. Hatókör az adattartományod címét írod be.
Ez minden olyan tételt zöldre színez, ahol a W oszlopban ugyanannyiszor fordul elő, mint az X oszlopban.
Ha páratlan az előfordulás, az összes olyan szám színtelen marad, azt egyedileg kell nézni.
Üdv.
-
Fferi50
Topikgazda
válasz
Kal-El
#30471
üzenetére
Szia!
Még egy ötlet: Ha a cellához megjegyzést fűzöl és abba beírod a módosított értéket makróval, a megjegyzés méretét cellához igazítod és "eltakarod" vele a cellát és beállítod a megjegyzés és jelölő mindig látható, akkor általában csak a megjegyzést fogja látni a felhasználó. Igaz, ha rákattint, akkor a megjegyzés szerkeszthető lesz.
Másik lehetőség, hogy a cellában levő számot "kitakarod" - vagyis háttér színűre változtatod, a megjegyzésnél csak a jelölő megjelenítését. Ebben az esetben a cella fölé érve a cursornál megjelenik a megjegyzésben levő érték.Üdv.
-
Fferi50
Topikgazda
válasz
m.zmrzlina
#30435
üzenetére
Szia!
Szerintem az Fkeres még egyszerűbb, ha a tartományban keres (4. paraméter) igazra van állítva, akkor ugyanezt az eredményt adja egy függvénnyel.
Üdv.
-
Fferi50
Topikgazda
válasz
Delila_1
#30282
üzenetére
Szia!
Amit gyanítottam, az bekövetkezett.... Szerintem egy sima kimutatással meg lehet oldani a problémát, nem kell hozzá bűvészkedni az idővel és a napokkal:
A kimutatás értékmezőit óra szerint csoportosítani kell, majd kiválasztani a maximumot és beállítani az Eltérés az előzőhöz. Ennyi lenne szerintem.
Üdv.
-
Fferi50
Topikgazda
válasz
Stanlee
#30273
üzenetére
Szia!
Én úgy látom, az első oszlopon nincs mit elrontania, mert minden szám egyforma, így minden különbség is 0

Táblát feltölteni bármelyik oldalra lehet, amelyik nyilvános és hozzáférést enged - pl. google-drive, csak itt a hozzáféréssel bűvészkedned kell - én a data.hu oldalt szoktam használni.
Kicsit jobban megnézem még, de szerintem más valami képletre lenne szükség, most inkább nem rögtönöznék.
Üdv.
-
Fferi50
Topikgazda
válasz
Stanlee
#30266
üzenetére
Szia!
Nagyon gyanús nekem a HOL.VAN 3. paramétere.
A képlet első részében az 1 paraméter érték van, kivonandóban pedig a 0 paraméter érték. Ez utóbbi azt jelenti, hogy az első pontosan egyezőt fogja megkeresni, míg az 1 paraméter az első olyat, ami kisebb vagy egyenlő az adott értéknél. Mivel pedig több egyforma értéked van, ebből szép bonyodalmak jöhetnek össze szerintem.
Ha jól sejtem, akkor az előző mérés eredményétől való eltérést szeretnéd megkapni, ha rosszul gondolom, akkor segíts ki lsz. Lehet, nem is ez a jó út....
Szerintem ezt a táblát feltehetnéd "közösbe", a megoldandó feladat pontosításával, biztosan többre mennénk és nem kellene saját táblát csinálni hozzá
Üdv.
-
Fferi50
Topikgazda
válasz
Sir Pocok
#30257
üzenetére
Szia!
Az Fkeres függvény ad gyors megoldást.
Két oszlopban felviszed a táblázatot, első oszlopban a határ 0,20,33,49,100 (mert az 50 % már a felső kategória) akár abszolut számként, akár %-kal, attól függően, hogy milyen formában van a keresendő számod, a második oszlopba beírod a kategóriákat0 Egyéb rész.
20 Társult
33 Közös vezetésű
49 Leányvállalat
100Ezután a képlet =FKERES( A1;$D$1:$E$5;2;IGAZ), ahol A1-ben van a "tulajdonrész", D1:E5 a paraméter táblád.
Üdv.
-
Fferi50
Topikgazda
válasz
Morphy
#30215
üzenetére
Szia!
Azt jelenti, hogy az A1 cellához nem fűztél megjegyzést. Delila előző hozzászólása tartalmazza, hogy fűzz megjegyzést a cellához. Ezt meg kell tenned "kézzel" - továbbá a megjegyzés szöveg kitörlését is - , mielőtt a makró elindulna.
De ki is egészíthető a makró a következő sorral:Target.AddComment Text:=""
Ezt a kep= sor után kell beírni.Üdv.
-
Fferi50
Topikgazda
válasz
Adebayor
#30136
üzenetére
Szia!
Néha azért nem árt elolvasni, amit az excel képességeiről írnak.
A jelenség oka egyszerűen az, hogy a számokat az excel 15 jegy pontosságig tárolja, utána csak 0 következik.
Ha a teljes számsort szeretnéd a cellában látni, akkor formázd meg a cellát szövegként - vagy beíráskor legyen az első karakter egy aposztróf (ez ugyanazt jelenti).Üdv.
-
Fferi50
Topikgazda
válasz
fluxion
#30090
üzenetére
Szia!
40.000k sor nem sok egy kicsit?
Én azt tenném, hogy lemásolnám a munkalapot (jobb egérgomb a fülön, áthelyezés vagy másolás - legyen másolat) egy új füzetbe (gondolom a tábla alatt munkalapot értesz), majd a másolatból kitörölném azt az 50 oszlopot, amire nincs szükségem.
Üdv.
-
Fferi50
Topikgazda
Szia!
Ha egyébként nem kell azokat az eljárásokat megcsinálni bezáráskor, amiben az üzenet feldobó makrók vannak, akkor szerintem elég kikapcsolni az eseménykezelést az Application.Enableevents=False sorral a fájl bezárása előtt, utána pedig (ha szükség van rá) akkor az Application.Enableevents=True sor visszakapcsolja az eseménykezelést. (Csak a legvégén ne felejtsd el visszakapcsolni. :)
Üdv.
-
Fferi50
Topikgazda
válasz
DisRespect
#29947
üzenetére
-
Fferi50
Topikgazda
válasz
DisRespect
#29938
üzenetére
Szia!
Talán próbálkozhatnál a feltételes formázással. A hét napjait a Hét.napja (Weekday) függvény adja meg, ezt kell a feltételes formázásba bevinni. Cellák kijelölése képlettel lehetőséget kell választani.
Üdv.
-
Fferi50
Topikgazda
válasz
dellfanboy
#29935
üzenetére
Szia!
A végeredményben nem látom, hogy összegezve lennének az értékek. Ez nem kellene?
Egyébként javaslom a kimutatás készítését - szerintem az megoldja a kérdéseidet.
Üdv.
-
Fferi50
Topikgazda
válasz
firemanus82
#29928
üzenetére
Szia!
Gondolom, akkor a kiválasztott nevet valahova máshova beírod (képlettel v. makróval - ez utóbbi a jobb eset). Az adatérvényesítési listád pedig egy külön tartományban van. Az eredeti listádat másold le egy másik helyre.
Ebben az esetben egy kis makróval, ami a kiválasztáshoz kapcsolódik, kitörölheted a listából a kiválasztott nevet.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$H$1" Then
Application.EnableEvents = False
Range(Target.Validation.Formula1).Find(what:=Target, LookIn:=xlValues, lookat:=xlWhole).Delete shift:=xlUp
Application.EnableEvents = True
End If
End SubA fenti makró a H1 cellában levő érvényesítés listájából törli a kiválasztott elemet. Ha az érvényesítési listát a következő formában adod meg: =$A$1:$A40 - vagyis a sor száma nem abszolút módon van megadva - akkor az érvényesítési lista tartománya automatikusan módosul, nem marad benne üres sor.
Természetesen a fenti pár sort (3-5) beteheted abba a saját makróba, amelyik a kiválasztott adatot beírja a megfelelő hely(ek)re.
Üdv.
-
Fferi50
Topikgazda
válasz
PistiSan
#29835
üzenetére
Szia!
Ebben az esetben az INDEX függvényt kell kombinálnod a HOL.VAN függvénnyel:
A képlet pl. Munkalap1!B1 cellába:
=INDEX(Munkalap2!$A$1:$A$2000;HOL.VAN(Munkalap1!$A1;Munkalap2!$A$1:$A$2000;0)-1)
Ezután ezt kell végighúznod az oszlopon.
Fontos, hogy a keresési tartományok $-osan legyenek megadva.Ilyen esetekben az INDIREKT függvényt nem tartom igazán jónak, mert lassítja az excelt.
Üdv.
-
Fferi50
Topikgazda
válasz
MCGaiwer
#29723
üzenetére
Szia!
"Egy olyan kimutatást kellene csinálnom, ami gombnyomásra összesíti az adott ember egész éves munkanapjait, és mutatja, hogy bizonyos hónapokban mennyit volt távol."
Próbálkoztál már a kimutatással? Nagyon sokféle lehetőséget rejt magában. Excel verzió függő a varázsló, de mindegyikben van (legalábbis 2010-ig).
Oldal mezőnek (vagy szűrőnek) felvenném a dolgozók nevét tartalmazó oszlopot.
Oszlopcimke az év, a hónap és a nap.
Lehet, hogy előtte a "fejléc" sorokat 3 szintűvé kellene tenni az előzőek szerint.De ha felteszel valahova egy pár soros kitalált neveket tartalmazó táblát, biztosan lesz, aki gyakorlati példát is csinál számodra.
Üdv.
-
Fferi50
Topikgazda
válasz
bobsys
#29652
üzenetére
Szia!
'"akkor mikor mar szetszedtem az osszes raklapot akkor a kor fele ilyen a fele olyan, tehat 200 a teljes a kor"
Ez a természetes, hiszen az A1 celládban mindig 100 marad az érték, csak a B1 cellában változtatod...
Ahhoz, hogy mindig 100 maradjon az összeg, egy harmadik cellába (C1) a maradékot is be kell tenned (A1-B1), a kördiagramot pedig a B1-C1 cellákra kell csinálnod.Üdv.
-
Fferi50
Topikgazda
válasz
the radish
#29645
üzenetére
Szia!
=jobb("0" & Abs(A1);3)
Üdv.
-
-
Fferi50
Topikgazda
válasz
hengelhof
#29601
üzenetére
Szia!
Ha csak két 0 lehet előtte, próbáld meg az alábbi szövegfüggvény kombinációval:
=HA(BAL(A1;1)="0";HA(KÖZÉP(A1;2;1)="0";JOBB(A1;HOSSZ(A1)-2);JOBB(A1;HOSSZ(A1)-1));A1)Az eredeti szám legyen szövegformátum (mert egyébként már beírás után átalakítja tudományossá), a képlet eredménye mindig szöveg lesz.
A tudományos beállítás mellőzését sajnos nem tudom, hogyan lehet megoldani (ugyanez igaz az automatikus dátummá alakításra is ....

Üdv.
-
Fferi50
Topikgazda
válasz
poffsoft
#29574
üzenetére
Szia!
Lehet, hogy olyankor, amikor nem frissül az érték, ki van kapcsolva az automatikus számolás.
Másrészt:
Delila válaszában szerintem tulajdonképpen benne volt a 2. kérdésedre is a felelet. A függvényeidben használni kell az
Application.Volatile
metódust, ekkor a függvényértéket azonnal újraszámolja az excel automatikusan, amint az adott munkalapon egy cellának megváltozott az értéke.
Hátránya, ha sok volatile függvényed van, az bizony lassítja az excelt rendesen (cserébe az azonnali számolásért).Egyébként csak akkor számolódnak újra a függvények, ha valamelyik tényezőjük megváltozik - de ehhez is az automatikus számolásnak kell élnie.
Üdv.
-
Fferi50
Topikgazda
válasz
m.zmrzlina
#29470
üzenetére
Szia!
Mi lenne, ha a keresésnél kihagynád az első oszlop celláit. (Ez megoldható vba-ban offset metódus használatával, vagy a tartományt e nélkül definiálod - a tartomány előtt levő cellára is lehet hivatkozni (!) így pl. tartomány(xsor,0) a tartomány x-edik sorában a tartomány előtt levő cellát adja meg.)
Üdv.
-
Fferi50
Topikgazda
válasz
PETEE78
#29457
üzenetére
Szia!
A csillag karakterrel keresésben operálhatsz.
Próbáld meg a dir() függvénnyel megnézni, hogy milyen fájlok vannak a keresett helyen:
filename= dir("221_ALMA_20" & sdateform & "*.csv")
Ide beírhatod hozzá az elérési utat is, ha szükséges.
Ha filename="" akkor nem talált olyan fájlt, ami megfelelt a keresési feltételeknek - vagy nem abban a könyvtárban kerestél, amiben a fájl van, vagy egyáltalán nincs ilyen fájl.Utána a filename értékét - ha szükséges, kiegészítve az elérési úttal - már használhatod a megnyitáshoz, mert ott már nem lesznek benne csillag karakterek, hanem konkrét fájlnevet fog tartalmazni.
Üdv.
-
Fferi50
Topikgazda
válasz
m.zmrzlina
#29441
üzenetére
Szia!
"Csak akkor miért működik n+1-szer úgy is, hogy nincs kizárva a szöveges cella?" Ezt a kérdést szerintem itt nem fogjuk tudni megválaszolni. Én max arra tudok gondolni, hogy maga a keresési tartomány esetleg valamilyen ok miatt egy cellából áll és abban nem szám van."Először a int_Mincsom, int_Maxcsom változó tipusát állítottam Variantra de nem jutottam közelebb. A leálláskor is szám (1 és 9 ami reális) volt az értéke nem pedig hiba."
Csak az a kérdés, hogy a leállás melyik sorban volt, esetleg az előző értékeket láttad még az adott változókban. Nyilván ezt mostmár nehezen fogod tudni ismételten produkálni....Üdv.
-
Fferi50
Topikgazda
válasz
m.zmrzlina
#29439
üzenetére
Szia!
Az "Application.WorksheetFunction.Large((rng_Akioszt), 1)" eredménye hiba akkor, ha nem tudja az adott tartományon végrehajtani a műveletet. Mivel az int_Maxcsom tipusa integer, a hiba értékét nem kapja meg, ezért fut hibára.
Oka: lehetséges, hogy az rng_Akioszt tartomány nem kapott értéket, azaz Nothing az értéke,vagy nincsenek benne adatok. Tehát azt meg kellene nézni, mielőtt a műveleteket elindítod. Vagy
Másik megoldás, hogy a Maxcsom, Mincsom változódat Variant -nak deklarálod és a művelet után megnézed, hogy hiba-e az értéke.Üdv.
-
Fferi50
Topikgazda
válasz
m.zmrzlina
#29426
üzenetére
Szia!
A probléma igazából nem probléma (vs: az excelnek mindig igaza van
), szerintem abból adódik, hogy az rng_Tempcell.Row a cellának a munkalapon elfoglalt helyét adja vissza és nem az rng_Dkioszt tartományban elfoglalt helyét -> a két szám csak akkor ugyanaz, ha az rng_Dkioszt tartomány az első sortól kezdődik. Egyébként le kell vonni belőle a tartomány induló sorának számát.Ezen kívül van egy ilyen sorod:
If rng_Tempcell.Value = int_Csomag Then
Ami után jön a következő:
If rng_Tempcell.Value <> "" And rng_Akioszt.Cells(rng_Tempcell.Row, 1).Value = "" ThenSzerintem itt az első feltétel felesleges, hiszen az előző vizsgálatban már megállapítottad, hogy nem üres az rng_Tempcell.
Üdv.
-
Fferi50
Topikgazda
válasz
pirit28
#29304
üzenetére
Szia!
Ezt a makrót beteszed egy modul lapra (de akár az adott munkalap kódlapjára is teheted), majd elindítod. Persze tetszés szerint átnevezheted.
A makró végigmegy a C oszlopon az utolsó nem üres celláig és beírja a C oszlopban levő érték alapján a D oszlopba a kívánt értéket (ez utóbbit csak remélem, hogy eltaláltam).
Annyiszor futtatod, ahányszor akarod, mindig újraírja a D oszlop celláit az aktuális C oszlop szerint.Sub kitalalo()
Const oes = "hattorf,Győr,Ford,Pors,BMW,AUDI,hmmc,kms,Sassenburg,Figueruelas,Grossmehring,Sindelfingen,Bremen,Koeln,Voelklingen,Seat,emden,Genk,Daventry,VW,BENZ,Swarzedz,Hannover,(OE)"
Const whs = "WH,W/H"
Dim beir As String, cl As Range
For Each cl In Range("C11:C" & Cells(Rows.Count, "C").End(xlUp).Row).Cells
If cl.Value = "" Then
beir = ""
Else
If oes Like "*" & cl.Value & "*" Then
beir = "OE"
Else
If whs Like "*cl.value" & "*" Then
beir = "W/H"
Else
beir = "DFC"
End If
End If
End If
cl.Offset(0, 1).Value = beir
Next
End SubÜdv.
-
Fferi50
Topikgazda
válasz
pirit28
#29300
üzenetére
Szia!
Mivel jelen esetben egyetlen cella tartalmát vizsgálod, továbbá a countif csak azt mondja meg, hogy a cellában van olyan érték (lehet, hogy több is, de ezt nem tudja megmondani!!!), ezért én a sok countif helyett a like operátort javasolnám:
if range("C11").value="" then range("D11").value=""
else
if hattorf,Győr,Ford,Pors" like "*" & range("C11").value & "*" then ' a felsorolást természetesen ki kell egészíteni - igaz, ha a c11 cella értéke valahol előfordul a megadott szövegben
range("D11").value="OE"
else
endif
endifAz else ágakat az előttem szóló alapján alakíthatod ki.
Üdv.
-
Fferi50
Topikgazda
válasz
nemlehet
#29295
üzenetére
Szia!
A helyettesítő karaktert nem használhatod, ha egyenlőséget vizsgálsz a ha függvénnyel, mert az "centire" azt nézi, amit beírtál - tehát nem helyettesítő karaktert "lát", hanem csillagot/kérőjelet.
A hasonlító, kereső függvények viszont működnek a helyettesítő karakterrel.Üdv.
-
Fferi50
Topikgazda
válasz
lenkei83
#29286
üzenetére
Szia!
Nem tudom, nekem nem szedte szét az egyesített cellákat az
union(range("E3"),range("F8"),range("E7")).formatconditions.delete sor.
Az E3:F6 cellák egyesítve voltak és együtt lett rá feltételes formázás kiadva.Mivel törlöd a feltételes formázást?
Más: Redmondnál nemigen lehet logikát találni, mért pont a hibakezelés lenne az.
Üdv.
-
Fferi50
Topikgazda
válasz
#75376384
#29284
üzenetére
Szia!
Nem egészen értem a problémát, de amit csináltam:
g34 cellába beírtam a képletet =B34-E34
Ezután a célérték keresésben ennek a cellának a célértékét 0 értékre állítottam és változó cellának a b18 cellát jelöltem meg.
Kijött hogy 53 % mellett a g34 értéke 0 és minden feltételnek megfelel minden szám.Üdv.
(Persze lehet, hogy ez véletlen...) -
Fferi50
Topikgazda
válasz
lenkei83
#29283
üzenetére
Szia!
Sajnos a SpecialCells metódusnak ez a sajátossága - nem fűlik a foga a hibakezeléshez (Redmond logikájába nem fér bele úgy látszik). Még egy range változóba sem teszi bele a Nothing értéket...

De miért keresel cellát a csak diagramot tartalmazó sheeten, hiszen a tipusát meg tudod állapítani és akkor át tudod lépni a keresést.
Ezen túlmenően szerintem a mutatott iserror kifejezés nem túl szerencsés, hiszen nemlétező cellának a címét sem lehet megállapítani.
Ebben a szituációban úgy gondolom, az on error hibakezelést kell alkalmazni.
Üdv.
-
Fferi50
Topikgazda
válasz
lenkei83
#29246
üzenetére
Szia!
Az elég kevés információ, hogy kiakad. Milyen hibával áll le?
Miért is mész végig egyesével a cellákon, amikor a területen lehet keresni. Amikor egy-egy nem színes cellához érsz, akkor Nothing lesz értéke a szinescellának, ezt pedig nem lehet zárolni, sem felszabadítani.
Itt ugyanazt a ciklust kell lejátszani, mintha értéket keresnél a területen. Első cellát megkeresed és utána addig keresed, amíg vissza nem jutsz hozzá.
(set szinescella=ws.usedrange.find(what:="",searchformat:=true)Ha pedig ezt a ciklust csinálod, akkor egyszerűen meg kell nézni a cella háttérszínét és ha sárga, akkor levenni a zárolást.
Üdv.
-
Fferi50
Topikgazda
Szia!
A konstans definiálásakor nem lehet semmilyen függvényt megadni (sajnos).
Kerülő út: Az immediate lapon megnézed a CHRW függvényed értékét, kimásolod és azt teszed be a VBA -ba. (Bár ez nem biztos, hogy megy.)
Ha nem megy, akkor ne konstansnak definiáld, hanem szövegváltozónak, akkor biztosan "megeszi".
Nálam ez egy kérdőjel, nem tudom, Te milyen karaktert szerettél volna.Üdv.
-
Fferi50
Topikgazda
válasz
bozsozso
#29220
üzenetére
Szia!
Ha minden igaz, a következő segíthet:
Ráállsz a diagramra, kiválasztod azt az adatsort, aminek a sorrendjét módosítani szeretnéd egy egérkattintással - figyelj, hogy az egész ki legyen jelölve.
A szerkesztőlécen megjelenik az adatsor képlete, pl. így:
=ADATSOR(Munka1!$X$61;(Munka1!$T$1;Munka1!$AB$1:$GX$1);Munka1!$AA$61:$GX$61;4)
A végén levő zárójel előtti szám jelzi az adatsor sorrendjét a diagramon - és a jelmagyarázatban. Ezt a számot írd át - természetesen csak akkora számot írhatsz, ahány adatsor van a diagramon. Ezután enter.
Ezzel automatikusan megváltozik a diagramon a többi adatsor elhelyezkedése is.
Kicsit kísérletezel vele és kialakul a neked tetsző sorrend.
Remélem táblázatból készítettnél is működik a módszer.Üdv.
-
Fferi50
Topikgazda
válasz
lenkei83
#29181
üzenetére
Szia!
Nézd meg lsz, hány karakter hossznál akad ki.
Ha csak az értéket szeretnéd betenni, akkor viszont a következőt javaslom:
Nem kell a címeket megjegyezni, hanem egy változóban adod össze az értékeket.
pl. erteke=foundcell.value az elsőnél, majd erteke=erteke+foundcell.value a többieknél. A végén pedig az erteke változót teszed be a cellába, range("A1").value=erteke.Üdv.
-
Fferi50
Topikgazda
válasz
lenkei83
#29174
üzenetére
Szia!
Egyrészt, akkor ne az activesheet legyen amin keresel, hanem a másik.
Set myRange = ActiveSheet.UsedRange helyett set myRange=Sheets(1).UsedRange
Másrészt javaslom, hogy ne a range változóban tárold a találatokat, hanem egy stringváltozóban a találatok címeit.
pl.
Dim fm as String
fm = FoundCell.Address(external:=True) ' az external paraméter a teljes címét adja a tartománynak (fájlnév, munkalapnév - ha ugyanazon a fájlon belül van a munkalap, akkor a képlet beírás után "elveszti" a fájlnevet.)
'A következő találatnál pedig:
fm = fm & "," & FoundCell.Address(external:=True)
'A végén pedig a képlet:
Range("A1").Formula = "=sum(" & fm & ")"Üdv.
-
Fferi50
Topikgazda
válasz
#91703552
#29115
üzenetére
Szia!
Ha egyszerű excel fájlt kaptál, akkor nem tudod a változtatásokat megnézni.
Illetve akkor igen, ha az eredetit elmentetted magadnál - egy harmadik munkafüzetben:
A munkafüzet 1. munkalap A1 cellájába beírod a következő képletet (egérmutatóval is "játszhatsz")
=Amunkafüzet1munkalapA1cella=Bmunkafüzet1munkalapA1cella
Ha a két érték egyezik, akkor igaz lesz a cella értéke, ellenkező esetben hamis. Ha figyelsz arra, hogy az egérmutatós címben a $ jeleket ki kell gyomlálni, akkor húzhatod a képletet sorra és oszlopra is.Ha közös használatú a munkafüzet, akkor a korrektúra menüben a változások követése megmutat(hat)ja, ki mikor, mit változtatott. Azért a zárójeles rész, mert ez beállítástól függ, lehet, hogy nincs változástörténet.
Ha nincs eredetid, vagy nincs közös használat, akkor "így jártál" sajnos.
Üdv.
-
Fferi50
Topikgazda
válasz
zoli03
#29077
üzenetére
Szia!
Talán a legegyszerűbb:
A képleteket át kell másolnod egy másik munkalapra - vagy a munkalap másik részére szövegként.
Ezután cellánként az alábbi képlettel tudod meghatározni az összeadott számok darabszámát:
=HOSSZ(D1)-HOSSZ(HELYETTE(D1;"+";""))+1
A képlet megadja a D1 cellában levő képletben szereplő összeadott számokat.Egy adott tartományban levő darabszámot hasonlóan tudod megállapítani, de a képletben össze kell fűzni a tartomány celláit:
= HOSSZ(D1 & D2 & D3) - HOSSZ(HELYETTE(D1 & D2 & D3;"+";""))+3
A plusz a végén a cellák darabszáma, ez is meghatározható függvénnyel pl. DARAB2(D1:D3)Üdv.
-
Fferi50
Topikgazda
válasz
BenJoe80
#29061
üzenetére
Szia!
Hát ez elég "óvodás" probléma volt. Látatlanban sajnos nem tudtam, hogy a hónapok celái nem üresek, hanem 0 van bennük (azért óvodás, mert gondolhattam volna rá...).
Ezért a képlet így jó:=INDEX(B6:M6;MAX((B6:M6<>0)*(OSZLOP(B6:M6)))-1)
Persze tömbképletként és angolosítva az oszlopot.
Remélem, így már sikerül "megennie".
Üdv.
-
Fferi50
Topikgazda
válasz
m.zmrzlina
#29035
üzenetére
Szia!
Akkor még azt is meg kellene vizsgálni, hogy a szám esetében az megegyezik-e az előző cella +1 értékkel:
If IsNumeric(Cells(xx, 1)) Then
if cells(xx,1).value=cells(xx-1,1).value +1 then Exit For
endifÜdv.
-
Fferi50
Topikgazda
válasz
m.zmrzlina
#29030
üzenetére
Szia!
Én megfordítanám a dolgot. Az utolsó sortól mennék felfelé addig amíg számot nem találok az adott cellában, ha nem szám van, akkor törölném a sort.
Sub torolo()
Dim usor As Long, xx As Long
usor = Cells(Rows.Count, 1).End(xlUp).Row
For xx = usor To 1 Step -1
If IsNumeric(Cells(xx, 1)) Then Exit For
Rows(xx).EntireRow.Delete
Next
End SubValószínűleg kevesebb a szemét, mint az értékes sor

(A select- eket pedig próbáld meg elfelejteni.)
Üdv.
-
Fferi50
Topikgazda
válasz
DeFranco
#28901
üzenetére
Szia!
Az aposztrof használatának szükségességét az előttem szóló már megmagyarázta (névkonvenció), persze bele lehetne tenni a cella értékébe is - de ott vigyázni kell arra, hogy formázási jelentése is van az aposztrofnak!.
Az & és a szóköz inkább szépészeti dolog, jobban lehet látni a részeket - vba mindig használja a makrókban, excel nem foglalkozik vele.Üdv.
-
Fferi50
Topikgazda
válasz
lenkei83
#28894
üzenetére
Szia!
A SZUMHA függvénnyel is meg lehet oldani:
=SZUMHA(INDIREKT("" & $F2 & "!$A$" & HOL.VAN($E2;INDIREKT("" & F2 & "!$A52:$A$1000");0 )+51 & ":A" & HOL.VAN($E2;INDIREKT("" & F2 & "!$A52:$A$1000");0 )+51+14);$B2;INDIREKT("" & F2& "!$B$" & HOL.VAN($E2;INDIREKT("" & F2 & "!$A52:$A$1000");0 )+51 &":B" & HOL.VAN($E2;INDIREKT("" & F2 & "!$A52:$A$1000");0 )+51+14))Bővebbet az index fórumon írtam.
Még annyit hogy nevet is lehet adni pl. ennek a kifejezésnek a névkelezelőben "!$A52:$A$1000"
pontosan így beírva, akkor helyette elég akár 3 betűs nevét is beírni.Üdv.
-
Fferi50
Topikgazda
válasz
BenJoe80
#28893
üzenetére
Szia!
Ne haragudj, sajnos az excelnek most igaza van, én voltam figyelmetlen:
A remélem helyes képlet
=INDEX(B6:M6;MAX((B6:M6<>"")*(OSZLOP(B6:M6)))-1)Az INDEX után kimaradt egy nyitó zárójel. Másrészt, mivel nem az A oszloptól kezdődik a tartomány, amiben dolgozik, ezért a szorzat eredményéből (ami a keresés helyét határozza meg) le kell vonni 1-et. Ebből az is következik, ha a tartományt eltolod jobbra, pl. D oszlopig, akkor már 3 a levonandó érték.
Üdv.
Ps. Elnézést a felesleges "küzdelem" miatt, néha vannak rosz napjaink..
-
Fferi50
Topikgazda
-
Fferi50
Topikgazda
válasz
BenJoe80
#28883
üzenetére
Szia!
Tömbképletként kell bevinni az adott cellába, vagyis nem sima enterrel, hanem shift+ctrl+enterrel kell befejezni. Ekkor a képlet kapcsos zárójelek közé kerül. Az A1 és AA1 cellák helyére beírod a B6 és M6 cellákat.
Így fog kinézni a cellában a képlet:
{=INDEXB6:M6;MAX((B6:M6<>"")*(OSZLOP(B6:M6))))}Ezt húzhatod lefelé úgy, hogy kijelölöd az alatta levő cellákat, majd Ctrl+l.
Üdv.
-
Fferi50
Topikgazda
Szia!
Ha a sorok száma alapján szeretnéd dinamizálni, akkor:
For each sor in Sheets("Sheet1").UsedRange.Rows
célmunkalap létrehozása/kijelölése
ide jönnek a másolási műveletek
nem ártana ellenőrizni, hogy nincs-e esetleg üres sor benne, ha van, azt nyilván ki kell hagyni a másolásból.
NextÜdv.
-
Fferi50
Topikgazda
Szia!
Ha mindig ugyanoda kell másolni, akkor a makróba beírod egymás után:
Sheets("Sheet2").Range("B3").value=Sheets("Sheet1").Range("A2").value
Sheets("Sheet3").Range("B3").value=Sheets("Sheet1").Range("A3").value
Sheets("Sheet4").Range("B3").value=Sheets("Sheet1").Range("A4").value
és így tovább, minden egyes cellára.
Ha van valami szabályszerűség a másolásban, akkor ciklusba is szervezhető.(Ha nem csak az értékeket, hanem a formát is szeretnéd átvinni, akkor a fenti sorok helyett a copy metódust használhatod:
Sheets("Sheet1").Range("A2").Copy destination:=Sheets("Sheet2").Range("B3")
Sheets("Sheet1").Range("A3").Copy destination:=Sheets("Sheet3").Range("B3")
Sheets("Sheet1").Range("A4").Copy destination:=Sheets("Sheet4").Range("B3")
a másolásra.)Ha változó a másolás helye, akkor használhatod az Applicaction.inputbox metódust a cél cella bekéréséhez, ahol megadhatod, hogy milyen típusu legyen az input (8-as tipus a cella referencia). Így minden kérdéses cellánál megkérdezheted, most hova legyen másolva.
Az inputbox értékét egy változóba kérheted be:
Set myCell = Application.InputBox( prompt:="Select a cell", Type:=8)
majd ezt a változót használod célként.
Ebben az esetben az inputboxban egérrel kijelölheted melyik munkalap melyik cellájába kívánod a másolást.
Utána:
Sheets("Sheet1").Range("A4").Copy destination:=myCellRemélem, sikerülni fog valamelyik módszerrel megoldani a problémát.
Üdv.
-
Fferi50
Topikgazda
válasz
Lacikaaaa
#28826
üzenetére
Szia!
Mihez képest kell nézni a 3 ill. a 4 és több napot. Valahol egy cellában rögzítve van ez a "referencia dátum", mert ha nincs, akkor sem Te sem a rendszer nem fogja ám kitalálni (gondolom ez a rögzítés dátuma lenne).
Ha van ilyen cella, akkor 2 feltételes formázással megoldható a dolog - formázás képlet alapján, a képlet pedig: ma - referencia dátum >2 kitöltés sárga ez az egyik
ma - referencia dátum >=4 kitöltés sárga ez a másikÜdv.
Új hozzászólás Aktív témák
- GoodSpeed: Mutasd magad topic!
- Azonnali mobilos kérdések órája
- Milyen monitort vegyek?
- Macska topik
- Trollok komolyan
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- exHWSW - Értünk mindenhez IS
- SSD kibeszélő
- Itt a Galaxy S26 széria: az Ultra fejlődött, a másik kettő alig
- Huszadik születésnapjára eléggé megváltozott az Antec nagytornya
- További aktív témák...
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- PC Game Pass előfizetés
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Fallout 4 Pip-Boy Edition eladó
- Apple Watch Series 10 GPS+Cellular 46mm, Újszerű, 1 Év Garanciával
- HIBÁTLAN iPhone 14 Plus 128GB Midnight-1 ÉV GARANCIA - Kártyafüggetlen, MS4643
- Általános igazgatóhelyettes tábla üvegből eladó
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Dell Optiplex 3020 MT,i3-4130,8GB RAM,128GB SSD,WIN10
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest


), szerintem abból adódik, hogy az rng_Tempcell.Row a cellának a munkalapon elfoglalt helyét adja vissza és nem az rng_Dkioszt tartományban elfoglalt helyét -> a két szám csak akkor ugyanaz, ha az rng_Dkioszt tartomány az első sortól kezdődik. Egyébként le kell vonni belőle a tartomány induló sorának számát.



