naam zoeken

[W Bloemendal]

Hallo

ik heb een bestand met 400 naamvelden Bv (blad2!A1:E7) is het mogelijk om met een zoekfunctie een van de naamvelden te selecteren uit het naamvak selecteren dan is het zo'n lange lijst.

Wim

 

[bandito bob]

Helpt CTRL+G? of is je lijst te lang?

 

[Wigi]

Probeer eens de Name Manager Utility van Jan Karel Pieterse uit:

http://www.jkp-ads.com/OfficeMarketPlaceNM-EN.asp

Zelf nog niet gebruikt, maar dit is van zéér goede makelij.

Wigi

 

[W Bloemendal]

Is het mischien ook mogelijk om een hyperlink naar een naamvak te maken.
ik heb nu onderstaande

Dim Naam As String
Naam = Sheets("blad1").Range("A12")

Range("A1:K12").Select
Selection.Copy
Sheets("Blad2").Select
Range("A1").Select
Selection.Insert Shift:=xlDown

Application.CutCopyMode = False
ActiveWorkbook.Names.Add Name:=Naam, RefersToR1C1:="=Blad2!R1C1:R12C11"
Range("A12").Select
Selection.Copy
Sheets("Blad3").Select
Selection.Insert Shift:=xlDown
Application.CutCopyMode = False
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Sheets("Blad1").Select
Range("A1:K11").Select
Selection.ClearContents

hier wordt 1 een invul blad gecopieerd naar een ander blad.
2 het gecopieerde wordt een naam gegeven
3 dan wordt de naam van het naamvakop blad 3 op volgorde gezet

is het mogelijk om met vert zoeken op blad 3 een hyperlink te krijgen naar het naamvak

Ik hoop dat het duidelijk is

wim

 

[huijb]

Waarom twee keer plaatsen.

 

[W Bloemendal]

zijn verschillende vragen in een bestand en heb ze nu samen gevoegd om het mischien duidelijker te krijgen wat de bedoeling is.
het is de bedoeling dat als alle gegevens 400 a 500 er instaan er eencode gegeven kan worden en dat er dan het bepaalde naamvak te voorschijn komt.

zoeken in de lijst naamvak of Ctrl G geeft een te lange lijst

wim

 

[Wigi]

En heb je al wat met VERT.ZOEKEN gedaan? Want daar ziet het wel naar uit als ik het goed begrijp.

 

[W Bloemendal]

Hallo Wigi

Nee naar het zoeken heb ik nog niets gedaan.
Ik ben nu nog bezig om via een macro een hyperlink te maken met de inhoud van een cel, want bij het invullen van de gegevens wordt er een lijst gemaakt van de naamvakken.
Als je een hyperlink maakt dan kan je wel zo'n gedefineerde naam selecteren maar ik wil het automatisch in een macro hebben om dat er ook mensen mee moeten werken die er geen ervaring mee hebben.
Nu heb ik dit

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
        "klant12"

maar nu wil ik dat er voor "klant12"automatish de in houd van de cel (dus naamvak komt te staan)

wim

 

[W Bloemendal]

gevonden
"klant12" moet zijn Range("A1").Value

Nu maak ik in een cel een hyperlink met een macro is het mogelijk om met deze macro ook direct als ik de cel selecteer om deze hyperlink dan direct te volgen

Range("A16").Select
    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
        Range("A16").Value
    Range("A16").Select

wat moet hier dan na komen

wim

 

[Wigi]

Klik op de link en je komt er toch????

 

[W Bloemendal]

ja dat wel maar kan ik deze ook starten via de macro

wim

 

[Wigi]

Bijvoorbeeld

Range("A1").Hyperlinks(1).Follow

Wigi