aktive Zelle - Form - Inhalt in diese Zelle
25.11.2003 06:58:31
woerny01
wie kann ich es erreichen, das aktivieren der Zellen ("G3:H17") und ("G23") und ("G27") ein UserForm gestartet wird und der Inhalt der cmbBox bei select in diese "aktive Zelle" zurück geschrieben wird. Es müßte für mehrere Tabellenblättter gültig sein.
Kann mir jemand helfen???
Mein Code sieht, bisher so aus - aber die Übergabe in die aktive Zelle klappt nicht
Public myTime
Function fktGetTime()
Dim Time As Date
fktGetTime = myTime
End Function
Private Sub cmbTime_Click()
myTime = CDate(cmbTime)
Unload frmTime
End Sub
Private Sub frmTime_Initialize()
Dim h As Integer, m As Integer
For h = 0 To 23
For m = 0 To 45 Step 15
cmbTime.AddItem Format(h, "00") & ":" & Format(m, "00")
Next m
cmbTime.Value = "08:00"
Next h
End Sub
Ich sag schon mal Danke
Werner
Anzeige