Kezdőlap › Fórumok › Excel programozás › [Resolved] Értékek másolása fix cellából de a beillesztés mindig új sorba
- This topic has 17 hozzászólás, 2 résztvevő, and was last updated 5 years telt el by Fecske22.
-
SzerzőBejegyzés
-
2019-12-17-11:58 #6558
Sziasztok!
Egy olyan makróra lenne szükségem, hogy:
Adott egy cellatartományom (pl.:A2:D2), ezekbe a cellákba mindig új számok kerülnek, amelyeket szeretnék kigyűjteni egy másik munkalapra.
De úgy másolja át az adatokat, hogy a beillesztés mindig a következő üres sorba történjen, és amit már egyszer átmásoltam az ne változzon meg.Valaki tudna nekem segíteni ebben??
Biológus vagyok, nem tudok programozni, csak próbálkozok a netről makrókat alkotni. És erre nem nagyon találtam még megoldást.
Előre is köszönöm a segítséget.2019-12-17-12:20 #6559Szia!
A lapon, ahova beviszed az értékeket, az A:D oszlop ne legyen zárolt. Védd le a lapot. Nálam a „SzuperTitkosJelszó”-védi a lapot.
Másold be a makrót egy modulba, majd tegyél ki hozzá egy gombot. Az aktuális sor A:D tartományát másolja a Munka2 lap első üres sorába. Ha van, ha nincs fejléc a Munka2-n, az első másolat a 2. sorba kerül (üres lap esetén).
Másolás után a kiinduló munkalap kitöltött sora nem írható felül, zároltak lesznek a cellák.Sub Masolas() Dim ide As Long ActiveSheet.Protect Password:="SzuperTitkosJelszó", UserInterfaceOnly:=True ide = Sheets("Munka2").Range("A" & Rows.Count).End(xlUp).Row + 1 Range("A" & Selection.Row & ":D" & Selection.Row).Copy _ Sheets("Munka2").Range("A" & ide) Range("A" & Selection.Row & ":D" & Selection.Row).Locked = True End Sub
2019-12-17-13:51 #6560Szia!
Köszönöm a gyors választ.
Működik a kód, szépen átmásolja a megadott cellákat a másik munkalapra és valóban mindig egy új üres sorba rakja őket.
Viszont az a baj hogy mindegyik sorba az új számokat másolja.
Az előzőleg átvitt számokat is átírja az új számokra.2019-12-17-14:10 #6561Csatolom az én füzetemet.
2019-12-17-14:11 #6562Pardon, csak becsomagolva lehet csatolni a makrós füzetet.
Attachments:
You must be logged in to view attached files.2019-12-17-15:15 #6564Sikerült.
Jól működik.
Nagyon szépen köszönöm a segítséget.2019-12-17-15:17 #6565Szívesen. Örülök, hogy végül összejött.
2019-12-18-10:53 #6569Szia!
Lenne egy következő problémám.
Készítenem kellett egy random szám generátort, mely egy gomb nyomásakor generál 5 számot.
Ezt gyakorlatilag a véletlen.között() függvénnyel meg is oldottam, írtam hozzá egy kis makrót, hogy amikor rákattintunk a gombra, akkor számolja újra a függvényt így új számokat generál. Viszont gyakran adja ugyanazt a számot amit már korábban is.Ezt a generátort több ember is használni szeretné, melyhez készítettem egy legördülő listát. Itt ki tudja majd választani magát az adott személy, majd generálni 5 számot, csakhogy a generáláskor figyelni kellene azt is, hogy adott embernél mely számok voltak már, és azokat ne adja ki újra a generáláskor.
Részben ehhez kellett a tegnapi makró, amivel most már át tudom menteni egy másik munkalapra, hogy melyik ember melyik számokat generálta. Ehhez kellene esetleg vmi feltételt kapcsolni, hogy ha ebbe a táblázatba már szerepel az adott személyhez egy szám, akkor azt ne generálja újra.
Remélem érthető volt valamennyire a probléma.
2019-12-18-11:45 #6570Mekkora számok kellenek, és mi az elrendezés?
A nevek esetleg külön-külön lapon vannak, vagy mindegyik egymás alatt valamelyik oszlopban 1 lapon? A kigyűjtés 1 lapra, vagy esetleg mindenkinek a saját lapjára történjen?2019-12-18-11:55 #6571Igazság szerint ez egy szóbeli vizsgáztatáshoz kell, ahol a vizsgáztató oktatók kiválasztják magukat egy legördülő listából (egy munkalapon). Majd ugyanezen a munkalapon a hallgató nyom egy gombot és generál neki 5 számot, amely a tételek száma, és a hozzá tartozó tétel egy másik munkalapon jelennek meg, amit utána ki tudunk nyomtatni.
Az első generált szám 1 és 30 között, a második, a harmadik és a negyedik 1 és 22 között, az ötödik 1 és 32 között kell legyen.
Az elrendezés minden egy sorban van B8 cella – oktatók listája; D8 – hallgató neve; I8 – első generált szám; K8 – második generált szám; M8 – harmadik generált szám; O8 – negyedik generált szám; Q8 – ötödik generált szám. A kigyűjtés pedig a B8:Q8 tartomány, ezt azzal a makróval sikerült megcsinálni, amit küldtél tegnap.A kigyűjtés egy munkalapra történik most, de lehet azt is hogy mindenkinek egy saját lapra történik a kigyűjtés. Így gondolom a generálásnál figyelembe tudja venni azt a cellát ahol az oktató neve szerepel, és annak megfelelően az adott oktató saját kigyűjtött listáját veszi figyelembe, hogy mely számokat ne generálja újra.
2019-12-18-11:58 #6572Úgy rémlik, hogy erre már megkaptad a választ egy másik fórumon…
2019-12-18-12:10 #6574Valóban kaptam még választ erre a problémára, csak elfelejtettem azt a fórumot megnézni. 🙂
Bocsi.
És ráadásul szerintem pont Te is írtál rá megoldást, legalábbis a felhasználónévből erre következtettem.
Ha az ott leírtakat sikerül megvalósítanom, akkor majd írok még ide is.
Ha nem sikerül, akkor majd írok, hogy hol akadtam el.2019-12-18-12:17 #6575Ott választásról volt szó, nem sorsolásról
2019-12-18-13:01 #6576Igen most néztem, tök jó ez a választható listás megoldás is, hogy mindig azzal csökken a amit már kiválasztottunk.
A videó alapján meg tudom csinálni, de ezt hogy integráljam bele a random szám generálásba?Illetve az egyik hozzászólásba kaptam ugyan egy excelt, de abban én nem láttam automatizálást, csak manuálisan másolni kellene, de én nem tudok ott ülni a gép mellett és minden oktatónál ezt megtegyem.
Illetve azért szeretném automatizálni, mert egyes oktatók teljesen távol állnak az exceltől, és nekik sajnos annyira le kell egyszerűsíteni, hogy csak egy gombot kelljen nyomnia, és minden működjön automatikusan.2019-12-18-13:13 #6577Nem szükséges a véletlen. A nebuló csak a számokat látja, abból választ. Ehhez az FKERES függvény megadja a szöveget.
2019-12-18-13:20 #6578Mondjuk azt megtudnám ezzel csinálni, hogy a hallgató választ a listából egy számot, tetszés szerint, de a számokhoz tartozó tétel címét nem látja, és pl. minden nap a számokhoz tartozó tételek sorrendjét megkeverem. Így nem tudják megjegyezni, melyik szám melyik tételt jelenti.
Ez egy teljesen más megközelítése a dolognak, de működhet is.És az eredeti felállásra nincs lehetőség?
Miszerint egy random szám generálásnál, megadhassam kivételeket tartalmazó tartományt (hogy azokat a számokat ne adja ki eredményül)
Azért érdekelne, hogy ezt meg lehet e oldani valahogy. 🙂2019-12-18-13:24 #6579Meg lehet oldani egymásba ágyazott ciklusokkal, de nem érdemes. Kevés az előállítandó szám, sok időbe kerül, míg mind az 5 szám eltérő lesz.
2019-12-18-13:58 #6580Nem kell mind az 5-nek eltérőnek lennie, mert az 5 szám különböző kalapból adja a tételt. Csak az a lényeg hogy egy újraszámoláskor, ne adja ismét azt a számot amit előbb. Tehát az első tétel kupachoz tartozó generált szám, minden egyes generáláskor más és más legyen.
-
SzerzőBejegyzés
- Be kell jelentkezni a hozzászóláshoz.