probleem met gedefineerdeerde namen

[glda19]

hi
Ik probeer via een gefineerd naam bereik uit het bereik een bepaalde cel waarde te halen.
Volgende namen zijn gedefinieerd
getal =Blad11!$A$1:$A$2
test1= test!$A$1:$A$2
De onderstaande code staat onder blad11
bij de code in commentaar gaat het fout krijg dan volende error

Private Sub Worksheet_Change(ByVal Target As Range)
Private Sub Worksheet_Change(ByVal Target As Range)
[ATTACH]349581.vB[/ATTACH]
If Target.Address = "$C$1" Then
MsgBox (Range("getal").Cells(2, 1))
'MsgBox (Range("testen").Cells(2, 1))
MsgBox (Sheets("blad2").Range("testen").Cells(2, 1))
MsgBox (Sheets("blad2").Range("a3"))

End If

End If
End Sub

 

[HSV]

Zo gaat dat beter.

MsgBox [testen].Cells(2, 1)

 

[glda19]

en hoe dan bij de rest van de lijnen
En hoe het zelfde doen op een werkblad bv de 2 de rij er uit halen

 

[HSV]

?????????

 

[glda19]

hsv zoals je doet in post #2
Maar dan niet via vba maar op het werkblad

 

[OctaFish]

Je geeft VBA code, dus een macro. Blijkbaar wil je nu wat anders?

 

[glda19]

klopt ga het vba gebruiken.
Maar gebruik nu op werkbladen verwijzingen met naam naar 1 cel.
Of enkel voor gegevens validatie naar meerdere cellen.
Maar stel dat ik iets nodig heb uit een verwijzig met meerder cellen kan ik dan toch niet daar een extra aam voor gaan maken
Dus hoe die vba omzetten naar een formule op werkblad

 

[HSV]

Omschrijf eens wat er moet gebeuren.
Desnoods doe je er een voorbeeld bij met het gewenste resultaat.
Neem de tijd want van je laatste schrijven word ik niet veel wijs.

 

[glda19]

bv deze omzetten naar een werkblad formule MsgBox (Sheets("blad2").Range("testen").Cells(2, 1))
Dus dat er in een bepaald cel komt te staan wat er in de range testen op het werklad blad2 staat op de 2de rij

 

[HSV]

Dit bedoel je?

cells(10,12) = Sheets("blad2").Range("testen").Cells(2, 1).value

 

[glda19]

nee
maar het onder tussen zelf gevonden.
Uitleg was niet duidelijk. Soms lukt het beter in het engels om het te beschrijven en dan in het nederlands weet niet hoe het komt maar het is zo.
En zo aan de juiste oplossing gekomen direkt.

Een goede omschrijving moest eigenlijk zijn in het nederlands hoe naar een cel verwijzen binnen een naambereik.

En vond dat dit werkte met index (naambereik,rij)

 

[glda19]

Waarom
Moet als ik een gefineerde naam gebruik onder de code van het werkblad het zo doen.

 t = Sheets("blad2").Range("getal").Cells(2)

en in een module als volgt

tt = Range("getal").Cells(2)

Waarom is daar een verschil tussen ?

 

[HSV]

Geen idee waarom het in een module wel werkt en achter de bladmodule van en ander blad niet.
Daar was ik ook achtergekomen van de week.
De gedefinieerde naam is trouwens geschikt voor de gehele werkmap.

Het zal iets met evalueren te maken hebben, en daarom doe ik het zo.

t1 = [getal].Cells(3)

 

[glda19]

wat beteken die rechte haken rond het woord getal
weet dat er soms deze { soms ook gebruikt worden in formule op werkbladen maar wat betekenen die ?

Waar vind ik meer uit leg over het gebruik van beide haken in excel formules en vba ?

 

[glda19]

hier ook eens de vraag gesteld zodat we allemaal iets bijleren
https://www.excelforum.com/excel-programming-vba-macros/1322865-defined-name-problem-in-vba.html#post5370299

 

[HSV]

Het gebruik van haken is evalueren.

 

[glda19]

en hoe ben je aan de weet gekomen dat je er die de vierkante haken voor en na het woord getal moet zetten om het te laten weken.
Waar de informatie gehaald?

 

[HSV]

Haakcursus.

 

[glda19]

zal wel

 

[glda19]

misschien hebben jullie hier wat aan
https://bettersolutions.com/excel/named-ranges/index.htm
staat ook een vba deel in gans onderaan in de linker kolom