Excel'de İkinci Dereceden Denklem Makrosu: 3 Adım

2024 Yazar: John Day | [email protected]. Son düzenleme: 2024-01-30 13:22

ikinci dereceden bir denklemi sadece araçlar-makro-çalıştır makroya giderek kolayca çözebilirsin. Yeni üyeyim ve gerçekten verebileceğin her türlü geri bildirime ihtiyacım var. Bu denklemleri çözerken hiç kağıt kullanmamanın tadını çıkar!

Adım 1: İşleri Ayarlama

excel'i herhangi bir yıl aç tamamdır (tercih edilen 03, bu makroyu yapmak için kullandığım şeydi). Excel 07 kullanıyorsanız görüntü altında olacak ve makro yazan küçük bir kutu olacaktır. Simgeye tıklayın ve makroyu kaydetmeye gidin, bir pencere açılacak ve makronun adını ve açıklamalarını ayarlayacaktır. Bunu yaptıktan sonra makro simgesine tekrar tıklayın ve başka bir pencere görünecektir, pencerede makronun adı orada olmalıdır (varsayılan ad Macro1) olacaktır.

Adım 2: Makroyu Yapmak

Tamam şimdi düzenlemeye gidiyorsun karşına çıkan pencerede sağ tarafta üçüncü altta olmalı. Düzenleme düğmesine bastığınızda, görsel temel düzenleyici adı verilen yepyeni bir pencere açılacaktır. Herhangi bir pencere gibi bir araç çubuğu ve her şey olmalı, ancak pencerede Modül1(Kod) adlı bir pencere ile büyük bir gri alan olmalıdır. Modül1'in içine, yazacağınız gibi tıklayın ve bunu kopyalayıp yapıştırın (Modül1 kutusunda bunu yapmadan önce her şeyi silmeyi dava edin.) Sub QuadraticFormula() Dim a As Long Dim b As Long Dim c Uzun MsgBox istemi olarak:="ax^{2 + bx + c = 0", _} Title:="Formun İkinci Dereceden Bir Polinomunu Çözme:" a = Application. InputBox(prompt:="'a' katsayısının değerini girin", Type:=1) b = Application. InputBox(prompt:="Enter 'b' katsayısının değeri", Type:=1) c = Application. InputBox(prompt:="'c' katsayısının değerini girin", Type:=1) Eğer a = 0 ise MsgBox "denklem ikinci dereceden değil" Else If ((b * b) - (4 * a * c)) >= 0 Sonra MsgBox ((-b + (Sqr((b * b) - (4 * a * c)))) / (2 * a)) MsgBox ((-b - (Sqr((b * b) - (4 * a * c)))) / (2 * a)) Else MsgBox "Gerçek Çözüm Yok - Hayali" End If End IfEnd Sub

3. Adım: Bitirme

Bu pencere size kopyalayıp yapıştırmanızı söylediğim her şeye sahip olduğunda VIsual Basic Editor'ı kapatın. Son olarak makro görünümü makrolarına gidin, ardından ilkini sağ tarafta çalıştırın. Açılan bir pencere olmalı, Tamam'a tıklayın, ardından denklemde A'nın değeri olacak başka bir kutu görünecektir, sonra denklemde B'nin değeri olacak başka bir kutu ve daha sonra C'nin değeri olacak başka bir kutu görünecektir. Bir sorununuz varsa lütfen bana söyleyin ve lütfen bana bir tür geri bildirim bırakın.