Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Label
BildScreenshot zu Label Label-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema RefEdit
BildScreenshot zu RefEdit RefEdit-Seite mit Beispielarbeitsmappe aufrufen

Summe mit RefEdit-Steuerelement | Herbers Excel-Forum


Betrifft: Summe mit RefEdit-Steuerelement von: TOM
Geschrieben am: 30.10.2008 15:55:35

Hallo zusammen

Wie kann ich auf meinem Userform mit einem RefEdit-Steuerelement erreichen, dass mir die Summe ausgegeben wird der Zellen die ich per RefEdit ausgewählt habe???

Besten Dank für einen Tipp

Gruss
TOM

  

Betrifft: AW: Summe mit RefEdit-Steuerelement von: Dieter
Geschrieben am: 30.10.2008 16:01:03

Hi,

mit Application.Sum()

mfg Dieter


  

Betrifft: AW: Summe mit RefEdit-Steuerelement von: TOM
Geschrieben am: 31.10.2008 14:52:15

Besten Dank Dieter

Diese Antwort habe ich schon bekommen und läuft auch aber eigentlich möchte ich, dass die Summe nach meinem Zellbezug mit RefEdit gleich rechnet...aber ich habe kein Erreignis gefunden womit ich die Berechnung auslösen könnte?????

Gruss
TOM


  

Betrifft: MsgBox Application.Sum(Range(RefEdit1.Value)) von: NoNet
Geschrieben am: 30.10.2008 21:57:16

Hey Tom,

so funktioniert das:

MsgBox Application.Sum(Range(RefEdit1.Value))

Gruß, NoNet


  

Betrifft: AW: MsgBox Application.Sum(Range(RefEdit1.Value)) von: TOM
Geschrieben am: 31.10.2008 07:58:32

Guten Morgen NoNet

Besten Dank für Deine simple Lösung..... !!!!
Gibst kein Ereignis für das RefEdit-Steuerelement, dass die Summe gleich in ein Label schreibt nachdem ich den Zellbezug ausgewählt habe??

Deine Lösung funktioniert nur wenn ich mit einem Commandbutton Clickerreignis auslöse!

Gruss
TOM


  

Betrifft: Private Sub RefEdit1_Change() von: NoNet
Geschrieben am: 01.11.2008 12:31:57

Hallo Tom,


doch : Klaro gibt es solch ein Ereignis ! Probiere es doch mal mit folgendem Code im UserForm :

VBA-Code:
Private Sub RefEdit1_Change()
    Label1 = Application.Sum(Range(RefEdit1.Value))
End Sub
Code eingefügt mit Syntaxhighlighter 4.15


Gruß, NoNet


Beiträge aus den Excel-Beispielen zum Thema "Summe mit RefEdit-Steuerelement"