-
GAMEPOD.hu
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
-
fogtunder
nagyúr
sziasztok,
egy kis segítséget szeretnék kérni macro írásban, sajnos visual basic-ben eléggé nulla vagyok, alapszinten tudok kódot értelmezni, de az most nem sokat ér sajnos.
adott egy táblázat, amiben a sorok termékeket, az oszlopok ezek heti értékesítéseit tartalmazzák. az A oszlop tartalmazza a termékek cikkódját, ez alapján szoktam fkeressel áthúzni egy reportból az értékesítési adatokat minden héten, ezt szeretném automatizálni. a táblázat időnként bővül plusz sorokkal, szóval a range sem fix.
szóval, amit a makrónak csinálni kellene:
- a harmadik sorban megkeresi az első üres cellát
- beilleszti ezt a képletet: =IFERROR(VLOOKUP(A3;Stock_Movements_Coverage'!A:AC;17;0);0)
- ezt a képletet autofill segítségével másolja lefelé
- kijelöli az imént szerkesztett oszlopot és visszamásolja bele a képlet végeredményét értékkénttaláltam egy megoldást, amivel sikerült megoldani, de az minden sorban elvégzi az első üres cella megkeresését és a képlet beillesztését egyenként, és lassabb, mint ahogy megírom a függvényt minden hétfőn.
a bónusz, hogy az Excellel felvett makró megbukik az autofill részen, szerinte hibás a range. tud valaki valami egyszerű megoldást erre?
köszönöm
[ Szerkesztve ]
I hate morning people. And mornings. And People.
-
fogtunder
nagyúr
válasz Delila_1 #21165 üzenetére
még egy kérdésem lenne ehhez a részhez:
Range(Cells(3, oszlop), Cells(usor, oszlop))
itt kötelezően van a cellahivatkozás kvázi fordítva (először a sor, aztán az oszlop) megadva, vagy lehetne így is?
Range(Cells(oszlop, 3), Cells(oszlop, usor))
I hate morning people. And mornings. And People.
-
fogtunder
nagyúr
-
fogtunder
nagyúr
válasz peugeotmate #21180 üzenetére
rendelt csokor és csokor ár, arra figyelj, hogy a csokor árat ne összegként mutassa a kimutatásban.
I hate morning people. And mornings. And People.
-
fogtunder
nagyúr
sziasztok,
lenne egy aránylag egyszerű makró, amivel nem boldogulok, sajnos próbálkozásaim ellenére nem megy nekem ez a téma.
szóval amit csinálnia kellene:
van 3 sheetünk, sheet1, sheet2, sheet3
sheet1 az, ahol a munka folyik, a többi adatforrásként szolgál
sheet1 a és b oszlopába az első sornál kezdve át kellene másolni sheet2 a és b oszlopát, amíg vannak benne értékek (ez változó sorszámot jelent). ugyanígy lenne sheet1 H oszlopa sheet 2 K oszlopa a negdeik sortól, sheet1 K-L-M oszlopa sheet2 N-O-P oszlopa.
sheet1 C és D oszlopában végig kell húzni egy VLOOKUP-ot a korábban bemásolt adatok mellé, majd kicserélni a függvényt értékekre a cellákban
sheet1 E-F-G értékei sheet3 C1, D1 és E1 értékei fixen lemásolva
sheet1 I egy VLOOKUP függvény végigmásolva, értékekre kicserélve
sheet1 J oszlopa a H*I szorzás az adott sorra végigmásolva, értékekre kicserélvenagyon köszi, ha valaki segít
I hate morning people. And mornings. And People.
-
fogtunder
nagyúr
válasz Delila_1 #33997 üzenetére
C oszlop: =VLOOKUP(A37002;Support!L:Q;4;0)
D oszlop: =VLOOKUP(A37002;Support!L:Q;3;0)
I oszlop: =IFERROR(VLOOKUP(A37002;MAP!B:E;4;0);0)illetve bocs, most láttam, hogy nem írtam le egy fontos dolgot, a sheet2-ről másolandó adatok a 4. sortól lefelé kezdődnek.
köszi
[ Szerkesztve ]
I hate morning people. And mornings. And People.
-
-
fogtunder
nagyúr
válasz Delila_1 #34014 üzenetére
király, köszönöm!
csak még egy kérdés, ha a másolsnál csak az értékeket szeretném beilleszteni, akkor azt hogyan csináljam?
így próbáltam, de ez nem megy:
Sheets("Stock_Movements_Coverage").Range("A4:B" & usor).Copy Sheets("Lifecycle_Tracking").Range("A" & ide).PasteSpecial xlPasteValues
I hate morning people. And mornings. And People.
-
fogtunder
nagyúr
válasz Delila_1 #34022 üzenetére
köszi, illetve csináltam egy módosítást. az eredeti verzióban sheet3-ról másolja a C1:E1 cellákat sheet1 E1-re, na nekem az kellene, hogy ez menjen az E oszlop első üres sorába, mint a többi és másolja le a sheet2-ről bemásolt adatok mellé. működik is, de valamiért túlmegy a sheet2-ről másolt sorok számán:
Sheets("Projection").Range("C1:E1").Copy
Sheets("Lifecycle_Tracking").Range("E" & ide, "G" & ide + usor).PasteSpecial xlPasteValuesI hate morning people. And mornings. And People.
-
fogtunder
nagyúr
sziasztok,
a cég nemrég áttért a 2016-os Office-ra a 13-as verzióról és hát vannak gondjaim vele, nem csak excel fronton, de ez a legégetőbb.
elég sok billentyűkombinációt használok, illetve alapvetően elég gyorsan dolgozom, és a program egyszerűen képtelen követni a beadott parancsokat olyan tempóban, mint az elődje. a gép egy Lenovo T460, négymagos i5, 16GB RAM, SSD, szóval semmi nem indokolja, hogy laggoljon egy táblázatkezelő, de mégis. a hardveres gyorsítás kikapcsolásán és az animációk letiltásán (aki ezt kitalálta egy produktivitásra kihegyezett programba, azt is arconverném egy péklapáttal) már túlvagyok, de még mindig egy katasztrófa.
van valami egyéb trükk, amit be tudok vetni, hogy gyorsabb legyen, vagy fogadjam el, hogy ez egy ekkora foskupac és éljek tovább vele?
I hate morning people. And mornings. And People.
-
fogtunder
nagyúr
válasz Fferi50 #39253 üzenetére
ezeken az optimalizációkon már túl vagyok, mert ezek a régebbi verziónak is be tudták tenni a kaput, nincsen sok erős terhelést adó függvény, a hálózat gigabit LAN, de amúgy lokális file-okkal, amiben csak pár kilobyte adat van, képletek nélkül ugyanez történik.
számomra egyértelműen a UI a ludas.
[ Szerkesztve ]
I hate morning people. And mornings. And People.
Új hozzászólás Aktív témák
- Android alkalmazások - szoftver kibeszélő topik
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Ukrajnai háború
- Videó stream letöltése
- Gaming notebook topik
- Motorola Moto G24 Power - hol van az erő?
- Milyen videókártyát?
- Helldivers 2 (PC, PS5)
- Xbox Series X|S
- Vicces képek
- További aktív témák...