Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CheckBox
BildScreenshot zu CheckBox CheckBox-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 OptionButton
BildScreenshot zu OptionButton OptionButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

Userform | Herbers Excel-Forum


Betrifft: Userform von: Fredy
Geschrieben am: 10.12.2009 10:12:22

Hallo alle
Ich erstelle mir seit ein dar Monaten eine Datenbank für meine Arbeit
Da meine Arbeit sehr nervig ist und immer wieder zu wenig Zeit bleibt um wichtige Maschinen Daten zu erfassen versuche ich die Datenbank so zu gestalten das ich höchst möglich wenig eingebe muss

Frage
1. Wie krieg ich ein automatisches Datum in die Este TextBox
2. was muss ich für ein code einfügen das ich eine ComboBox verwenden kann damit ich die Sorte über die ComboBox aus wellen kan
3. und den code für die OptionButton für die aus Wal der Schicht

https://www.herber.de/bbs/user/66477.xls

wäre cool Danke schon mal

  

Betrifft: AW: Userform von: Hajo_Zi
Geschrieben am: 10.12.2009 10:16:55

Hallo Fredy,

Textbox1=Date bei Activate der UserForm

GrußformelHomepage


  

Betrifft: AW: Userform von: Jens
Geschrieben am: 10.12.2009 10:36:09

Hallo

https://www.herber.de/bbs/user/66478.xls

1. und 2. habe ich mal in die Datei eingebaut.

Zuerst die Schicht auswählen über die Optionbutton, dann füllt sich die Combobox mit den entsprechenden Sorten (ohne Doppelte).

Zu 3. müsste ich erst noch basteln.
Ich lasse die Frage aber noch offen, für andere Helfer.

Gruß Jens


  

Betrifft: AW: Userform von: Rudi Maintaire
Geschrieben am: 10.12.2009 10:54:14

Hallo
.Cells(Zelle,4)=fncSchicht

im Code der UF:

Private Function fncSchicht()
  Dim bytSchicht As Byte
  Dim arrSchicht
  arrSchicht = Array("nichts gewählt", "Früh", "Mittag", "Nacht")
  bytSchicht = -OptionButton1 - 2 * OptionButton2 - 3 * OptionButton3
  fncSchicht = arrSchicht(bytSchicht)
End Function

Gruß
Rudi


  

Betrifft: AW: Userform von: Fredy
Geschrieben am: 10.12.2009 11:38:58

ok danke für den Anfang

1. Datum in die Este TextBox: Geb
2. OptionButton für die aus Wal der Schicht: Geb
3. Combobox ist noch: offen ? was muss ich für ein code einfügen das ich eine Combobox verwenden kann damit ich die Sorte über die ComboBox aus wellen kan


Beiträge aus den Excel-Beispielen zum Thema "Userform"