linked cells format is nu text ipv value

[willie76]

Hallo

Ik heb het volgende probleem:

Ik heb 2 comboboxen, waarbij de inhoud van combobox 2 afhankelijk is van combobox 1 (zie mn eerdere posts....)

Nu wil ik dat de geselecteerde uitkomst in ComboBox 2 in een linked cell wordt weergegeven.
Op zich nog niet zo moeilijk, want dat heb ik opgelost met de code:

Private Sub ComboBox1_Change()
Select Case ComboBox1.ListIndex
Case 0
    ComboBox2.List = Range("AG2:AG22").Value
    ComboBox2.LinkedCell = "AG33"
Case 1
    ComboBox2.List = Range("AH2:AH32").Value
    ComboBox2.LinkedCell = "AH33"
Case 2
    ComboBox2.List = Range("AI2:AI11").Value
    ComboBox2.LinkedCell = "AI33"
Case 3
    ComboBox2.List = Range("AJ2:AJ6").Value
    ComboBox2.LinkedCell = "AJ33"
    End Select
End Sub

Echter, nu wil ik dat er verder op in de sheet wordt gezocht (Horiz.zoeken) in een matrix met getallen naar de uitkomst van een van de linked cells.
Echter wordt nu in de linked cells het getal als text weergegeven ipv getal.

Ik dacht aan de oplossing:

Private Sub ComboBox1_Change()
Select Case ComboBox1.ListIndex
Case 0
    ComboBox2.List = Range("AG2:AG22").Value
    ComboBox2.LinkedCell = Range("AG33").Value
....

Maar dan worden de waarde in het geheel niet weergegeven in de linked cell.

Wie heeft er een oplossing ????

 

[HSV]

Test het zo eens Willie.

Private Sub ComboBox2_Change()
 c = ComboBox2.LinkedCell
 Range(c) = CVar(Replace(ComboBox2.Value, ",", "."))
End Sub

 

[willie76]

Super Harry,

Dank voor de snelle reactie, t was idd de oplossing !!!!!