< návrat zpět

MS Excel


Téma: Kopírovanie riadkov z hárku do hárku rss

Zaslal/a 27.4.2015 13:33

maeAhojte,
potreboval by som poradiť..
Mám 2 hárky s údajmi - Data a Ukončené.
Údaje v hárkoch sú rozdelené do podskupín (1A, 1B, 1C, 2, 3 atď)
Potreboval by som makro ktoré po napísaní číslovky do stĺpca F (Fáza), skopíruje daný riadok z hárku Data do hárku Ukončené s tým že to nekopíruje len-tak do prvého volného riadku ale sa zachová aj daná podskupina. To znamená že ak sa bude kopírovať riadok napríklad z podskupiny 1A tak program prejde na hárok Ukončené, vloží riadok do podskupiny 1A (nakoniec podskupiny) a tam celý riadok skopíruje. Následne skopírovaný riadok v prvom sheete vymaže.
+ Zapíše do stĺpca 1-10 písmeno X (podľa toho akú číslovku na začiatku vložím, ak 10 tak zapíše X do stĺpca 10)

Viď názorná ukážka v prílohe, kopírovaný riadok som označil žltou.

Ďakujem za každú pomoc.. Mae

Zaslat odpověď >

#024656
mae
este ta priloha:citovat
#024657
elninoslov
Prosím upresni mi ešte raz a podrobne, čo patrí ku ktorej skupine/podskupine. Mne z toho teda vôbec nieje jasné, čo je skupina a čo je podskupina.
Totiž:
-prvá je uvedená číslica (nazvime to radšej znak) "1", to evokuje, že to je skupina "1". Tá obsahuje (???) podskupiny "A", "B", "C", "D" ???, To mi ale nesedí, pretože ďalej je "2", čo by mala byť asi skupina (nie podskupina), ale tá neobsahuje žiadne podskupiny "A", "B" ... Rovnako "3".

Tak ako je to napísané mi to nedáva zmysel. Pripadá mi to nekonzistentné (rozdielne).

Ja by som si podobný problém predstavoval takto:
- mám skupiny napr. 1,2,3,...
- v každej z nich sú podskupiny A,B,C,...

Prečo je to dôležité? Lebo je logické zapísať do "Ukoncene" najskôr názov skupiny, potom podskupiny, a potom riadok s údajom (samozrejme riadok sa zoskupí s jeho podskupinou/skupinou). Kdežto teraz to v tom "Ukoncene" vyzerá tak, že raz je skupina číslo a podskupina písmeno, a potom opačne. Narážam na riadky 2,3 a 11,12 v Ukoncene.

Navyše data až na jeden riadok v Ukoncene nekorešpondujú s Data.

Navrhujem:
Vyfarbi mi prosím v Data aj Ukoncene rovnaké skupiny a podskupiny rovnakou farbou, napr. vyfarbením G v Data a Q v Ukoncene.

Keď to pochopím, tak ti to (snáď) urobím.citovat
#024660
mae
Dik Elnino, pravdu mas.. upravil som to tak aby boli najprv skupiny, potom podskupiny. Teraz by to malo byť uz prehľadné a pochopiteľné. (viď nová príloha).

Vezmi si to potom tak že každý riadok je jeden projekt.
Logika makra bude taká že keď sa riadok/projekt v sheete Data ukončí (zapísaním číslovky do stĺpca F) - program vystrihne daný riadok z Data a prilepí ho do sheetu Ukoncene do rovnakej skupiny/podskupiny. Následne kopírovaný riadok v sheete Data zmaže (v prílohe som ho ešte nezmazal nech je vidno čo sme kopírovali kam - to je ten riadok označený žltou).

Čiže riadky v sheetoch Data a Ukoncene nemajú korešpondovať. Najprv bude v sheete Data všetko a v sheete Ukoncene nič. Až keď sa ukončí daný projekt/riadok v sheete Data - vtedy sa to presunie zo sheetu do sheetu. Čiže na konci keď sa každý projekt/riadok ukončí to bude vyzerať presne opačne tá tabuľka - do sheetu Ukoncene sa presunie všetko a v sheete Data nezostane nič. Dúfam že sa mi to podarilo vysvetliť, ak ešte niečo nejasné tak daj vedieť.. Dik!citovat
#024680
elninoslov
No vyskúšajcitovat
#024699
mae
Waw! keby som tomu ja raz takto rozumel.. :)
Perfektny kod, skvela praca, dikes !citovat
#024716
mae
Velmi si vazim pomoc a nechcem po podanom prste schmatnut celu ruku.
Ale predsalen ak by sa v tom programe dala dorobit este jedna nazvyme to "malickost", velmi by pomohlo! (Co konkretne mam namysli som napisal do komentu programu hore do 6-10teho riadku medzi dve plne ciary. (vid v prilohe).

Chcem sa este ako laik spytat ktory prikaz v tom programe hovori ze ked vlozim cislo do bunky a dam enter tak sa spusti makro (ja som doteraz vzdy spustal makro iba cez button:)citovat
#024729
elninoslov
Makro je spúšťané z udalosti OnChange listu Data, ktorá kontroluje všetky zmeny v liste Data, a ak došlo k zmene v danom stĺpci spustí makro. Túto OnChange metódu uvidíš, keď 2x klikneš vo VBA Editore na list Data.

Tie poznámky budem musieť dorobiť neskôr. Prečítal som to len zbežne. Momentálne ma "okupuje" syn :) Takže keď bude čas, OK.

EDIT: Formátovanie som teraz urobil na každom hárku cez Podmienené formátovanie (a to aj skupiny, aj podskupiny, aj data). Ak to tak môže byť, zmaž si vyapostrofované časti v procedúre pPresunFaza v konštrukcii With. Snáď som to dobre pochopil. Pekný deň.

EDIT2: Ešte malá zmena - odstránenie zabudnutých nepoužitých premenných a obmedzenie Fázy na číslo <43 v OnChange. Príloha vymenená za aktuálnu.citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Vyhledej

PavDD • 23.4. 12:29

Vyhledej

PavDD • 23.4. 11:47

Relativní cesta - zdroje Power Query

Alfan • 23.4. 10:52

Relativní cesta - zdroje Power Query

elninoslov • 23.4. 10:22

Relativní cesta - zdroje Power Query

lubo • 23.4. 10:15

Relativní cesta - zdroje Power Query

Alfan • 23.4. 10:11

Relativní cesta - zdroje Power Query

lubo • 23.4. 10:11