Sheet variabele uit cel uitlezen

[geep1980]

Bijgaand een document waar in staat wat ik zou willen en een klein stukje VBA wat ik nu heb.

 

[robdgr]

Kijkend naar je voorbeeld vraag ik me af waarom je code nodig hebt. In feite volstaat een simpele formule. Of anders een tabelletje met de varianten en vert.zoeken.

 

[sylvester-ponte]

met xlsx bestanden kan ik niets

graag posten in xls formaat

groet sylvester

 

[robdgr]

met xlsx bestanden kan ik niets

sylvester,

Breng hier eens een bezoek.

 

[Warme bakkertje]

Dit volstaat

Sub tst()
Sheets([F1].Value).Range("A1") = "dit is een test"
End Sub

 

[geep1980]

ik laat deze code na het importeren van een aantal gegevens aanroepen maar ik krijg de melding:


Run-time error '9':
Subscript out of range

wat doe ik verkeerd?

 

[Warme bakkertje]

Bestaat het blad waarnaar je verwijst ?
Vermeldt misschien ook de naam v/h blad waaruit je de cel leest anders leest hij uit het actieve blad en daar is F1 misschien leeg of een foute waarde

Sub tst()
Sheets([[COLOR="red"]Blad1[/COLOR]!F1].Value).Range("A1") = "dit is een test"
End Sub

 

[geep1980]

Het werkt.
Bedankt.