Ako používať hľadanie riešenia v jazyku Visual Basic

Jeden z aplikácie Microsoft Excel najmocnejších funkcií je " hľadanie riešenia " - schopnosť nájsť hodnotu pre bunku , ktorá produkuje určitý výsledok v inej bunke . Za normálnych okolností môžete nájsť cieľ vyhľadajte v menu " Data " alebo záložke " Ribbon " , ale ak potrebujete spustiť ciele Seek mnohokrát , môžete byť schopní ušetriť veľa času tým , že automatizuje s Visual Basic for aplikácie ( VBA ) . Našťastie , hľadanie riešenia je plne integrované do VBA , takže písanie makrá na použitie je jednoduché . Pokyny dovolená 1

Otvorte dokument programu Excel , v ktorom by ste chceli spustiť svoj ​​cieľ , vyhľadajte makro .
2

Nájdite dve bunky , ktoré chcete použiť pre hľadanie riešení . Prvá by mala byť bunky , pre ktoré máte pevnú cieľ . Druhý by mal byť mobilný necháte Excel zmeniť za účelom splnenia tohto cieľa . Hodnota prvá bunka musí byť vzorec , ktorý je založený na druhej bunke - v opačnom prípade , bez ohľadu na to , aké zmeny Excel je na druhej bunke , žiadne zmeny sa objavia v prvom
Sims 3

Otvorte okno Makro . V programe Excel 2007 alebo neskôr , to urobiť kliknutím na " Zobraziť " kartu na páse kariet , potom kliknutím na " makrá " . V starších verziách programu Excel , kliknite na ponuku " Nástroje " , vyberte " makro " potom vyberte " makrá . "
4

Zadajte názov pre váš cieľ vyhľadajte makro Makro okná , a kliknite na " Vytvoriť " . Tým sa spustí Visual Basic for Applications editor a ukázať vám , text nové makro , ktoré sa spustí tak , ako prázdny podprogram , ako je toto :

Sub MyMacroName ( ) End Sub
5

Vytvoriť rozsah objekt predstavujúci bunku , pre ktorú majú známe ciele ( prvej bunky z kroku 2 ) . Napríklad , ak chcete hľadanie riešení na bunku A1 , napíšte : .

Dim goalCell Ako RangegoalCell = ThisWorkbook.Worksheet ( 1 ) Range ( " A1 " )
6

Vytvoriť rozsah objekt predstavujúci bunku , ktorú chcete Excel zmeniť spôsobiť prvú bunku dosiahnuť známy cieľ . Napríklad , ak chcete , aby program Excel manipulovať bunku A2 , napíšte : .

Dim variableCell Ako RangevariableCell = ThisWorkbook.Worksheet ( 1 ) Range ( " A2 " )
7

Volanie metódy GoalSeek na cieľ bunky rozsah . Ako prvý argument , stanoviť hodnotu by ste ju chceli cieľ Snažte sa , ako druhý argument , poskytujú premenné bunky rozsah . Napríklad , ak by ste chceli , aby hľadanie riešení na 0 , napíšte :

goalCell.GoalSeek ( 0 , variableCell )

• Predchádzajúca strana: Ako na odovzdávanie informácií z jednej aplikácie Visual Basic Ďalšia 
• Ďalšia strana: Ako previesť 2 - Byte celé čísla 4 -byte v jazyku Visual Basic