AW: Zugriff verweigert
17.09.2015 14:48:25
bassi
Hallo Rudi,
danke für deine Nachricht und den Tipp.
Klar ist es ein Haken
Sehr peinlich.
So ist das wenn man das mit dem Handy macht und nicht richtig kontolliert.
Sorry.
Und gleich nochmal sorry. Ich glaub ich hab nun großen Mist gebastelt.
Du hast in sofern Recht, dass ich RowSource gefüllt habe. Aber nicht über Eigenschaft, sondern im Code.
Wenn ich den Code so einbaue wie er ist, kommt der Fehler :
Laufzeitfehler
Ungültiges Argument.
Also hab ich in meinem jugendlichen ;-) Leichtsinn "erkannt", dass dem doch fehlt wo er die Daten her holen soll.
Und so hab ich den - wahrscheinlich - großen Quatsch hier zusammengestrickt:
Private Sub UserForm_activate()
Dim letzte As Long, i As Long
ListBox9.Clear
With Sheet("Übersicht")
letzte=.Cells(Rows. Count, 4).End(xlUp). Row
M.Druck. listbox9. RowSource =.Name & "!" &Range(ET12:ET" & letzte). Andreas
For i = 1 To letzte
If. Cells(i,4)"" Then Listbox9.AddItem, Cells(i,4)
Next
End With
End Sub
Ich hab mich da wohl bei meiner Strickkunst etwas überschätzt.
Sorry
Viele Grüße
bassi