VBA - Använda målsök i VBA

Denna handledning visar dig hur du använder Målsök i VBA

Målsökning är ett av vad -om -analysverktyget som finns i Excel som låter dig tillämpa olika värden på formler och jämföra resultaten.

Målsökande syntax

Funktionen GoalSeek har två argument - målet (cellen du vill ändra) och ChangingCell (cellen som behöver ändras). Funktionen returnerar ett sant eller ett falskt - sant om målet hittas och falskt om målet inte hittas.

Använda målsök i VBA

Tänk på följande arbetsblad nedan.

För att ändra den återbetalning som krävs varje månad genom att ändra termen i månader kan vi skriva följande procedur.

1234 Underhöjningstid ()'gör B6 100 genom att ändra B5Område ("B6"). GoalSeek -mål: = 100, ChangingCell: = Område ("B5")Avsluta Sub

Observera att det måste finnas en formel i cell B6 och ett värde i cell B5.

Använda målsök med ett if -uttalande

Du kan också använda GoalSeek med en If -sats för att styra flödet av din kod.

12345678 Underhöjningstid ()'gör B6 100 genom att ändra B5 - och skicka ett meddelande till användarenIf Range ("B6"). GoalSeek (Goal: = 100, ChangingCell: = Range ("B5")) = True ThenMsgBox "Ny term hittades framgångsrikt"AnnanMsgBox ("Ny term hittades inte")Avsluta omAvsluta Sub

wave wave wave wave wave