Hoi,
Ik ben in excel bezig om een serie sheets te doorzoeken op numerieke waarden. Deze waarden moeten naar een array geschreven worden en vervolgens gesorteerd en alle waarden eenmaal getoond. Het wegschrijven naar een array lukt aardig maar krijg het niet voor mekaar de waarden uit deze array onder elkaar af te drukken. Vraag me af wat er fout is aan onderstaande code, krijg de melding 'Method 'Range' of Object '_Global'failed. Ik ben al een tijdje aan het zoeken maar kom er niet echt uit. Een webiste met basics over VBA zou ook welkom zijn. Thanks already.
Ik ben in excel bezig om een serie sheets te doorzoeken op numerieke waarden. Deze waarden moeten naar een array geschreven worden en vervolgens gesorteerd en alle waarden eenmaal getoond. Het wegschrijven naar een array lukt aardig maar krijg het niet voor mekaar de waarden uit deze array onder elkaar af te drukken. Vraag me af wat er fout is aan onderstaande code, krijg de melding 'Method 'Range' of Object '_Global'failed. Ik ben al een tijdje aan het zoeken maar kom er niet echt uit. Een webiste met basics over VBA zou ook welkom zijn. Thanks already.
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
| Private Sub AcceptArray(intArray() As Double)
Dim obj As Variant
Dim i As Integer
i = 1
y = 2
For Each obj In intArray
Dim x As Double
x = obj
Range(i, y) = intArray(i)
i = i + 1
Next
End Sub |