Hilfeeeeeeeee!!! Funktion

ich hab heut ein riesieges Problem:

Also:
Ich habe eine benutzerdefinierte Funktion geschrieben die lautet:

Function WennAuswahl(Zahl As String) As String
Select Case Zahl
Case 1
WennAuswahl = Range("B2").Value + Range("B3").Value
End Select
End Function

Mein Problem ist wenn ich die Zelle B2 oder B3 verändere verändern sich die Werte der Zelle mit der Formel nicht.

Zweitens:
Ich möchte das ich in dieser Funktion nicht alle Zelle einzeln addieren muss sondern eine Summe über B2:B50 bekomme.

Und dann ist noch was kurioses ich kann die Zelle in der die Formel steht nicht Formatieren z.B. Währung Warum?

Leider weis ich nicht wie ich dies anstellen soll

Danke schonmal für Eure Hilfe

Steffen