Microsoft Excel

Herbers Excel/VBA-Archiv

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

Datum in Textfeld schreiben | Herbers Excel-Forum


Betrifft: Datum in Textfeld schreiben von: stefan
Geschrieben am: 26.11.2009 17:56:53

Hallo,

ich tu mich mit Excel 2007 ziemlich schwer.

will einfach nur bei aufruf eines formulars in ein textfeld das aktuelle datum schreiben.
lblStand.Caption = "heute()"

Desweiteren will ich ein ein anderes textfeld einen Summenbetrag eintragen. Auch das ging nicht.

Könnt Ihr mir etwas auf die Sprünge helfen?

Danke Euch.

  

Betrifft: AW: Datum in Textfeld schreiben von: IngGi
Geschrieben am: 26.11.2009 18:13:24

Hallo Stefan,

zum Beispiel so:

lblStand.Caption = Format(Date, "dd.mm.yyyy")
Wie sieht dein Code für den Summenbetrag aus?

Gruß Ingolf


  

Betrifft: AW: Datum in Textfeld schreiben von: stefan
Geschrieben am: 26.11.2009 20:30:04

vielen dank, doch leider funzt das nicht.

Sub zeigeAuswertung()

    frmAuswertung.Show
    
    lblStand.Caption = Format(Date, "dd.mm.yyyy")
  
End Sub
Es kommt immer der Fehlerhinweis "Objekt erforderlich".

Wer kann mir helfen?

Danke vielmals


  

Betrifft: AW: Datum in Textfeld schreiben von: F1
Geschrieben am: 26.11.2009 20:40:14

Sub zeigeAuswertung()

    frmAuswertung.Show
    
   frmAuswertung.lblStand.Caption = Format(Date, "dd.mm.yyyy")
  
End Sub



  

Betrifft: AW: Datum in Textfeld schreiben von: stefan
Geschrieben am: 26.11.2009 21:09:52

hallo F1,

leider wird das ergebnis immernoch nicht angezeigt. ich weiss auch nicht, wo das problem ist :-(


  

Betrifft: AW: Datum in Textfeld schreiben von: IngGi
Geschrieben am: 26.11.2009 21:14:32

Hallo F1,

das wird so nicht funktionieren.

Nach dem Aufruf des Userformulares kommt die Zeile zu spät! ;-)

Gruß Ingolf


  

Betrifft: AW: Datum in Textfeld schreiben von: IngGi
Geschrieben am: 26.11.2009 21:12:50

Hallo Stefan,

an der richtigen Stelle funktioniert das schon. Die Zeile kommt in das Initialize-Ereignis im Codemodul des Userformulares!

Private Sub UserForm_Initialize()
lblStand.Caption = Format(Date, "dd.mm.yyyy")
End Sub
Code eingefügt mit VBA in HTML 2.0.0.3

Gruß Ingolf


Beiträge aus den Excel-Beispielen zum Thema "Datum in Textfeld schreiben"