Ovaj će vam vodič pokazati kako koristiti Traženje cilja u VBA -i
Cilj je jedan od alata za analizu "Što -if" dostupnih u Excelu koji vam omogućuje da primijenite različite vrijednosti na formule i usporedite rezultate.
Sintaksa traženja cilja
Funkcija GoalSeek ima 2 argumenta - cilj (ćelija koju želite promijeniti) i ChangingCell (ćelija koju je potrebno izmijeniti). Funkcija vraća vrijednost True ili False - True ako je cilj pronađen, i False ako cilj nije pronađen.
Korištenje Traženja cilja u VBA -i
Razmotrite sljedeći radni list u nastavku.
Da bismo promijenili otplatu potrebnu svakog mjeseca promjenom roka u mjesecima, možemo napisati sljedeći postupak.
| 1234 | Sub PovećanjeTerm ()'napravite B6 100 promjenom B5Raspon ("B6"). GoalSeek Cilj: = 100, ChangingCell: = Raspon ("B5")Kraj podm |
Imajte na umu da u ćeliji B6 mora postojati formula, a u ćeliji B5 vrijednost.
Korištenje traženja cilja s if naredbom
Također možete koristiti GoalSeek s naredbom If za usmjeravanje tijeka vašeg koda.
| 12345678 | Sub PovećanjeTerm ()'napravite B6 100 promjenom B5 - i vratite poruku korisnikuAko je raspon ("B6"). GoalSeek (cilj: = 100, ChangingCell: = Raspon ("B5")) = IstinaMsgBox "Novi pojam je uspješno pronađen"DrugoMsgBox ("Novi pojam nije pronađen")Završi akoKraj podm |
