---

Hallo Leute,

ich möchte an ein ActiveX ein Array übergeben. Wie wird dies gemacht? In den Funktionen "Property Let" und "Property Get" habe ich, soweit ich das erkennen kann, keine entsprechende Möglichkeiten.

Hat sowas schon mal jemacht realisiert und kann mir da helfen?

Danke schonmal in Voraus.
Ulf

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Ulf_K,

du kannst Arrays als Variant übergeben.

HTH pablo

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Pablo,

wie?????

Nur als Variant zu deklarieren reicht nicht.

Grüße
Ulf

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Ulf,

rück' doch mal ein Codeschnipsel raus bzw. was kommt für ein Fehler?

lg Nancy

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Ulf_K,

Aufrufende Prozedur:

Private Sub cmdArr_Click()
Dim mArr As Variant, i As Long
Dim mArrcls As Arrcls

ReDim mArr(10)
For i = 1 To 10
  mArr(i) = i
Next
Set mArrcls = New Arrcls
mArrcls.Arr (mArr)
End Sub

Klasse:

Private myArr As Variant

Public Sub Arr(ByVal vNewValue As Variant)
Dim i As Long
  myArr = vNewValue
  For i = 1 To 10
    Debug.Print myArr(i)
  Next
End Sub

HTH pablo

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Pablo,

Danke für deinen Tipp. Werde ihn in den nächsten Tagen testen. Dann wird das Array also nicht über "LET PROPERTY" übergeben.

Grüße
Ulf

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Property Let/Get geht auch:

Private m_Point1

Public Property Get Point1() As Variant
Point1 = m_Point1
End Property

Public Property Let Point1(byval vNewValue As Variant)
m_Point1 = vNewValue
End Property

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP