< návrat zpět

MS Excel


Téma: Tlačítko - kopírování rss

Zaslal/a 26.8.2020 19:34

FantasykZdravím,
řeším zapeklitou věc.
V příloze mám dokument a v něm přidané 3 tlačítka
Potřeboval bych poradit jak mám udělat, když kliknu např. na tlačítko B, aby to skopírovalo hodnoty z listu2 a vložilo do listu1: M6 až P45, ale to písmeno se někdy může nacházet i někde jinde.

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

#047806
Fantasyk

lugr napsal/a:

Pokud to správně chápu, tak se mění písmena v buňkách
F2, J2 a N2. Tak by to mohlo být takto.Příloha: 47804_klikabc.zip (22kB, staženo 4x)

nějak ten soubor nejde stáhnout...

Stránka nenalezena
Vámi požádovaná stránka nebyla nalezena.citovat
#047807
avatar

lugr napsal/a:

Pokud to správně chápu, tak se mění písmena v buňkách
F2, J2 a N2. Tak by to mohlo být takto.Příloha: 47804_klikabc.zip (22kB, staženo 5x)

Ani na telefonu nejdecitovat
#047808
Lugr
Zkusím to ještě jednou. Nechápu proč mi to dělá. 7
Příloha: zip47808_klikabc.zip (22kB, staženo 20x)
citovat
#047811
Fantasyk

lugr napsal/a:

Zkusím to ještě jednou. Nechápu proč mi to dělá. Příloha: 47808_klikabc.zip (22kB, staženo 2x)

už to jde stáhnout děkuji..
a prosím tě jde udělat podmínka, když v té lokaci
Sheets("List1").Cells(6, i)
něco najde aby vyskočilo okno, že se tam něco nachází?
Myslím tím, tam kde má vše vložit

děkujicitovat
#047815
Lugr
Takhle?

A ještě jsem Vám tam vložil aby na Listu2 našel všechny data.

Snad to bude tak v pořádku.
Příloha: zip47815_klikabc.zip (23kB, staženo 21x)
citovat
#047821
Fantasyk

lugr napsal/a:

Takhle?

A ještě jsem Vám tam vložil aby na Listu2 našel všechny data.

Snad to bude tak v pořádku.Příloha: 47815_klikabc.zip (23kB, staženo 4x)


Funguje to, ale má to ještě menší problém, jelikož se může stát, že hodnota ta první může být prázdná, ale ostatní můžou něco obsahovat a to se nesmí přemazat.

na tom 6tém řádku když ho smažu tak se to skopíruje, a to právě nemůže :-( musí to prohlídnou všechny řádky, ale jen v té lokaci, kterou jsem zadal. Ty řádky navíc mi moc nepomůžou 7citovat
#047822
Lugr
Řádky navíc jsem tedy zrušil. Nyní by to mělo být jak chcete.
Příloha: zip47822_klikabc.zip (23kB, staženo 23x)
citovat
#047827
avatar
Možná by bylo lepší testovat celou oblast místo jen řádku 6. Toto ...Sheets("List1").Cells(6, i + 3).. bych nahradil tímto...Sheets("List1").Cells(45, i + 3)... Místo 6 dát 45.citovat
#047829
Fantasyk
Děkuji mockrát funguje parádněcitovat
#047832
Lugr

Jiří497 napsal/a:

Možná by bylo lepší testovat celou oblast místo jen řádku 6. Toto ...Sheets("List1").Cells(6, i + 3).. bych nahradil tímto...Sheets("List1").Cells(45, i + 3)... Místo 6 dát 45.


Ano správně, moje chyba. 8

Děkuju Jiří497citovat

Uživatelské menu

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

Menu

Formulář Faktura

Formulář Faktura IV

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

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje