A voir également:
- Problème de Bouton dans un formulaire Access
- Whatsapp formulaire opposition - Guide
- Formulaire de réclamation facebook - Guide
- Formulaire de reclamation instagram - Guide
- Bouton reinitialisation pc - Guide
- Formulaire de contact le bon coin introuvable - Forum Réseaux sociaux
8 réponses
Bonjour oussama,
Il est impossible de se faire une opinion sans avoir sou sles yeux le code contenu dans l'évènement.
Un copier/coller sera bienvenu.
A+
Il est impossible de se faire une opinion sans avoir sou sles yeux le code contenu dans l'évènement.
Un copier/coller sera bienvenu.
A+
Bonsoir oussama,
Dans ma documentation, je ne trouve pas trace d'une fonction ChrW() ?
Je ne connais que Chr(CodeCaractère)
De quoi s'agit-il ?
Cordialement
Dans ma documentation, je ne trouve pas trace d'une fonction ChrW() ?
Je ne connais que Chr(CodeCaractère)
De quoi s'agit-il ?
Cordialement
bonjour
Je ne comprend pas tro ton code tu demande d ouvrir une requete qui s 'appel ....
ton code derriere stdocname signifie koi??
la fonction chr et chrw retourne un integer ou alors une lettre predefini !!!!
que veux tu faire exactement?
Je ne comprend pas tro ton code tu demande d ouvrir une requete qui s 'appel ....
ton code derriere stdocname signifie koi??
la fonction chr et chrw retourne un integer ou alors une lettre predefini !!!!
que veux tu faire exactement?
Oussama,
peux-tu expliquer pourquoi tu "essayes" de concaténer ces chaines de caractères ?
1) Cette fonction n'existe pas ! en VBA les fonctions qui ressemblent le plus apparement à ce que tu veux faire c'est : chr(90) qui retourne le caractère ou la fonction Asc("Z") qui retourne le code ASCII.
2) Pour éxecuter ta requête tu peux plus simplement faire ceci :
DoCmd.OpenQuery "MaRequete"
peux-tu expliquer pourquoi tu "essayes" de concaténer ces chaines de caractères ?
1) Cette fonction n'existe pas ! en VBA les fonctions qui ressemblent le plus apparement à ce que tu veux faire c'est : chr(90) qui retourne le caractère ou la fonction Asc("Z") qui retourne le code ASCII.
2) Pour éxecuter ta requête tu peux plus simplement faire ceci :
DoCmd.OpenQuery "MaRequete"
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
J'ai le même environnment de travail (os xp et access 2003) et ça marche ...
Essaye de réinstaller Office, dans de rare cas, une mauvaise installation peut provoquer ce genre de problème.
Si tu veux tu peux m'envoyer ta base, la plus vide possible, zippée et surtout scannée !
spideycodewarrior@hotmail.com
Essaye de réinstaller Office, dans de rare cas, une mauvaise installation peut provoquer ce genre de problème.
Si tu veux tu peux m'envoyer ta base, la plus vide possible, zippée et surtout scannée !
spideycodewarrior@hotmail.com
Juste une piste au cas ou ça puisse aider, j'ai eu le même message plusieur fois.
Celà m'affichait ce message à chaque fois que j'essayais de programmer un bouton et de même lorsque j'essayais de faire marcher un bouton d'une base qui marchait très bien sur un ordinateur français et pas sur mon ordinateur de travail (je travaille à l'étranger)
Le problème était lié aux option de langages Office et aux options régionale de langage de l'ordinateur pour windows.
Bon courage,
Rhyton le boyar
Celà m'affichait ce message à chaque fois que j'essayais de programmer un bouton et de même lorsque j'essayais de faire marcher un bouton d'une base qui marchait très bien sur un ordinateur français et pas sur mon ordinateur de travail (je travaille à l'étranger)
Le problème était lié aux option de langages Office et aux options régionale de langage de l'ordinateur pour windows.
Bon courage,
Rhyton le boyar
Option Compare Database
Private Sub Commande18_Click()
On Error GoTo Err_Commande18_Click
Dim stDocName As String
stDocName = ChrW(1575) & ChrW(1604) & ChrW(1575) & ChrW(1587) & ChrW(1605) & ChrW(32) & ChrW(1608) & ChrW(1575) & ChrW(1604) & ChrW(1604) & ChrW(1602) & ChrW(1576)
DoCmd.OpenQuery stDocName, acNormal, acEdit
Exit_Commande18_Click:
Exit Sub
Err_Commande18_Click:
MsgBox Err.Description
Resume Exit_Commande18_Click
End Sub