VBA - Uporaba cilja iskanja v VBA

Ta vadnica vam bo pokazala, kako uporabljati iskanje ciljev v VBA

Iskanje cilja je eno od orodja za analizo Kaj -if, ki je na voljo v Excelu in vam omogoča, da za formule uporabite različne vrednosti in primerjate rezultate.

Sintaksa iskanja cilja

Funkcija GoalSeek ima 2 argumenta - cilj (celico, ki jo želite spremeniti), in ChangingCell (celico, ki jo je treba spremeniti). Funkcija vrne vrednost True ali False - True, če je cilj najden, in False, če cilj ni najden.

Uporaba cilja za iskanje v VBA

Razmislite o naslednjem delovnem listu spodaj.

Če želite spremeniti odplačilo, ki je potrebno vsak mesec s spreminjanjem roka v mesecih, lahko napišemo naslednji postopek.

1234 Sub PovečajTerm ()"naredite B6 100 s spremembo B5Obseg ("B6"). Cilj GoelSeek: = 100, Spreminjanje celice: = Razpon ("B5")End Sub

Upoštevajte, da mora biti v celici B6 formula in vrednost v celici B5.

Uporaba iskanja cilja z izjavo if

Za usmerjanje toka kode lahko uporabite tudi GoalSeek z izjavo If.

12345678 Sub PovečajTerm ()'naredite B6 100 s spremembo B5 - in uporabniku vrnite sporočiloČe je obseg ("B6"). GoalSeek (cilj: = 100, ChangingCell: = obseg ("B5")) = resMsgBox "Nov izraz je bil uspešno najden"Sicer paMsgBox ("Nov izraz ni bil najden")Konec ČeEnd Sub

wave wave wave wave wave