-
Fototrend
Fototrend
Új hozzászólás Aktív témák
-
Pakliman
tag
Üdv!
Valami ilyesmi módon IS lehet:
Public Sub Kitölt()
Dim sor1 As Long
Dim sor2 As Long
Dim sor3 As Long
Dim sFile As String
Dim FF As Long
Dim temp
Set ws1 = ThisWorkbook.Worksheets(1)
Set ws2 = ThisWorkbook.Worksheets(2)
Set ws3 = ThisWorkbook.Worksheets(3)
sFile = "c:\A szövegfálj.txt"
FF = FreeFile
Open sFile For Input Access Read Shared As #FF
Do While Not EOF(FF)
Line Input #FF, temp
Select Case Left(temp, 3)
Case "MB1": sor1 = sor1 + 1: ws1.Cells(sor1, 1) = temp
Case "MB2": sor2 = sor2 + 1: ws2.Cells(sor2, 1) = temp
Case "MB3": sor3 = sor3 + 1: ws3.Cells(sor3, 1) = temp
End Select
Loop
Close #FF
End SubTermészetesen ez egy elnagyolt kód, lehet még rajta finomítani bőven
-
lappy
őstag
-
Kristof_94
nagyúr
Sziasztok!
Excelben létezik olyan beállítás ami automatikusan kijavítja egy név esetében az első 1-1 betűt nagyra? Tehát pl. beírom, hogy kiss istván és amikor a tabot nyomva továbblépek a K és I nagyra vált. Előre is köszi!
-
Delila_1
veterán
-
dellfanboy
őstag
koszi, lesz erom mindjart megnezem.
ha a 38283-hsz-re gondolsz (ott irtam hogy uj excelben mukodik) akkor az a cella szinenkenti szummazasra vonatkozott. bocs, ha nem voltam1ertelmu .ott all fen az a problemam, hogy ha letrehozok egy uj excelt abba belerakom azt a modult akkor tok jol tudom szummazni szin szerint. viszont ha a jelenlegi file-be rakom bele akkor vannak gondjaim.
ma pl. tok jol mukodott, egeszen addig mig az excel-t nem mentettem el, nah akkor a vegeredmenyek eltuntek es ?name error-ra futott ki..
( a file makrobaratkent van elmentve, nincs mas makro ami bezavarni viszon valo igaz, eleg nagy sok keplettel lappal) viszont nem ertem hogy mikor eloszor beleraktam a modul-t, akkor a fv mukodott, majd mentesre kidoba a ?name-t...
-
Delila_1
veterán
-
dellfanboy
őstag
neztem a forras tablat, de ures sor sehol sincs.
abban esetleg tudnal segiteni hogy a makroban melyik sorokat modositsam ha a terulet kijelolest akarom modositani, beraknam a ctrl shift le jobbra blokkot hatha azzal lefut.
-
Delila_1
veterán
-
dellfanboy
őstag
-
dellfanboy
őstag
nah megneztem #1-rol minden sor atjott
#3- duplikaltan jott at az osszes sor
#2 hianyzikmi okozhatja ezt a hibat? foleg ugy hogy az elso sheet adatai pontosan atjonnek
-
dellfanboy
őstag
-
dellfanboy
őstag
-
Delila_1
veterán
-
Delila_1
veterán
-
dellfanboy
őstag
igen persze eliras.
elso laprol a1, masodikrol a2. (fejlec nelkul) -
Delila_1
veterán
-
dellfanboy
őstag
-
Delila_1
veterán
-
Delila_1
veterán
-
dellfanboy
őstag
-
Fferi50
Topikgazda
-
pero19910606
csendes tag
Sziasztok!
Szeretnék egy kis segítséget kérni Tőletek.
A táblázatom alapja egy óránként frissülő AutoGADD xls. (Belinkeltem egy új üres táblázatba) A táblázatban termékek és a hozzájuk tartozó információk (ár, készlet, stb...) szerepelnek.
Az utolsó oszlopban egy képlettel számolnám, ki hogy mely termékek (Amelyeket ki kell futtatnunk egy megadott időre) azok, amik leírhatóak. Ezeknek meg vannak a feltételei.
Az egyik ilyen feltétel, hogy az elérhető készlet ("Code 1" esetén) 15 alatt van, nem fog már hozzánk érkezni (RTR = 0) és a teljes még eladásra váró készlet 50.000 Ft alatt van.
Idáig nem is lenne semmi problém, azonban a GADD listában, ha már nincs RTR (Rest to receive), akkor sok esetben nem 0 vagy üres cella, hanem "-" szerepel, tovább az RTO (Rest to Order) oszlopban negítv szám is lehet. Ez utóbbi azért fontos, mert egy sima CTRL+H-val nem tudom a "-" jelet "0"-ra cserélni, mert akkor a minuszból értékből hirtelen plusz lesz a "-" eltönésével. Az RTR oszlopban szereplő kötőjel további problémát okoz, ha össze akarom adni az aktuális készlettel, mert "value" hibaüzenetet kapok.
A CTRL+H opció azért sem megoldás, mert teljesen automatizálni szeretném a táblázatot, ha már rendelkezésrem áll az óránként frissülő linkelt lista.
Próbáltam a SUBSTITUE függvénnyel cserélni a "-" jelet 0-ra, de azzal meg a "Kiírható" oszlopban szereplő függvény nem boldogul. (Emelett a negatív számoknál sem jó, mert a mínusz helyett 0 lesz a szám előtt.)
Összefoglalva a lényeg: Az RTO és az RTR oszlopban szereplő "-" jeleket szeretném "0"-ra (vagy akár semmire) cserélni úgy fügvénnyel, hogy az eredeti listában nem kell piszkálnom semmit, illetve itt sem kell semilyen műveletet manuális megtennem a megnyitás után. ( Ez utóbbi azért fontos, mert sok olyan ember használná a táblázatot, akinek még egy nyomtatás is sokszor problémát okoz.
Ez lenne a táblázatom (az eredeti file-ra való hivatkozást itt most eltüntettem, hogy ide fel tudjam tölteni) https://data.hu/get/11252766/pelda.xlsm
Lehetséges ez?
Nagyon köszönöm a segítséget!
Remélem érthetően tudtam leírni
További szép napot!
Sziasztok!
-
Delila_1
veterán
-
dellfanboy
őstag
-
Delila_1
veterán
-
huliganboy
addikt
-
Karol0109
csendes tag
Megoldottam még plusz képletekkel a feladatot a következők szerint:
1. a képleteddel kiírtam az ideális félév sorszámát
2. új "időben teljesítve" oszlopba kiírattam, HA függvénnyel, hogy félév sorszám<= ideális félév sorszám, akkor IGAZ
3. új "tárgy db" oszlopba kiírtam DARABTELI függvénnyel, hogy egy személyhez hány tárgy tartozik
4. új "időben teljesített tárgy db" oszlopba kiírtam DARABHATÖBB függvénnyel, hogy egy személyhez, hány IGAZ érték van megadva
5. új "azonos" oszlopba AZONOS függvénnyel kiírattam, hogy "Tárgy db" és "Időben teljesítve tárgy db" azonos-e
6. IGAZ sorokra szűrve megkaptam, az időben tárgyat teljesített személyeketEzt tudjuk valahogy egyszerűsíteni?
Köszönöm szépen a segítséget.
-
dellfanboy
őstag
-
Karol0109
csendes tag
Köszönöm szépen.
Jól értelmezem, hogy a képlettel egy új oszlopba kitette az "ideális" félév sorszámot?Össze tudjuk hasonlítani a két számot személy szinten, úgy hogy valós félév sorszám kisebb egyenlő, mint ideális félév sorszám? Tehát kiszűrni azokat az embereket, akik nem időben vagy előtte teljesítették a tárgyat?
Nem találtam olyan képletet, hogy két oszlop értékének összehasonlítása egy harmadik oszlop értékének figyelembevételével.
Köszönöm.
-
dellfanboy
őstag
-
swoody
senior tag
Nah erre gondoltam:
Van egy táblázat, ahol különféle adatokkal töltem fel az oszolopokat, és azokat egy új munkalapon a megfelelő helyre berakom. A kérdés az lenne ezt meglehet-e valahogy oldani, hogy automatikusan csináljon egy új munkafüztet amikor egy új sort adok hozzá?
-
Karol0109
csendes tag
Szia!
Köszönöm , ez szuper, viszont egy dologra nem gondoltam.
Figyelembe kell venni az aktív félév oszlop értékét is, tekintve, hogy így, annak a személynek is elvárja a 4. féléven teljesítendő tárgyakat, akinek még csak 2 aktív féléve volt.Arra van lehetőség, hogy az Aktív félévek oszlop értéke szerint csak azokat a tárgyakat vizsgálja, ahol a Félév oszlop értéke =<, mint Aktív félév száma?
Köszönöm szépen!
-
Delila_1
veterán
Erre gondolsz?
Az E oszlopban összefűzöd a kezdő és a befejező ország nevét. Ennek az oszlopnak a tagjai szerepelnek a képen a H1:K1 tartományban. A H2 cella képletét másolhatod le-, és jobbra.
Megváltoztattam az adatokat, hogy látsszon a különbség a két héten.
Még egyszerűbb, ha a meglévő adatokból kimutatást készítesz. Ehhez is kell az E oszlop összefűzése.
A kimutatásban a sorcímkékhez behúzod a hét címkét, az oszlopcímkékhez és az értékekhez egyaránt az összefűz címkéket add meg. -
bexinho23
őstag
Közben teszteltem, de azt a megoldást kaptam, amit vártam.
Az alábbi képletet írtam be a hivatkozás tábla hivatkozási cella mezőjébe, ami működik is kattintásra. Azonban, ha bővül a táblázatat +sorral, akkor ugyanúgy a korábban utolsó cellának azonosított cellára lép. Belelépve a hivatkozásszerkesztőbe látni, hogy a képletes mezőben a korábban azonosított cella száma van írva. Tehát ez a kattintásos megoldás 1 alkalommal használható jelenlegi ismeretem szerint.
=INDEX(D
;MAX((D<>"")*(SOR(D))))Rosszul csinálok valamit, vagy ez csak fix táblázatra használható?
-
lappy
őstag
-
dellfanboy
őstag
-
Karol0109
csendes tag
Köszönöm szépen a segítséget!
Ez tökéletes megoldás a kérésemre, viszont sajnos még így is túl sok lépésből áll a feladat megoldása.
Ez azért problémás, mert félévente fogják kérni tőlem ezt az adatot.Arra gondoltam, hogy támaszkodhatnék a félév sorszám adatra, mert ahol nincs passzív félév, ott ez jó támpont (passzív félévek száma mező is bekerült a táblázatba, ahol nem 0, azt majd külön kezelem).
Ebben az esetben a következőhöz szeretnék segítséget kérni :
- az excelben van két munkalap:
1. munkalapon szerepel, hogy adott szervezeti egységhez tartozó személy hányadik féléven melyik tárgyat teljesítette
2. munkalapon szerepel, hogy ideális esetben melyik szervezeti egységhez tartozó személynek melyik tárgyat hányadik féléven kell teljesítenie
- az 1. munkalapot kellene leszűkíteni azokra a sorokra, amelyik egybeesik a 2. munkalapon szereplő ideális esettelErre esetleg van valami ötlet?
Ha tud segíteni képlettel, akkor természetesen behelyettesítem ezt a sok variációt, csak egy indulóalapot szeretnék kérni.
Előre is köszönöm a segítséget!
-
Karol0109
csendes tag
Sziasztok!
Szeretném a segítségeteket kérni a következő feladathoz:
- az excelben van két munkalap:
1. munkalapon szerepel, hogy adott személynek hány db aktív féléve volt és azon hány db tárgyat teljesített,
2. munkalapon szerepel, hogy ideális esetben hány db aktív féléven hány db tárgyat kell teljesíteni
- az 1. munkalapot le kellene szűkíteni azokra a sorokra, amelyik egybeesik a 2. munkalapon szereplő "ideális esettel", tehát HA a két munkalapon az Aktív félévek száma =, akkor 1. munkalapon Tárgy db >= 2. munkalapon Tárgy dbCsatolom képként az 1. munkalap (lista) fejlécét képként és a 2. munkalap adatait. Remélem érthető, hogy mit szeretnék.
Előre is köszönöm a segítséget!
-
Mutt
senior tag
Szia,
Delila megoldása mellett itt egy nem-makrós megoldás, ami Excel 2010 felett műkődik.
Power Query kell hozzá, amit Excel 2010 esetén külön kell installálni.Lépés:
1. Adatok -> Adatok beolvasása -> Fájlból -> Mappából
2. Kiválasztod a mappát ahol a fájlok vannak, OK-t nyomsz és a Szerkesztés gombra kattintasz.
3. Extension oszlopot kijelölöd, majd az Átalakítás fülön Formátum -> Nagybetűs opciót kiválasztod. Ezzel minden kiterjesztést nagybetűre konvertálunk, így ha véletlenül vki .XLS -ként menti el a fájlt, akkor is be fogjuk olvasni.
4. Extension oszlop jobb sarkában található szűrővel kiválasztjuk a .XLS fájlokat.
5. Name oszlop jobb sarkában a szűrővel kiválasztjuk a xyz kezdetű fájlokat (itt is lehet előtte egy nagybetűsítést csinálni).
6. Kijelőlöd az első két oszlopot (Content és Name), majd jobb klikk a fejlécen (ahol látod hogy Content) és További oszlopok eltávolítását választod (ezzel a többi oszlop eltünik, nincs rájuk szükség)
7. A Content oszlop jobb sarkában van két lefelé mutató nyíl (Fájlok kibontása), kattints rá. Ez elkezdi beolvasni a fájlokat, és felhoz egy mint ablakot, ahol válaszd ki a Munka1 lapot és nyomj okét. Dolgozni fog egy kicsit, de az összes fájlod Munka1 lapját be fogja tölteni.
8. Jobb oldalt lesz egy csomó új lépés ennek eredményeként. A gond, hogy a korábban megtartott fájl nevet vhogy vissza kell kapni. A Többi oszlop eltávolítva 1-es lépésnél található fogaskerékre kattitnts és pipáld be a Name-t, hogy újra lássuk a fájlneveket. Ezek után kattints az utolsólépésre, mert innen folytatjuk.
9. Oszlop hozzáadása menüben válaszd az Indexoszlopot.
10. Most régi adósságot törlesszük, adjunk egy értelmes nevet a lekérdezésnek.
Jobb oldalt a Tulajdonságok alatt a Név-ben van vmi (nekem temp, ami a könyvtár neve ahol voltak a fájlok). Adjunk vmi jobb nevet pl. Frissadatok
11. Egy újabb furcsa lépés fog jönni, az eddigi művet lemásoljuk. Bal oldalon a Lekérdezések részben jobb klikk és Megkettőzést válaszd.
12. Lett egy másolatunk, ami aktív is lett. Esetleg nevezzük át (pl. Utolsosorok), mert itt fogjuk megtudni, hogy az egyes fájlokban hol van az utolsó sor.
13. Kezdőlapon Csoportosítási szempontra kattints. Csoportosítani fogunk a fájlnév alapján, Name oszlop, és amit keresünk az Index oszlop maximum értéke. Egy OK után meg is kapjuk a kért dolgokat. Itt végeztünk.
14. Kattintsuk bal oldalt az Adatsorok lekérdezésre, mert most ezzel megyünk tovább.
15. Kezdőlap fülön Összevonás -> Lekérdezések egyesítése jön. Ezzel az a célünk, hogy a korábban már megkapott utolsósorokat ebben a lekérdezésben meg tudjuk találni.
Három részből áll az ablak: fent látjuk az aktuális lekérdezés képét, alatta lévő listában válasszuk ki az Utolsosorok lekérdezést (amit a 13-as lépésben véglegesítettünk). Meg kell mondanunk az Excelnek, hogy mely oszlopok azonossak a két lekérdezésben. A fenti táblában jelöld ki a Name és Index oszlopot (Ctrl-t kell majd nyomnod kattintáskor). Az alsó táblában is jelöld ki a Name és Index oszlopot. Fontos, hogy a fejlécekben látni fogsz egy kis sorszámot 1 és 2 (ez a kijelőlés sorrendje), ezeknek a sorszámoknak egyeznie kell mindkét táblában a helyes műkődésért.
A harmadik dolog amit itt meg kell adnod az pedig a csatlakozás módja, ami nekünk most Belső (csak egyező sorok).
16. Nyomj egy OK-t
17. Végeredményt 3 felesleges oszlop fogja csúfitani, a fájlneve, az utolsósor száma és egy új oszlop amiben Table szöveg van. Ezeket töröljük. Jobb klikk az oszlop nevén és Eltávolítás.
18. Kezdőlap -> Bezárás és betöltés -> .. adott helyre opcióval meg tudod mondani az Excelnek, hogy hova kéred az eredményt.
Sok lépés ez, de segítség azoknak akiknek makróírás még távoli.
Legközelebb pedig ha futtatnod kell, akkor az Adatok fülön Az összes frissítése opciót használod, vagy kattintasz a Lekérdezések és kapcsolatok gombra és a megjelenő panelen a Frissadatok lekérdezésen jobb klikk és Frissítés.
üdv
PC-n amúgy működik.
Új hozzászólás Aktív témák
- 500GB, 320GB, 250GB notebook 2,5" HDD-k. Több db. (100/100%)
- BESZÁMÍTÁS! Részletfizetés 0% THM ÚJ GIGABYTE A16 3VH 16" notebook R7 260 16GB RTX 5060 3 év 27%
- Eladó Dell Latitude 7440 Új állapotban i7-1365U 32 GB DDR5 RAM 1TB SSD Dell pro support garancia
- HIBÁTLAN iPhone SE 2020 64GB Black-1 ÉV GARANCIA - Kártyafüggetlen, MS4001
- Lenovo ThinkPad T480s,FHD,14",i5-7300U,8GB DDR4,256GB SSD,WIN11,TOUCH,jó akku
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest