Makro kvadratickej rovnice v programe Excel: 3 kroky

2024 Autor: John Day | [email protected]. Naposledy zmenené: 2024-01-30 12:02

môžete jednoducho vyriešiť kvadratickú rovnicu tak, že prejdete na makro-nástroje spustené v makre. Som nový člen a skutočne potrebujem akýkoľvek druh spätnej väzby, ktorú môžete poskytnúť. Užite si, že nebudete používať žiadny papier na riešenie týchto rovníc!

Krok 1: Nastavenie vecí

otvoriť excel každý rok je v poriadku (uprednostňuje sa 03, to som použil na vytvorenie tohto makra). Ak používate excel 07, bude sa zobrazovať a zobrazí sa malé pole s nápisom makro. Kliknite na ikonu a prejdite na záznam makra. Zobrazí sa okno, v ktorom sa nastaví názov a popis makra. Potom znova kliknite na ikonu makra a zobrazí sa ďalšie okno, v ktorom by mal byť názov makra (predvolený názov bude Macro1)

Krok 2: Vytvorenie makra

Dobre, teraz choďte na úpravu v okne, ktoré prišlo, malo by byť na pravej strane, tretie dole. Keď stlačíte tlačidlo Upraviť, zobrazí sa úplne nové okno s názvom Visual Basic Editor. Mal by existovať panel s nástrojmi a všetko ako každé okno, ale v okne by mala byť veľká sivá oblasť s oknom s názvom Module1 (Code). Vo vnútri modulu Module1 kliknite, keď ste naň chceli napísať, skopírujte ho a prilepte naň (urobte žalobu, že všetko, čo urobíte, v poli Module1 vymažete.) Sub QuadraticFormula () Dim a As Long Dim b b Long Long Dim c Ako zobrazí výzva Long MsgBox: = "sekera^{2 + bx + c = 0 ", _} Title: = "Riešenie kvadratického polynómu formulára:" a = Application. InputBox (výzva: = "Zadajte hodnotu koeficientu 'a', Typ: = 1) b = Application. InputBox (výzva: =" Enter hodnota koeficientu 'b', Typ: = 1) c = Application. InputBox (výzva: = "Zadajte hodnotu koeficientu 'c', typ: = 1) Ak a = 0, potom MsgBox" Rovnica nie je kvadratický "Inak, ak ((b * b) - (4 * a * c))> = 0 Potom MsgBox ((-b + (Sqr ((b * b) - (4 * a * c)))) / (2 * a)) MsgBox ((-b - (Sqr ((b * b) - (4 * a * c)))) / (2 * a)) Iné MsgBox "Žiadne skutočné riešenie - imaginárne" Koniec Ak Ukončiť podsekciu IfEnd

Krok 3: Dokončenie

Keď má toto okno všetko, čo som vám povedal, aby ste skopírovali a vložili, zatvorte VIsual Basic Editor. Nakoniec prejdite na makrá makra a potom spustite prvú na pravej strane. Malo by sa objaviť okno, ktoré kliknite na tlačidlo OK, potom sa zobrazí ďalšie pole, ktoré bude hodnotou A v rovnici, potom ďalšie, ktoré bude hodnotou B v rovnici, a potom ďalšie, ktoré bude hodnotou C. Hotovo Ak máte problém, povedzte mi to a nechajte mi nejakú spätnú väzbu.