Über den Listindex besteht die Möglichkeit auf die entsprechende
Excelzeile wieder zuzugreifen (wenn ich das richtig verstanden habe)
Verwende eine Variable zB:
dim reihe as string
Wenn du List1 anklickst dann reihe = cstr(list1.listindex)
(zu beachten: beginnt bei 0, das heißt, der erste Eintrag hat den Index Null, eventuell beim Anklicken noch 1 addieren)
...Range("A" & reihe)=text1.text
oder du kannst damit aufs array weisen
dim reihe as long
array(reihe,1)= text1.text
array(reihe,2)= text2.text
Möglich wäre auch ein Grid zu verwenden.
|