Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: Validatielijst op geslecteerd bereik  (gelezen 4001 keer)

0 leden en 1 gast bekijken dit topic.

Offline cladon

  • Volledig lid
  • **
  • Berichten: 246
  • Geslacht: Man
Validatielijst op geslecteerd bereik
« Gepost op: 26 oktober 2006, 00:16:22 »
Sub test()
Range("A1:A25").Select
With Selection.Validation
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=G:G"
.IgnoreBlank = True
.InCellDropdown = True
.ShowInput = True
.ShowError = True
End With

End Sub

Met bovenstaand voorbeeldje voorzie ik de cellen in het bereik Range("A1:A25") van een listbox. Voorwaarde is dat mijn brongegevens in het zelfde werkblad staan in de kolom G.

Wat moet ik nu aanpassen zodat ik de mogelijkheid heb om mijn bronggegevens in een ANDER werkblad te gaan ophalen. (Is het mogelijk op deze manier).
Windows 10 Home   NLD 64bit,
Intel(R) Core(TM) i7-3770 CPU @ 3.40GHz 3401
P8B75-M LE
Intel(R) HD Graphics 4000 3072MB 1920 x 1080
VIA HD Audio
C:\ NTFS 237,25GB 135,35GB 15 293MB
AV: Kaspersky
FW: Windows 10

Offline SoftAid

  • Administrator
  • Ambassadeur
  • *****
  • Berichten: 20.191
  • Geslacht: Man
  • Nobody is perfect, not even me...
Re:Validatielijst op geslecteerd bereik
« Reactie #1 Gepost op: 26 oktober 2006, 04:44:11 »

Sub test()
Sheets("Blad2").Select
Range("A1:A25").Select
With Selection.Validation
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=G:G"
.IgnoreBlank = True
.InCellDropdown = True
.ShowInput = True
.ShowError = True
End With
End Sub

zo iets
Maximum grootte bijlagen vergroot naar 4 MB
Dubbelposten, het posten op verschillende forums van dezelfde vraag, dient op
voorhand gemeld te worden, met een link naar het topic op de andere site.
Overtreding van deze regel kan bestraft worden met verbanning !

Offline cladon

  • Volledig lid
  • **
  • Berichten: 246
  • Geslacht: Man
Re:Validatielijst op geslecteerd bereik
« Reactie #2 Gepost op: 26 oktober 2006, 08:51:05 »
Neen mijn validatielijst (het dropdownpijltje) moet werken op blad1 in de Range("A1:A25") maar de gegevens die verschijnen als ik klik  op het pijltje moet gehaald worden op blad 2 in de kolom G
Windows 10 Home   NLD 64bit,
Intel(R) Core(TM) i7-3770 CPU @ 3.40GHz 3401
P8B75-M LE
Intel(R) HD Graphics 4000 3072MB 1920 x 1080
VIA HD Audio
C:\ NTFS 237,25GB 135,35GB 15 293MB
AV: Kaspersky
FW: Windows 10

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re:Validatielijst op geslecteerd bereik
« Reactie #3 Gepost op: 26 oktober 2006, 11:00:55 »
Cladon, de oplossing hiervoor is zo simpel, dat je bij jezelf denkt "waarom ben ik niet zelf opgekomen"...  ;)
Ik los 'm alleen niet op via VBA, maar gewoon in de sheet zelf via DATA, VALIDATION, allow: list...
De 'validatie-listbox' staat het inderdaad niet toe om een range (vb: "A1:A20") op te geven die op een ander werkblad staat. Dit kan je omzeilen door die betreffende range een naam te geven en vervolgens die naam op te geven in je validatie. Begin dan wel je naam bij de validatie met een = anders krijg je in je sheet dropdownbox alleen je rangenaam te zien.
Ik hoop dat je hiermee geholpen bent.
Groet, Leo
______________________________

Groet, Leo

Offline cladon

  • Volledig lid
  • **
  • Berichten: 246
  • Geslacht: Man
Re:Validatielijst op geslecteerd bereik
« Reactie #4 Gepost op: 26 oktober 2006, 12:39:38 »
Ja dit weet ik wel. Maak ik moet het via vba oplossen. Met een rangenaam heb ik het inderdaad ook geprobeerd. Maar dit werkte niet. Ik ga het straks eens terug proberen misschien heb ik iets fout gedaan.
Windows 10 Home   NLD 64bit,
Intel(R) Core(TM) i7-3770 CPU @ 3.40GHz 3401
P8B75-M LE
Intel(R) HD Graphics 4000 3072MB 1920 x 1080
VIA HD Audio
C:\ NTFS 237,25GB 135,35GB 15 293MB
AV: Kaspersky
FW: Windows 10

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re:Validatielijst op geslecteerd bereik
« Reactie #5 Gepost op: 26 oktober 2006, 14:52:21 »
Hierbij nog ff een voorbeeldje van een namedrange in een validation list...
Groet, Leo
______________________________

Groet, Leo

Offline cladon

  • Volledig lid
  • **
  • Berichten: 246
  • Geslacht: Man
