Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

excel dropdown

41 views
Skip to first unread message

CyBeRGhOsT

unread,
Jan 29, 2005, 6:37:04 AM1/29/05
to
ik wil in excel een keuzemenu maken, zogenaamd een dropdown-menu. Hierin moet
je op een tekst kunnen klikken, en dat je dan verder in hetzelfde werkblad
naar beneden springt, waar je naar toe wilt

Voorbeeld:
Een Dropdown-menu voor een dvd-lijst bevat de volgende keuze's:
Actie
Humor
Drama
SF
Oorlog
Muziek

Hoe kan ik dit maken en hoe kan ik dit eenvoudig bijwerken indien nodig ?

CyBeRGhOsT

unread,
Jan 29, 2005, 7:23:25 AM1/29/05
to
Hallo Luc,

Toat aan het punt "Klik nu rechts op je bladtab" is alles gelukt, er staat
nu als ik op A1 klik een lijstje met die genre's van de soort film, maar als
ik daar een selectie maak, gebeurt er verder nix op mijn werkblad, alleen de
selectie wordt zichtbaar in veld A1, mijn werkblad verspringt verder niet
naar bijvoorbeeld het stukje muziek...

het stukje "Private Sub Worksheet_Change(ByVal Target As Range)
Range(Range("A1")).Select
End Sub" toevoegen zoals jij schreef, is mij ook wel gelukt, maar doet van
wat ik zie verder nix, moet ik bij "Change" een andere optie inschakelen of
iets anders selecteren ?

in ieder geval alvast bedankt voor zover
Paul

"Luc Heyndrickx" wrote:

> Hoi Ghost,
>
> Selecteer de eerste cel van de lijst Actie, en geef die de naam Actie.
> Vervolgens de eerste cel van de lijst Humor, en geef die de naam Humor.
> Enz.
>
> Selecteer vervolgens cel A1, en via Data => Valideren => Lijst, typ je in
> bron:
> Actie; Humor; Drama; SF; enz.
>
> Klik nu rechts op je bladtab, en kies voor 'programmacode weergeven'.
> En daar plak je volgende code:
>
> Private Sub Worksheet_Change(ByVal Target As Range)
> Range(Range("A1")).Select
> End Sub
>
> Luc
>
>
>
> "CyBeRGhOsT" <CyBeR...@discussions.microsoft.com> schreef in bericht
> news:F1071F58-B5B3-4F2E...@microsoft.com...

CyBeRGhOsT

unread,
Jan 29, 2005, 6:37:02 AM1/29/05
to

Luc Heyndrickx

unread,
Jan 29, 2005, 6:46:59 AM1/29/05
to
Hoi Ghost,

Selecteer de eerste cel van de lijst Actie, en geef die de naam Actie.
Vervolgens de eerste cel van de lijst Humor, en geef die de naam Humor.
Enz.

Selecteer vervolgens cel A1, en via Data => Valideren => Lijst, typ je in
bron:
Actie; Humor; Drama; SF; enz.

Klik nu rechts op je bladtab, en kies voor 'programmacode weergeven'.
En daar plak je volgende code:

Private Sub Worksheet_Change(ByVal Target As Range)
Range(Range("A1")).Select
End Sub

Luc

"CyBeRGhOsT" <CyBeR...@discussions.microsoft.com> schreef in bericht
news:F1071F58-B5B3-4F2E...@microsoft.com...

Luc Heyndrickx

unread,
Jan 29, 2005, 9:52:29 AM1/29/05
to
Toch zou het moeten lukken.

Heb je ook je Cellen de namen gegeven die je in je keuzelijstje terugvind?
Heb je de programmacode ook op de juist plaats gekleeft?

Luc

"CyBeRGhOsT" <CyBeR...@discussions.microsoft.com> schreef in bericht

news:4B0B1A8E-0B6C-4BBA...@microsoft.com...

noorderling

unread,
Jan 29, 2005, 11:19:02 AM1/29/05
to
Hallo

Ik las bij toeval de vraag van CyBeRGhOsT.
Aangezien ik nog niet eerder gewerkt heb met een "dropdown", dacht ik, laat
ik eens
mee doen. Alles uitgevoerd zoals beschreven. Krijg alleen de melding.
Fout 1004 tijdens uitvoering:
Methode Range van object_Worksheet is mislukt.


"Luc Heyndrickx" schreef:

Luc Heyndrickx

unread,
Jan 29, 2005, 11:31:36 AM1/29/05
to
Heb je je cellen een naam gegeven?

Luc

"noorderling" <noord...@discussions.microsoft.com> schreef in bericht
news:ED697F65-D478-47E7...@microsoft.com...

noorderling

unread,
Jan 29, 2005, 12:07:04 PM1/29/05
to
Dit is wat ik gedaan heb:

ecxel map geopend
in cel A1 de validatie geplaatst (a; b; c; d; e; f)
in cel A10 a neergezet
in cel A11 b enz t/m f (cel A15)
programmacode weergeven en de programmaregels
gecopieerd en geplakt

Cobbe

unread,
Jan 29, 2005, 12:28:13 PM1/29/05
to
noorderling had uiteengezet :

Nu moet je nog A10 - A11 - A12 enz. een naam geven, anders werkt het
niet.

Cobbe

--
« Do not look where you fell, but where you slipped. »

noorderling

unread,
Jan 29, 2005, 12:39:05 PM1/29/05
to
o.k.
maar hoe doe ik dit?
Doe ik dit in excel of in visual basic?

Luc Heyndrickx

unread,
Jan 29, 2005, 1:07:20 PM1/29/05
to
De makkelijkste manier:

Selecteer de gewenste cel (A10); en in het kleine naamcelletje boven de A
kolom, typ je de gewenste naam (In uw geval 'a'). En je sluit af met Enter.

Luc

"noorderling" <noord...@discussions.microsoft.com> schreef in bericht

news:F281BAA5-F169-484A...@microsoft.com...

Cobbe

unread,
Jan 29, 2005, 1:11:36 PM1/29/05
to
noorderling had uiteengezet :
>> « Do not look where you fell, but where you slipped. »
>>
>>

Neen dit doe je op uw werkblad.
Selecteer cel A10 en dan via Invoegen - Naam - definieren, je vukt hier
een naam in en onderaan vul je de verwijzing in; A10

noorderling

unread,
Jan 29, 2005, 1:17:03 PM1/29/05
to
hebbes..!!
Weer wat geleerd.

Bedankt

0 new messages