< návrat zpět

MS Excel


Téma: kopírování obsahu vybraných buněk rss

Zaslal/a 17.6.2013 14:53

Dobrý den,
jsem začátečník v programování, proto se obracím o pomoc s příkazem. Na listu 2 bude tabulka dle vzoru a z ní bych potřeboval zvýrazněné hodnoty kopírovat na list 1. Ty se opakují po 33 a 35 řádcích. Zkoušel jsem jednoduchý příkaz, ale vzhledem k tomu, že tabulka má cca 6tis řádků, je tento příkaz nepoužitelný. Děkuji za pomoc.

Příloha: zip13947_seznam.zip (17kB, staženo 17x)
Zaslat odpověď >

#013948
avatar
dorobil som tam vlozit .. ostatne cupliky neviem naco presne potrebujes

vlozit funguje na style najdi Prehlad a od toho posuva sa a vytahuje udaje

takze je mozne ze to zle vytiahne ked sa v stlpci "D" bude aj inde nachadzat slovicko prehlad

keby nevyhovovalo staci napisat skusim to aj inak prerobit
Příloha: zip13948_seznam.zip (18kB, staženo 18x)
citovat
#013958
avatar
Děkuji. Když nakopíruji data do tabulky na list 2, která tam budou, objeví se chyba. Ještě by mě zajímalo, jak by bylo možné příkaz rozšířit o další buňky. Děkuji za pomoc
Příloha: zip13958_seznam.zip (16kB, staženo 14x)
citovat
#013959
Opičák
Ta data jsou nějaká podivná. V původním souboru byla zvýrazněná pouze data jednou v nějakém sloupci, teď je to ve sloupci H několikrát, co s tím? Udělal jsem nějaký makro, který porovnává normální a bold písmo, najde je a vypíše na List1, ale nevím, co s čísly ve sloupci H. Soubor zatím nepřikládám.citovat
#013960
avatar
hej nefungovalo to preto lebo bolo zmenene klucove slovo: "Prehlad" na "S E Z N"

btw. ako Opicak spomenul treba mat nejaku kotvu ktora sa v tom dokumente da zachytit bud to to je meno bunky alebo ze je to boldom vyznacene

tu je to opravene:
Příloha: zip13960_seznam.zip (16kB, staženo 16x)
citovat
#013961
avatar
Jedniná kotva, která připadá v úvahu je, že z listu 2 se budou kopírovat buňky jen z několika sloupců (např B8, D8, H6) a tyto adresy se mění pravidelně jednou po 35 a 33 řádcích (B8, B43, B76, B111) a to až do řádku cca 6700. Pokud někdo poradí, budu rád, děkujicitovat
#013963
avatar
ok skus toto:
Příloha: zip13963_seznam.zip (15kB, staženo 38x)
citovat
#013966
avatar
Paráda, maká super tak jak má. Díky moc za pomoc 9citovat
#014038
avatar
Použil jsem příkaz od Palooo a maká bezvadně. Jen jsem se chtěl zeptat, jestli je možné rozšířit oblast načítaných buněk, í buňky a popř. jak. Zkouším to a nenačítá mi to co bych potřeboval. Děkuji za pomoc.citovat
#014039
avatar
samozrejme ze ide

vsimaj si z celeho kodu len toto:
Cells(y + 1, 1) = Sheets("2").Cells(x, 2)
Cells(y + 1, 2) = Sheets("2").Cells(x, 4)
Cells(y + 1, 3) = Sheets("2").Cells(x - 2, 8)


tu uz je vidiet ze "Y" len napocitava riadky takze nic podstatne
Keby si tam chcel dodat new stlpce tak by si dal:
Cells(y + 1, 4) = "Test"
Cells(y + 1, 5) = "Test"
Cells(y + 1, 6) = "Test"


samozrejme ze nechces aby to vypisovalo "Test" ale nejaku bunku z toho dokumentu

takze "Test" prepiseme na:
Sheets("2").Cells(x, 2)

- "x" nam dava startovaci riadok zaciname v cykle na 8 potom +35 a +32 a +35 a +32 atd.
- "2" je stlpec
- takze aby sme vedeli co chceme zobrat musime ist na 8 riadok a len si zisti kolko od toho bodu sa nachadza ten udaj co chceme vytiahnut

naprikald:
udaj z 8 riadku je o 2riadky dole a 3 stlpec

zapiseme:
Cells(y + 1, 4) = Sheets("2").Cells(x +2 , 3)


hadam uz to je jasne? :)citovat
#014040
avatar
Děkuji za vysvětlení. Omlouvám se, ale začínám s programováním. Ještě jednou děkuji.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

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09