3.2. Ein weiterführendes Beispiel
Auch im nächsten Beispiel wird eine technische Formel in VBA umgesetzt und unter Excel verwendet. Ihre Aufgabe besteht zuerst darin, die Funktionen zur Berechnung der Ladekurve und der Entladekurve zu programmieren. Im nächsten Schritt werden Sie die Funktion in der Tabelle einsetzen.
Beispiel 3-5. Laden eines Kondensators
' Funktion zum Berechnen der Ladekurve eines Kondensators
'
' Diese Funktion gibt die Spannung abhängig von
' - Widerstand R
' - Kapazität C
' - Grundspannung U
' - Zeit t
' zurück.
Function kond_uc_laden(R, C, U, t As Double) As Double
kond_uc_laden = U * (1 - Exp(-1 * (t / (R * C))))
End Function
Die Ladefunktion können Sie nun in VBA als benutzerdefinierte Funktion testen. In der Tabelle ist zu sehen, welche Spalten und Zeilen dafür vorgesehen sind. In dieser Übung verwenden Sie die Funktion noch mit Hilfe des Funktionsassistenten. Aber im nächsten Schritt werden die Zeilen und Spalten dann schon automatisch ausgefüllt. Bitte halten Sie deshalb die angegebenen Zelladressen ein.
Beispiel 3-6. Entladen eines Kondensators
' Funktion zum Berechnen der Entladekurve eines Kondensators
'
' Diese Funktion gibt die Spannung abhängig von
'
' - Widerstand R
' - Kapazität C
' - Grundspannung U
' - Zeit t
'
' zurück.
Function kond_uc_entladen(R, C, U, t As Double) As Double
kond_uc_entladen = U * (Exp(-1 * (t / (R * C))))
End Function