-
IT café
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
-
artiny
őstag
válasz Delila_1 #16864 üzenetére
nekem valahogy nem olvasta be rendessen....voltak jol beolvasott szamok es voltak rosszak randonban...
azota kicsereltem a . ,-re es most jo
most egy olyan függvényt keresek ami megtalalja abszolut ertekben a 2 legnagyobb erteket
(pl. -9 , 8 ,-0,5, 4 ,-4 >>> egyik a -9 a masodik pedig a 8 lessz)
[ Szerkesztve ]
-
m.zmrzlina
senior tag
válasz Delila_1 #16869 üzenetére
Szia, köszi a választ!
Azért ragaszkodom a makrós megoldáshoz mert nem én fogom használni a munkalapot ezért szeretnék mindet amit lehet a "gombnyomásig" leegyszerűsíteni. Ha nekem kellene akkor a DARABHATÖBB()-es megoldás is jó lenne.
Az a koncepció, hogy a felh. egy üres munkafüzetbe beimportálja a szükséges adatokat,elmenti, bezárja. Aztán megnyitja a makrós munkafüzetet elindítja a makrót (betallózza az előbb mentett adatbázisát) és a makró kikeresi neki a szükséges adatokat.
A szerkezet amit a képen látsz az már a makró elejének a munkája, egyszerűbb volna nem a felhasználóra bízni a képletírást.
-
m.zmrzlina
senior tag
válasz Delila_1 #16871 üzenetére
Range("J3:J15000") = "=COUNTIFS(A:A,G3,B:B,H3,C:C,I3)"
Ennél a sornál hal most meg nekem a makró (ld #16868. hszt)
Egyszerűen nem írja ki munkalapra a makró a megadott cellába a képletet. Ha kitörlöm az "="- t a fv neve elől akkor kiírja munkalapra (szövegként természetesen, és persze nem számol)
Maga a fv jó mert ha kézzel odabiggyesztek elé egy "="-t akkor jó eredményt ad.
A baj az hogy makróval nem tudom kiírni a fv-t a munkalapra.Illeteve nekem úgy is jó lenne ha a makró számolná ki az eredményt és már csak azt írná ki munkalapra. (ez volt az eredeti koncepció #16867 hsz)
[ Szerkesztve ]
-
atillaahun
veterán
válasz Delila_1 #16877 üzenetére
Köszi. Ebbe inkább bele se gondolok hogy működik.
Tegnap óta próbálom egyébként egy xls-be exportált visszapattanó email halomból (levelek tartalmából - body) kinyerni a konkrét címeket, hogy aztán kitörölhessem őket a küldő adatbázisból, de sehogy sem jövök rá egy hatékony megoldásra. Majd mindegyik levélnek más a szövege, tehát máshova esnek bennük a címek, ráadásul 2-3-4-5-... db cím van is minden levélben.
Tudsz esetleg erre egy kézenfekvő megoldást, ami valahogy a hivatkozásokat tudja másolni, vagy jobb ha elkezdem őket egyesével, kézzel kiszedegetni?
[ Szerkesztve ]
-
atillaahun
veterán
válasz Delila_1 #16879 üzenetére
Igaz!
Mármint ezzel már tegnap is próbálkoztam, csak sortörések, meg egyéb hülye karakterek voltak a szövegben, és folyton beleakadt a tagolás. De most rátaláltam a csodálatos tisztít függvényre, és így máris jól viselkedik a szöveg.[ Szerkesztve ]
-
atillaahun
veterán
válasz Delila_1 #16879 üzenetére
Üöhm, mégsem haladok olyan jól ezzel a széttagolt szemétdombbal mint gondoltam.
Esetleg valami további ötlet, hogy a sok új cellából hogy válogassam ki azokat, amik címeket vagy @-ot tartalmaznak? Mert ugye adott sorban több is van, és általában más oszlopokban.[ Szerkesztve ]
-
atillaahun
veterán
válasz Delila_1 #16897 üzenetére
Egy 100-as mintányi levélen futtattam most le, és lett belőle EZ, kb. ötször annyi címmel - cellával, ami nagyjából stimmel is.
Leginkább csak a kacsacsőr jelek maradtak, meg itt-ott pár szó, pontosvessző, meg néhány egyéb hülye karakter.Valami szöveg.keres meg közép függvényekben gondolkodom.
Az már megvan, hogy a végét ott kell levágni ahol a .hu van, csak még az elejét kéne valahogy megtalálni, mert az ugye változó.[ Szerkesztve ]
-
atillaahun
veterán
válasz Delila_1 #16900 üzenetére
Ezt így hirtelen fogalmam sincs hogy kell, de már végülis kivágtam a címeket <-től >-ig, amibe nem volt, azt meg hahiba-val visszaadtam. Így most nagyjából 95%+ -os, a maradékot meg asszem kiírkálom kézzel.(#16902) Delila_1
Oké. Mindjárt meglátom akkor így mi marad belőle.[ Szerkesztve ]
-
atillaahun
veterán
válasz Delila_1 #16895 üzenetére
Tudnál még segíteni kicsit ebben a makróban?
A tegnapi pár százas mintára mikor ráeresztettem teljesen jól működött, viszont hogy azóta futtattam még további adatbázisokon is, néha megakad.
Run-time error '13':
Type mismatch
hibával, és ha a debug-ra nyomok, akkor az
If InStr(CV, "@") Then
sort jelöli ki sárga háttérrel a VB.
Ilyenkor is lefut valameddig a ciklus, és másol is ki címeket a Munka2-re, de változó helyeken megakad.
Valami hülye karakterek lennének a széttagolt adatbázisban, vagy mit jelent itt nála a mismatch?
Pedig még a tisztít függvényt is direkt végighúztam az egész listán széttagolás előtt.
Mivel sortörésekkel voltak tele az email-ek és ezeket kiszedte, vannak helyek, ahol rengeteg sort egybefűzött, és azok egy cellába kerültek. Lehet ez a baja, hogy túl hosszú bizonyos cellák tartalma, vagy mitől áll fejre?[ Szerkesztve ]
-
skoos
őstag
válasz Delila_1 #16936 üzenetére
Nagyon köszönöm segítséged! Sajnos még nem sikerült a képlet, de már nagyon közel lehetünk szerintem.
#HIV hibát dobja.
Még egyszer megpróbálom másképp.
Az első lap A oszlopában fel van sorolva: 'munkafüzet 1, munkafüzet 2...munkafüzet n'. Ugyan ilyen nevek alatt van a többi sheet.
Ha a képletet manuálisan megadva =munkafüzet n!$X$X a megfelelő adatot adja. A kérdés az lenne, hogy az A oszlopban található felsorolásból hogyan tudom a képletbe a szöveget és nem a hivatkozást másolni. Tehát hogy ne =A1!$X$Y legyen hanem hogy a cellába beleírt szöveget másolja tovább a képletbe (=munkafüzet n!$X$X)Köszönöm javaslataid.
-
picsu
csendes tag
válasz Delila_1 #16951 üzenetére
Szia Delila!
Nagyon köszi a segítséget. Annyi a különbség, hogy a könyvtáramban van vagy 80 file amiből ezeket a cellákat ki kellene venni és a makrós xls-be belerakni egymás alá...
...és ha ez megvan jön a feketeleves...
Minden tábla ugyanilyen csak különböző adatokkal. Amire szükség lenne az az "A" oszlopban levő számok és a hozzá tartozó 'AE" oszlopban levő szám. Például 10-es sor: 01-B340L --> 3.480
Ami a buktató nekem, hogy egy komisszió többször is szerepel az "A" oszlopban. (mivel első, másod és van, hogy harmadosztályú) mint például a "A11-A12-A13" celláknál.
Ilyenkor csak mindig az a sor kellene ahol az "F" oszlopban "1"-es van.
Tehát például 18-as sor: 01-B462L --> 12.560Még mindig tudsz segíteni?
Isti
Melyik a kakukktojás? ARANY - PETŐFI - EZÜST
-
commanDOS
senior tag
válasz Delila_1 #17024 üzenetére
Köszi, de ha jól értelmezem akkor ez konkrét értékekre ad válaszul egy másik értéket.
Viszont nekem a cellába gyakorlatilag 100 és 2000 között bármilyen szám kerülhet, amit meg kell feleltetnem a krititériumnak megfelelő 5 szám (500,750,1000,1500,2000) valamelyikével.Kihelyezett tőke visszaáramoltatási szociális ügyintéző: pénzbehajtó :)
-
atillaahun
veterán
válasz Delila_1 #17034 üzenetére
Az a gond, hogy nem üres sorok vannak, hanem üres cellák, százával, különböző sorokban és oszlopokban elszórtan. Sajnos mivel maga az adatbázis, egy Outlook-ból csv-ként kiexportált, majd széttagolt levelek százainak ömlesztett szemétdombja, ezért egy pöppet kaotikus a felépítése. A rendszer az utolsó dolog amit ebben meg lehet találni.
De 20-30 oszlopnál több nincs benne szerencsére, úgyhogy mindre ráküldtem egy szűrőt, aztán egyenként kézzel végigmegyek rajtuk "@"-ot tartalmazzon-al Végülis kb. dél óta már a végére értem.
Úgyhogy most jöhet a maradék 7 adatbázis.[ Szerkesztve ]
-
Plebi
senior tag
válasz Delila_1 #17052 üzenetére
Igen erre gondoltam én is, de ha ő akinek készül meg akar nézni, egyszerre több költségnemet pl vetőmag és műtrágya akkor már nem jó, mert ott csak kettővel kell osztani.
A legfőbb gond az az, hogy amikor szűrök bármire, akkor a terület adatokat hozza, látszanak, de csak a mezei leltár esetén számol (egyesített cellák első adata mindenütt), a többi esetében nulla az értéke a cellának hiába jelenik meg benne szám.
[ Szerkesztve ]
Gigabyte B450 Aorus Pro; Ryzen 5 3600; 16GB DDR4 3200 HyperX Predator, Sapphire Pulse 6600, SSD-k+HDD; NZXT H510 Elite; CM Silent Pro M2 620W; NZXT X62 Kraken; Dell 2311H; XSX; PS5
-
Plebi
senior tag
válasz Delila_1 #17054 üzenetére
Ez az én esetemben fals számot ad, mert az össz terület tegyük fel 25000 ha. A részösszeg (9) függvénnyel számolva 100.000 ha-t ad eredményül, amit a helyes szám eléréséhez 4-el kell osztani, mert cégenként 4x szerepel a terület, ha átlagot számoltatok a részösszeggel akkor nem jó, mert a 100.000ha-t 44 felé dobja szét, mivel 44 sorom van. 11 cég, 4 költségnemmel.
[ Szerkesztve ]
Gigabyte B450 Aorus Pro; Ryzen 5 3600; 16GB DDR4 3200 HyperX Predator, Sapphire Pulse 6600, SSD-k+HDD; NZXT H510 Elite; CM Silent Pro M2 620W; NZXT X62 Kraken; Dell 2311H; XSX; PS5
-
Plebi
senior tag
válasz Delila_1 #17056 üzenetére
Igen ez jó lenne, de... sajnos a főnökség nem minden esetben csak egy költségnemet akar látni, hanem többet is, akkor sajnos ez sem jó, mert az egyes cég 100 ha-os összterülete esetén két költségnemnél csak 50ha-al számolna. Ez tudom elég érdekes egy helyzet. Megoldást, egyenlőre abban látom, hogy költségnemenként csinálok belőle egy egy kimutatást, egymás alá, igaz így csak manuálisan tudnak több költségnemet összesíteni, de az már....
A legjobb még mindig az lenne, ha képes lenne a 4 összesített cellában lévő egy adatot mind a négyhez rendelni, de csak egynek számolna, nem csak a legfelsőhöz.
Gigabyte B450 Aorus Pro; Ryzen 5 3600; 16GB DDR4 3200 HyperX Predator, Sapphire Pulse 6600, SSD-k+HDD; NZXT H510 Elite; CM Silent Pro M2 620W; NZXT X62 Kraken; Dell 2311H; XSX; PS5
-
m.zmrzlina
senior tag
válasz Delila_1 #17064 üzenetére
Érdekes dolgot vettem észre.
A Worksheets(intI).Name = Int(Worksheets(intI).Range("B10").Value) sor után betettem ezt:
If Err.Number <> 0 Then Debug.Print Err.Number
A látszólag jól lefutó átnevezések után is hibakódot ír (9-t) de ott sem áll meg a futás.
Az On Error Resume Next csak az azt követő sorra van hatással, vagy a kód további részében minden hibánál továbblép?
[ Szerkesztve ]
-
m.zmrzlina
senior tag
válasz Delila_1 #17069 üzenetére
Az On Error Resume Next megadásakor nem áll le a program, hanem a következő sorra ugrik.
És ezt mindaddig csinálja amíg az Az On Error Goto 0 ki nem kapcsolja.
Ez volt a probléma. Korábban volt egy Resume Next és nem volt utána Goto 0
Köszi
Az automatikus kiegészítére valakinek valami ötlet?
[ Szerkesztve ]
-
Caipi
tag
válasz Delila_1 #17087 üzenetére
A Munkalapon első sora azonosítót tartalmaz (ez köti össze a két munkalapot).
Az adott sorhoz két oszlopban szerepelnek értékek a Munka1-en, amelyeknek az összegét kell vizsgálnom (ez lenne a két fkeres()).
A Munka 2-őn ugyanazon azonosítókhoz kerülnek összegek, csak nem két, hanem több oszlopba (ez sima szum()).
Az esetleges elírásokat szeretném elkerülni azzal, hogy megvizsgálnám, hogy a két munkalapon az adott azonosítóhoz tartozó összegek egyformák-e (Munka1-en két oszlop; Munka2-n 7). Ha a két szum() nem stimmel jelezzen nekem, hogy ellenőrizni kell az adott sort. -
félisten
válasz Delila_1 #17136 üzenetére
Most nem Windows-os környezetben vagyok, de a TRIM fx szvsz nem csak a szöveg előtti és utáni szóközöket törli, hanem a szövegben előforduló halmozott szóközből is 1 szóköre cserél...
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
Új hozzászólás Aktív témák
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Ozeki Kft.
Város: Debrecen