Private Sub Command1_Click()
Dim strSelected As String
Do While x <> List1.ListCount
If List1.Selected(x) = True Then
strSelected = strSelected & List1.List(x) & "; "
End If
x = x + 1
Loop
MsgBox strSelected
End Sub
Private Sub Form_Load()
Do While i <> 10
List1.AddItem i
i = i + 1
Loop
End Sub
hoffentlich kannst du was mit diesem beispiel anfangen
Dim Ergebnis
Dim Dateinr As Integer
Dim Temp As String
On Error GoTo err_err
Dateinr = FreeFile
Open "DatePfad" For Input As Dateinr
Do While Not EOF(Dateinr)
Line Input #Dateinr, Temp
'an dieser stelle den wert der temp variable in eine zelle schreiben o.ä.
Loop
Close Dateinr
Exit Sub
'Fehlerbehandlung
err_err:
MsgBox Err.Description, vbCritical
hoffe das alles verständlich ist, wenn nicht schreib ruhig
Also ich hab mal gehört das die Klingonen angeblich von den Menschen abstammen sollen :confused: und sich halt weiterentwickelt haben... denk ich zumindest :confused:
ähm und vor allem haben sich die Klingonen in den Jahren erst entwickelt. wenn man ganz alte folgen mit T.Kirk schaut sieht man das die noch nicht solche "Stirnknochen" haben (nicht so ausgeprägt)... oder lieg ich da falsch? ...aber wie man in den neuen folgen jetzt sieht (die vor t.kirk spielen) sehen sie aus wie bei DS9 komisch :confused:
hi
Wollt kein neues Thema desswegen aufmachen deshalb stell ich hier mal die Frage:
wisst ihr ob das "IT-Handbuch - für FIs" in der ZP als tabellenbuch zugelassen ist?
boah das hab ich auch...
ich habs auch schon so gemacht wie peregrin gemeint hat aber trotzdem bleibts als task geht nur zu wenn ichs per commandbutton und nem end zumache aber frag mich net warum
ich mein das nicht von der RechnerLeistung her eher das es auf meinem Win95 haufen fehler hat und das darf eigentlich nicht sein...
also bei uns ist PM Plant Maintenance :confused:
@Dyronim
arbeitest du in walldorf oder wo das SAP HQ ist?