Re:Validatielijst op geslecteerd bereik
« Reactie #6 Gepost op: 26 oktober 2006, 15:52:29 »
Bedankt Leo - zo gewoon zo als in je voorbeeld lukt het mij ook wel. Maar ik moet het via vba klaarkrijgen. Omdat ik mijn collega's een 400 datafiches in excel moeten laten invullen zonder dat er enige formule of datavalidatie aan te pas komt zoals in jouw voorbeeld.

Daarom wil ik alles regelen via VBA -zodat ik nadien met vba de vba-code en overbodige sheets kan verwijderen. De validatielijsten heb ik nodig om het typ werk te beperken.

IK zal na elven een een voorbeeld van een datafiche uploaden. en toelichten.
Windows 10 Home   NLD 64bit,
Intel(R) Core(TM) i7-3770 CPU @ 3.40GHz 3401
P8B75-M LE
Intel(R) HD Graphics 4000 3072MB 1920 x 1080
VIA HD Audio
C:\ NTFS 237,25GB 135,35GB 15 293MB
AV: Kaspersky
FW: Windows 10

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re:Validatielijst op geslecteerd bereik
« Reactie #7 Gepost op: 26 oktober 2006, 18:30:58 »
Cladon, OK. Maar als het via DATA, VALIDATION niet is toegestaan om je list in een andere sheet aan te geven via een bereik, zo zal het dus waarschijnlijk in VBA ook niet mogen.
Is het een optie om het zo op te lossen? (in mijn voorbeeldsheet)

   With Selection.Validation
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=rngInhoudFietswinkel"
        .IgnoreBlank = True
        .InCellDropdown = True
        .ShowInput = True
        .ShowError = True
    End With

Succes alvast. Ik ben benieuwd naar je voorbeeld van een datafiche.
Groet, Leo
______________________________

Groet, Leo

Offline cladon

  • Volledig lid
  • **
  • Berichten: 246
  • Geslacht: Man
Re:Validatielijst op geslecteerd bereik
« Reactie #8 Gepost op: 27 oktober 2006, 00:22:54 »
In bijlage de bedoelde datafiche.

Wat is de bedoeling mijn collega's moeten tijdens de komende week ongeveer 500 evaluatieverslagen van leerlingen overzetten in een datafiche. Om het typwerk te beperken wil , waar het gaat,  werken met een (validatielijst) op een cel (listbox in een formulier) om zo snel gegevens te kunnen inbrengen.

Bijvoorbeeld bij het onderdeel vaardigheden moet de gebruiker de mogelijkheid hebben om een vaardigheid te selecteren uit het tabblad vaardigheden.

Dus in het tabblad KVATemplate-DW wil ik in het bereik d10:d17 de mogelijkheid voorzien om te werken met een validatielijst.

Eigenlijk mogen in deze lijst enkel vaardigheden komen van niveau 3 (1.1.1 of 1.10.2, ...) na selectie moet in de corresponderende cel in kolom e10:e17 de juiste code komen te staan. De andere gegevens worden dan via copy/past overgebracht van word/excel naar de datafiche.

Bedoeling is data in de datafiche enkel datagegevens staan. Alles wat overbodig is moet ik kunnen verwijderen dmv vba. ik denk hierbij aan de VBA-code zelf die in de fiche zit maar ook de overtollige tabbladen Kennis, Vaardigheden en attitudes.

Windows 10 Home   NLD 64bit,
Intel(R) Core(TM) i7-3770 CPU @ 3.40GHz 3401
P8B75-M LE
Intel(R) HD Graphics 4000 3072MB 1920 x 1080
VIA HD Audio
C:\ NTFS 237,25GB 135,35GB 15 293MB
AV: Kaspersky
FW: Windows 10

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.284
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re:Validatielijst op geslecteerd bereik
« Reactie #9 Gepost op: 28 oktober 2006, 12:07:33 »
Cladon, is dit nu wat je bedoelt (zie voorbeeldbestand)? Of zoek ik het helemaal in de verkeerde hoek?
Vwb het tonen van alléén de niveau 3 items... Dit kan je volgens mij alleen doen door de tabel in die volgorde te sorteren en vervolgens alleen dat bereik te benoemen.
Groet, Leo
______________________________

Groet, Leo

Offline cladon

  • Volledig lid
  • **
  • Berichten: 246
  • Geslacht: Man
Re:Validatielijst op geslecteerd bereik
« Reactie #10 Gepost op: 28 oktober 2006, 13:34:09 »
Perfect RedHead - dit is precies wat ik bedoelde - ik was ook bezig met een rangnaam maar blijkbaar zag ik enkel dingen over het hoofd (de vakantie is dus blijkbaar echt nodig).

Ik ga dit verder uitwerken zodat mijn collega's aan de slag kunnen.

Bedankt
Windows 10 Home   NLD 64bit,
Intel(R) Core(TM) i7-3770 CPU @ 3.40GHz 3401
P8B75-M LE
Intel(R) HD Graphics 4000 3072MB 1920 x 1080
VIA HD Audio
C:\ NTFS 237,25GB 135,35GB 15 293MB
AV: Kaspersky
FW: Windows 10

 


www.combell.com