< návrat zpět

MS Excel


Téma: Goal seek rss

Zaslal/a 8.12.2013 19:58

Zdravím Vás,

omlouvám se ale začínám s VBA a hned mám problém :-).

Potřebuji použít funkci hledání řešení pro více buněk a nemohu najít ten správný kód můžete mi prosím poradit? Pro jednu buňku mi to samozřejmě funguje bezproblémů ale jde o to to rozšířit na všechny snadno.

Potřebuji v buňkách K12:K791 měnit hodnotu tak abych našel v buňkách L12:L791 hodnotu 0.

Předem moc děkuji za pomoc 1

Zaslat odpověď >

#016718
avatar
Vlož co jsi vytvořil a nejlépe i vzorový soubor...
P.citovat
#016724
avatar
no nejak nerozumiem zadaniu

ale skus takto:

for x = 12 to 791
if cells(x, 12) = 0 then if cells(x, 11) = "netusim co"
nextcitovat
#016731
avatar
Ahoj,

posílám to co potřebuji vyřešit. Je tam makro zapnutí ctrl+a pro řádek 11. Kde nastavuji hodnotu v buňce J11 na 0 tím, že měním hodnotu v buňce H11. Tohle je v pohodě to funguje. ale problém je v tom, ež bych to potřeboval pr ovšechny buňky v tabulce a to tedy až do řádku 791 a nevím jak nastavit ten rozsah této funkce. Mockrát děkuji za pomoc!
Příloha: zip16731_goal-seek.zip (19kB, staženo 31x)
citovat
#016732
avatar
Přidal jsem cyklus, který tvůj příkaz provede na všech vyplněných řádcích.
Příloha: zip16732_goal-seek.zip (21kB, staženo 36x)
citovat
#016733
avatar
Velmi děkuji. ještě dotaz. existuje nějaká příručka kde se určot jak to psát? ;)citovat
icon #016737
avatar
Pokiaľ sa tomu chceš seriózne venovať, tak si kúp trebárs Excel 2010 Power Programming with VBA od Johna Walkenbacha. Pokiaľ tou knihou prejdeš, tak 90% vecí, ktoré budeš potrebovať vytvoriť vo VBA pre Excel, tam nájdeš.citovat

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