Stránka 1 z 1

Doplňování baličáku

Napsal: 18 čer 2012 21:13
od Syny09
Dobrý den, potřeboval bych poradit s automatickým doplňováním balícího listu, potřebuji aby když se např. do buňky A12 napíše typ který je shodný s tím co je v listu typy a automaticky doplnit sloupec Pcs, váha, a rozměry kartonů. Zkoušel jsem funkci SVYHLEDAT ale pokud není nic vyplněno tak to hází křížky #### a potom mi to nesčítá na konci listu váhu a tu potřebuji průběžně kontrolovat. Nejlepší by asi bylo nějaké makro, ale nějak nemůžu přijít na to jak ošetřit aby když se změní ve 12 řádku aby to vyplňovalo data pouze ve 12 řádku a potřebuju to na všech 522 řádků, takže nějaký if nebo Když nepřipadá v úvahu. Máte někdo nějaký nápad či návrh? Předem děkuji.

Re: Doplňování baličáku

Napsal: 18 čer 2012 23:21
od Azuzula
Zdravím,
řešila bych to funkcí "CHYBHODN" nebo "KDYŽ", vzorec do buňky "G14" je následující:
=CHYBHODN(SVYHLEDAT(A14;Typy!$A$2:$H$30;3;0);0)
nebo
=KDYŽ(A14="";0;SVYHLEDAT(A14;Typy!$A$2:$H$30;3;0))
Do ostatních buněk to už zvládnete upravit sám, co? ;)

Re: Doplňování baličáku

Napsal: 20 čer 2012 17:22
od Syny09
Děkuji za radu, ještě bych se chtěl zaptat, když chci deklarovat proměnou pro celý list tak ji píšu do General, napíšu:

Kód: Vybrat vše

Dim pal
pal = 1

a při jakékoli změně na listu to zahlásí:
invalid outside procedure
Nevíte někdo proč?

Re: Doplňování baličáku

Napsal: 20 čer 2012 17:58
od cmuch
To se znací takto

Kód: Vybrat vše

Const pal As Integer = 1

Re: Doplňování baličáku

Napsal: 20 čer 2012 21:40
od Syny09
jenze ja tu promenou potrebuju menit a to jaksi s konstantou nelze

Re: Doplňování baličáku

Napsal: 21 čer 2012 06:30
od cmuch
Tak pak bude jen

Kód: Vybrat vše

Dim pal as integer

a hodnota se bude nastavovat v jednotlivých makrech.