title image


Smiley Re: VBA für Anfänger :-(
Hallo Tassos,



zur 1. Frage:



Private Sub ProtokollNummerErzeugen()

Dim frm As Object

Dim datum As String

Set frm = UserForm1

With frm

datum = .TextBox1

datum = Format(datum, "yyyymmdd")

.TextBox4 = datum & Left(.TextBox2, 1)

End With

End Sub



zur 2. Frage:

Private Sub UserForm_Initialize()

TextBox1.Text = "09.04.2006"

TextBox2.Text = "Nacht"

End Sub



wobei die Frage offen ist, in welchen Zellen denn die Werte stehen ?

Stehen sie z.B. immer an letzter Stelle einer Spalte, oder ver-

setzt davon (wg. Offset) ?



Viele Grüße

Herby













geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: