• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Drop down converteren naar getal

Status
Niet open voor verdere reacties.

Norman Scheuter

Gebruiker
Lid geworden
30 sep 2008
Berichten
124
Hallo,

Ik heb een lijst met diverse drop down menu's.
Soms is het alleen een getal en soms is het incl. letters.
Deze cel wordt ook gebruikt voor verticaal zoeken, als zoek cel en zodra ik weer alleen een getal kies, moet ik de cel converteren naar getal omdat ie anders niet werkt met verticaal zoeken.
Iedere keer als ik weer switch tussen een letter en een getal, moet ik dat weer overnieuw doen.

Is hier ook een andere oplossing voor?

Groetjes Norman.
 
Een voorbeeldbestand kan wonderen doen. Ook na 13 jaar.
 
Hoi emields,

Ik heb het opgelost door deze 2 vba's

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D5:D50")) Is Nothing Then
Call Change
End If
End Sub

Code:
Sub Change()
    Range("C5:C50") = Range("C5:C50").Value
End Sub

Een verandering in de Range D5:D50, laat de range C5:C50 converteren naar een getal, waardoor verticaal zoeken weer werkt.

Groetjes Norman
 
Laatst bewerkt:
Waarom 2 ?

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect(Target, Range("D5:D50")) Is Nothing Then Range("C5:C50") = Range("C5:C50").Value
End Sub
 
Hoi SNB,

Waarom...geen idee...het is niet in me opgekomen om het in 1 te doen:o
Was al blij dat het me was gelukt
Ik ga de nieuwe gebruiken :d

Dank je wel
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan