Bonjour,
Je souhaite mettre à jour le code postal de la commune en fonction ... de la commune !
Le code suivant buggue à la première ligne du "If". J'ai le message "incompatibilité de type" (la dernière ligne dans le "If" est mise pour l'instant en commentaire parce qu'Access ne reconnait pas cette méthode). La version utilisée est Access 2003.
Merci pour votre aide !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Private Sub ComboBoxCommune_Change() If ComboBoxCommune.Value <> "" Then ComboBoxCP.RowSourceType = "Table/Query" Dim sqlString As String sqlString = "select code_postal from cp_communes where commune = " & ComboBoxCommune.Value ComboBoxCP.RowSource = sqlString 'ComboBoxCP.Requery End If End Sub
Partager