Discussion :

[samlepiratepaddy]

Slt,
Comme indiqué sur le titre du sujet, je souhaiterai savoir s'il est possible, lors de l'utilisation de If en VBA, d'utiliser la fonction comme en SQL qui utilise le * .
Un truc du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub FonctionOccupé_AfterUpdate()
If ((Me.FonctionOccupé) = "Responsable*") Then
DoCmd.OpenForm "Blabla"
End If
End Sub

En fait je souhaite ouvrir un formulaire si dans la liste FonctionOccupé l'enregistrement commence par Responsable ?
1/ Peut-on le faire..
2/ si Oui, ben comment???
Je n'en n'ai aucune idée.... et j'ai trouvé qui ressemble à ça... "*"
Merci d'avance..

[niclalex]

en utilisant la fonction left cela doit résoudre ton pb non ?

[Faw]

Salut, oui avec left ça devrait marcher. Mais Like est aussi supporté

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
If Me.FonctionOccupé Like "Responsable*" Then
....

[User]

Salut Sam,

Pour complèter niclalex:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub FonctionOccupé_AfterUpdate() 
If (Left(Me.FonctionOccupé,11) = "Responsable") Then 
DoCmd.OpenForm "Blabla" 
End If 
End Sub

N'hésite pas à me recontacter quand tu le peux

[samlepiratepaddy]

Slt les jeunes !!
Nickel !!!
ça marche du tonnerre !!!
Merci