Help!

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

Hulp bij posten

Recente topics

Auteur Topic: verplichte cel  (gelezen 2108 keer)

0 leden en 1 gast bekijken dit topic.

Offline DJ Lieven

  • Nieuw lid
  • Berichten: 6
verplichte cel
« Gepost op: 16 november 2007, 08:36:30 »
Graag had ik in mijn excel document in een cel de mensen verplichten van te kiezen uit G, NG, T, S1, S2 en S3. Met een uitschuifpijltje. Dus de bedoeling is dat ze niets anders kunnen intikken.   
Standaard emailprogramma: Outlook Express
Standaard Operating System: Windows XP SP1
Standaard Browser:Internet Explorer 6

Offline danny147

  • Oplosser
  • ****
  • Berichten: 564
  • Geslacht: Man
  • Lotto, de sleutel tot het succes.
Re: verplichte cel
« Reactie #1 Gepost op: 16 november 2007, 09:56:42 »
Beste DJ Lieven   ;)

Dit is mogelijk met gegevensvalidatie.
Zie volgend bestandje.
Werkt in excel 2007 of het in excel 2003 gaat ??

Groetjes Danny.  :)
Windows 10 Home   NLD 64bit
Intel(R) Core(TM) i7-3630QM CPU @ 2.40GHz 1200
SAMSUNG_NP1234567890
Intel(R) HD Graphics 4000 2112MB -
Realtek High Definition Audio
Nr: 1 Model: Hitachi HTS727575A9E364
C:\ NTFS 670,11GB 494,48GB 8 080MB
AV: Trend Micro Maximum Security

Offline RedHead

  • Excel-Expert
  • Ambassadeur
  • *****
  • Berichten: 2.280
  • Geslacht: Man
  • Met Excel lukt 't wel.... (toch???)
Re: verplichte cel
« Reactie #2 Gepost op: 17 november 2007, 23:15:01 »
Wellicht leuk om er bij te weten... Je kan er bij gegevensvalidatie óók voor kiezen om je lijstje rechtstreeks in het 'source'-vakje te zetten. Dus ipv het aanmaken van je lijstje op je sheet en een bereikverwijzing in datavalidatie zet je dan: G;NG;T;S1;S2;S3 (zie screenprint voor een beter begrijpbare uitleg... ;D) Deze truuk moet je alleen toepassen als je niet of nauwelijks veranderingen hebt in je validatielijstje.

Groet, Leo
______________________________

Groet, Leo

Offline Erik Van Geit

  • Excel-Expert
  • Ervaren lid
  • *****
  • Berichten: 306
  • Geslacht: Man
Re: verplichte cel
« Reactie #3 Gepost op: 18 november 2007, 01:32:16 »
Hallo,

En als je liever een beetje klikt... Met 6 verschillende items misschien wat veel...

Option Explicit

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
'Erik Van Geit
Dim Arr As Variant
Dim k As Integer
Dim rng As Range

Arr = Array("G", "NG", "T", "S1", "S2", "S3")
Set rng = Range("A1:D20")

If Target.Count > 1 Then Exit Sub
If Intersect(Target, rng) Is Nothing Then Exit Sub

Cancel = True
On Error Resume Next
k = Application.Match(Target.Value, Arr, 0)
On Error GoTo 0
Target.Value = Arr(IIf(k - 1 = UBound(Arr), 0, k))

End Sub
rechtsklikken maar :)

fijne zondag!!
Erik

Offline DJ Lieven

  • Nieuw lid
  • Berichten: 6
Re: verplichte cel
« Reactie #4 Gepost op: 19 november 2007, 09:43:55 »
Beste excel ingenieurs bedankt voor jullie hulp. Heerlijk om zoveel bij te leren via dit forum.
Tot binnenkort
Standaard emailprogramma: Outlook Express
Standaard Operating System: Windows XP SP1
Standaard Browser:Internet Explorer 6

 


www.combell.com