MS Excel

Dobrý den,
potřeboval bych pomoct s makrem, které když se klikne na "čudlík" tak makro prověří sloupec pod čudlíkem, a kde bude číslo větší než 0 nakopíruje tyto čísla i s jejich názvem (sloupec A) do jiného listu. Jde mi o to, že mám tabulku se 140 řádkami a potřebuju blbu vzdorně udělat toto překopírování do jiného listu s makrem do dalšího programu.
Děkuju.

Zaslat odpověď >

Strana: « předchozí 1 2

elninoslov(28.12.2020 15:04)#049284

Ešte sa mi za tie roky nestalo že by vo VBA mal integer či long inú default ako 0, alebo boolean po deklarácii nemal False, či nedajbože Range nemala Nothing, alebo string nemal "".
Ešte nejaký ten zdroj...citovat

marjankaj(28.12.2020 16:29)#049285

Jiří497 napsal/a:

To jsem zkusil - teda jen jednou :)
Ale asi to nezvládnu psychicky, abych se na to spoléhal. Jedině, že by to bylo v manuálu - "vždy při deklaraci proměnné se nastaví na 0".
Ale manuál jsem nečetl a hledat se mi to nchce :(

Pozrieť sa do manuálu treba až zlyhajú všetky ostatné možnosti.

Murphyho zákon.citovat

elninoslov(28.12.2020 17:38)#049286

OT:
@marjankaj: Presne toto dodržiavam

Najskôr všetky možnosti vyskúšam, preštelujem, potom googlujem, potom kontakt známych, no a potom ... potom príde manželka a spraví to

EDIT: Inak ma napadá, ak by mali stĺpce hlavičky, a niekde by mohli byť 2 bunky s parametrom pre Rozšírený filter, tak stačí:
Sub Rozsireny_Filter()
Worksheets("List1").Range("A1:B141").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Worksheets("List1").Range("D1:D2"), CopyToRange:=Worksheets("List2").Range("A1"), Unique:=False
End Subcitovat

Strana: « předchozí 1 2

Téma: Makro na kopírování buněk větší než 1

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje