Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Excel Funktion
#1
Tongue 
Hallo Leute,

hab mir eine Excel Funktion geschrieben, Code kann ich später mal schicken.

Der Code funktioniert auch wie gewollt.

Problem manchmal aktualisiert die Formel nicht automatisch, erst durch klicken in die Formel wird der Wert aktualisiert.

Automatische Berechnung ist drinnen.

Kennt jemand so ein Problem?

Danke Leute und schönes Wochenende.

Grüße 
Bert
Antworten Top
#2
Hier noch der Code,

noch eine Frage dazu. Wieso nützt man Byref bzw. byfal? hab des jetzt nur mal so drinnen stehen.

Function haeufigkeit(ByRef Startzelle As Double, ByRef Endzelle As Double)
Dim i As Long
Dim Mittelwert As Double
Dim AbGerundet As Long ' Für Endzelle
Dim AufGerundet As Long ' Für Startzelle
Mittelwert = 0
AufGerundet = Application.RoundUp(Startzelle, 0)
AbGerundet = Application.RoundDown(Endzelle, 0)

For i = AufGerundet To AbGerundet

Mittelwert = Mittelwert + Worksheets("PS").Range("AC" & i)

Next i
'MsgBox Mittelwert
i = i - 1
Mittelwert = Mittelwert + Worksheets("PS").Range("AC" & AufGerundet - 1) * (AufGerundet - Startzelle)
'MsgBox Mittelwert
Mittelwert = Mittelwert + Worksheets("PS").Range("AC" & AbGerundet + 1) * (Endzelle - AbGerundet)
'MsgBox Mittelwert
Mittelwert = Mittelwert / (Endzelle - Startzelle)

haeufigkeit = Mittelwert

End Function
Antworten Top
#3
Hallo,

eine Erklärung zu ByVal und ByRef kannst Du hier finden.
Gruß Stefan
Win 10 / Office 2016
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 2 Gast/Gäste