Variabele

[Dick]

Ik heb op blad 1 de inhoud van een cel aan de variabele 'myNaam' toegekend.
Nu wil ik middels een VBA code op Blad 3 laten zoeken naar mijn variabele.
Wie weet daar de oplossing voor?

Dick

[Frederik]

Hallo Dick

Als je de waarde van die cel op blad 1 ook op blad 3 wil hebben, heb je geen
VBA nodig.
Je kan toch gewoon intikken:

=myNaam

groetjes

"Dick" <dic...@orange.nl> schreef in bericht
news:OpnFrvTT...@TK2MSFTNGP02.phx.gbl...

[]-[oRus]

Dick vertrouwde ons het volgende toe:

Wat bedoel je met 'zoeken naar mijn variabele'?
Een variabele hoef je niet te zoeken, die kan je een waarde geven of
in een andere formule gebruiken.

Wil je de waarde opvragen, dan kan dat gewoon met: myNaam.value
Wil je de broncel selecteren, dan doe je dat met: myNaam.Select

--

Vriendelijke groeten,

]-[oRus
www.westbrabantsevwg.nl

[P Sellmeijer]

Ik ga er vanuit dat je de betreffende cel de naam 'myNaam' hebt gegeven
(via invoegen - naam v2003 of formules - naam bepalen v2007)
Daarmee ligt de cel en het blad vast (dat is toch iets anders dan een
programma variabele)
met de volgende code kan je eigenschappen (o.a. Value) van die betreffende
cel (myNaam) opvragen

Dim MyNaamAdres As Range
Dim CelNaam As String
Dim CelInhoud As Variant
CelNaam = "myNaam"
Set MyNaamAdres = ActiveWorkbook.Names(CelNaam).RefersToRange
CelInhoud = MyNaamAdres.Value

Groeten,
Peter

"Dick" <dic...@orange.nl> schreef in bericht
news:OpnFrvTT...@TK2MSFTNGP02.phx.gbl...

[Dick]

Ik ben een VBA beginneling en zal mij waarschijnlijk verkeerd uitgedrukt
hebben. Ik had middels de instructie Dim MyNaam As String en MyNaam =
ActiveCell.Value een celinhoud als waarde van mijn variabele bepaald. De cel
wordt bepaald door de positie van de cursor en kan dus steeds verschillend
zijn. In andere bladen wil ik nu weer zoeken naar die celwaarde/variabele.
Ik heb dat nu gedaan met:
Selection.Find(What:=MyNaam, After:=ActiveCell, LookIn:=xlValues,
LookAt:=xlPart, SearchOrder:=xlByRows, _
SearchDirection:=xlNext, MatchCase:=False).Select

In het eerste blad waar ik dit doe werkt dit vlekkeloos maar in het tweede
blad krijg ik de melding Object variabele of blokvariabele With is niet
ingesteld. Nu gaat het lampje bij mij uit. Wat doe ik fout?

Dick
"P Sellmeijer" <p.l.k.se...@home.nl> schreef in bericht
news:OauXsDUT...@TK2MSFTNGP03.phx.gbl...

[P Sellmeijer]

Hoi Dick

Het lijkt er op dat je twee selecties hebt.
De active cel waar je de waarde uit haalt en een range waarin je zoekt
met Cells.Find werkt het wel op het zelfde blad
maar anders moet je toch eerst een anderblad selectern bv.
Sheets("Blad2").Select

Peter

"Dick" <dic...@orange.nl> schreef in bericht

news:e6O32NUT...@TK2MSFTNGP03.phx.gbl...