Jak používat cílový cíl v jazyce Visual Basic

Krok 1

Otevřete dokument aplikace Excel, ve kterém chcete spustit makro pro hledání cílů.

Krok 2

Najděte dvě buňky, ve kterých chcete použít cílový cíl. První musí být buňka, ve které máte pevný cíl. Druhý by měl být, kdybyste povolili programu Excel změnit cíl. Hodnota první buňky musí být vzorec založený na druhém vzorci (jinak se změny provedené v Excelu ve druhé buňce nezáleží, protože se nezobrazí v první buňce).

Krok 3

Otevřete okno Makro. V aplikaci Excel 2007 nebo novější, můžete to udělat kliknutím na kartu "Zobrazit" v seznamu a klepnutím na "Makra". V předchozích verzích aplikace Excel klikněte na nabídku "Nástroje", zvolte "Makra" a potom "Makra".

Krok 4

Do okna makra zadejte název makra pro hledání cíle a klikněte na tlačítko "Vytvořit". Spustí program Visual Basic pro aplikace editoru a zobrazí text nového makra, který se zobrazí jako prázdný podprogram jako je tento:

Sub MyMacroName () End Sub

Krok 5

Vytvořte rozsah objektů představující buňku, pro kterou máte známý cíl (první buňka v kroku 2). Například pokud chcete cíl pro buňku A1, napište:

Dim cílCel jako rozsah goalCell = ThisWorkbook.Worksheet (1) .Range ("A1")

Krok 6

Vytvořte rozsah objektů, který představuje buňku, kterou chcete změnit v aplikaci Excel, aby se první buňka dostala do nového cíle. Například pokud chcete, aby aplikace Excel manipulovala s buňkou A2, napište:

Dim variableCell jako rozsah variableCell = ThisWorkbook.Worksheet (1) .Range ("A2")

Krok 7

Najděte metodu GoalSeek v rozsahu cílové buňky. Jako první argument nabízí hodnotu, na kterou chcete hledat cíl; jako argument, nabízí rozsah proměnné buňky. Pokud chcete například použít požadavek na cíl 0, napište:

cílCell.GoalSeek (0, variableCell)