Příspěvky uživatele


< návrat zpět

Díky moc, s tím už si snad poradím.

Díky za odpověď. Makro funguje bez problémů pro buňku D13. Pro E13 a další hládí chybu na třetím řádku. Taky bych to radší řešila vzorci, ale nenašla jsem, jak v excelu automaticky aktivovat dopočet.

Dobrý den, prosím o radu s makrem, ježto jsem začátečník a víc sama nestvořím. Připojila jsem ukázku v excelu, aby vše bylo názorné.
V buňkách D13:G13 mám hodnotu např. 2500, s tou potom počítám další operace, výsledek se mi zapíše do buňky G24. Pomocí Hledání řešení sleduji, aby buňka G24 měla hodnotu =0. Napsala jsem dvě makra, kdy při změně hodnoty buňky D13 dojde k dopočítání hodnoty pro G24=0 a tato hodnota se vloží do D20:
1) Spouštění makra při změně hodnoty buňky D13
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$13" Then
Call Makro2
End If
End Sub

2) Hledání řešení G24=0:
Sub Makro2()
Range("G24").GoalSeek Goal:=0, ChangingCell:=Range("D20")
End Sub

Potřebovala bych, aby se makro spouštělo při změně jakékoli z buněk D13:G13 a výsledná hodnota se zapsala do buňky o 8 řádků níže. Tj.
- změna hodnoty D13 vyvolá dopočet pro G24=0 a výsledek zapíše do D20;
- změna hodnoty E13 vyvolá dopočet pro G24=0 a výsledek zapíše do E20;
.......

Děkuji mockrát za jakoukoli radu.
Helena


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