OVH Cloud OVH Cloud

rajouter & "qq chose" dans calcul

1 réponse
Avatar
natou
Bonjour,
dans un formulaire j'ai mis l'=E9v=E8nement suivant :
Private Sub ENVOI_NOTICES_Click()
On Error GoTo Err_ENVOI_NOTICES_Click
If NoRun > 0 Then
NoRun =3D NoRun + 1
Else
NoRun =3D ""
End If
=20
Dim stDocName As String

stDocName =3D "Rq_edit_tbcodesoft"
DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_ENVOI_NOTICES_Click:
Exit Sub
Err_ENVOI_NOTICES_Click:
MsgBox Err.Description
Resume Exit_ENVOI_NOTICES_Click =20
End Sub

En fait, j'ai un champs qui se nomme "NUMNOTICE", qui est=20
toujours vide sauf pour 2 notices bien=20
particuli=E8res, "RK000417" et "RK000417" que l'on doit=20
incr=E9menter de 1, et je voudrais que lorsque dans ce=20
champs le num=E9ro de notice "RK000417" arrive le calcul=20
s'effectue avec en plus =E0 la suite de mon chiffre ".1"
exemple si j'en suis au n=B0 251 je voudrais obtenir 252.1 ,=20
pour la "RK0004183 je souhaite obtenir que le chiffre=20
reactualis=E9, par exemple si j'en =E9tais =E0 350 il m'ajoute 1=20
donc 351. Est ce possible ?????? par avance merci=20
cordialement

1 réponse

Avatar
Damran
Bonjour

En fait, j'ai un champs qui se nomme "NUMNOTICE", qui est
toujours vide sauf pour 2 notices bien
particulières, "RK000417" et "RK000417" que l'on doit
incrémenter de 1, et je voudrais que lorsque dans ce
champs le numéro de notice "RK000417" arrive le calcul
s'effectue avec en plus à la suite de mon chiffre ".1"
exemple si j'en suis au n° 251 je voudrais obtenir 252.1 ,
pour la "RK0004183 je souhaite obtenir que le chiffre
reactualisé, par exemple si j'en étais à 350 il m'ajoute 1
donc 351. Est ce possible ?????? par avance merci
cordialement


Pour concatainer, tu doit utiliser '&', comme dans le titre de ton post !
Norun = Norun & ".1"


Damran