VBA en cellen

[dvdoornik]

Beste experts,

hier een vraagje van een newbie! Ik hoop dat jullie mij kunnen helpen.

Ik heb 2 bladen met gegevens, Blad2 en Blad3.

Nu heb ik een formuliertje gemaakt, waarin ik een aantal berekingen wil laten doen. Ik wil dus in een label een waarde van een cell weergeven.

Als ik nu programmeer:

label1.caption=Blad2.[B8]

krijg ik zonder problemen de waarde die daar staat.

Nu wil ik echter een reeks in verschillende labels zetten.

Dat lukt dus niet.

For herhaal = 0 To 1
cel1(herhaal) = "Blad2.[" + UCase(mcel1) + Trim(Str(herhaal + 6)) + "]"
Label10.Caption = cel1(herhaal)
Next herhaal

mcel1 heb ik met een "B" (zonder quotes) gevuld.

Helaas komt er in label10 te staan: Blad2.[B6]
en niet de waarde die in die cell staat.

Wat doe ik verkeerd (ja dat weet ik wel eigenlijk), maar ik bedoel, hoe los ik het op????

 

[DIEZEL]

Kijk eens bij Luc Heyndrickx op zijn website naar de les LUSSEN.
http://users.skynet.be/onderland/index.htm

 

[jheesterbeek]

probeer het eens met sheets("Blad2").cells(8,2).value
sheets() is om het tab aan te geven, dit kan met de naam tussen kwootjes, of door verwijzen naar het nummer bijvoorbeeld sheets(2) om het tweede tab aan te geven.
Cells is de verwijzing naar de cellen, waarbij je eerst de rij noemt (8) en daarna de kolom (2=B, 3=C etc).
Value verwijsd naar de eigenschap die je aanroept, in dit geval wil je de waarde, maar je zou ook het kleurnummer kunnen opvragen, of de breedte.

Succes
John

 

[dvdoornik]

Bedankt mensen!!! opgelost