VBA: Cel-eigenschappen direct in array zetten

[Niels1001]

Geachte lezer,

Deze regels:
Dim VaTabel As Variant
vaTabel = ActiveSheet.UsedRange

zetten direct de waarden in een array. Zonder tijdrovende for-loops.

Nu wil ik niet de waarden maar de eigenschap of de bijbehorende kolom verborgen is (true/false) in een array zetten.
Kan dit op dezelfde manier?

Ik dacht aan:
VaTabel = Range("a2:h2").EntireColumn.Hidden
Maar ondanks dat kolom b verborgen is komt daar enkel 'false' uit.

(EntireColumn: Returns a Range object that represents the entire column (or columns) that contains the specified range. Read-only.)

Alvast Hartelijk dank!

 

[snb]

Leuk bedacht.

Een Range is een 2-dimensionele matrix. Als je die toewijst aan een variabele wordt dat ook een 2-dimensionele matrix (array).

.Hidden is echter geen matrix maar een eigenschap. Omdat die 2-waardig is wordt het een boolean variabele.

Wil je van alle kolommen in een gebied registreren welke waarde de eigenschap Hidden heeft dan zul je iedere kolom moeten aflopen.
De resultaten kun je wel in een matrix zetten.

With Range("a2:h2")
  sq=.value
  For j= 1 to .columns.count
    sq(1,j)=.columns(j).Hidden
  next
End With

 

[Niels1001]

Bedankt SNB!

Bedankt SNB voor uw duidelijke antwoord!

Volgens mij is dit een kwestie van logisch nadenken over de werking van de code.
Dit is geen kwestie om uit een boek te leren...
Hoe denkt u daarover?

mvgr.
N.

 

[Wigi]

Bedankt SNB voor uw duidelijke antwoord!

Volgens mij is dit een kwestie van logisch nadenken over de werking van de code.
Dit is geen kwestie om uit een boek te leren...
Hoe denkt u daarover?

mvgr.
N.

Ik denk er ook zo over