Si votre email correspond à un compte, vous recevrez un lien de réinitialisation.
BonjourComment faire pour remplacer une virgule par un point dansplusieurs champs d'une table via une requête ou par lecode VBA.Par avance merci pour votre aide
Bonjour Comment faire pour remplacer une virgule par un point dans plusieurs champs d'une table via une requête ou par le code VBA. Par avance merci pour votre aide
BonjourVoici une fonction de remplacementFunction ReplaceString(ByVal p_varValuein$, ByVal p_varWhat$, ByValp_varReplace$) As StringDim strChaine$, lngBoucle&strChaine = p_varValueinlngBoucle = InStr(strChaine, p_varWhat)Do While lngBoucle > 0strChaine = Left(strChaine, lngBoucle - 1) & p_varReplace &Mid(strChaine, lngBoucle + Len(p_varWhat))lngBoucle = InStr(lngBoucle + Len(p_varWhat), strChaine,p_varWhat, 1)LoopReplaceString = strChaineEnd FunctionUtilise cette fonction dans une requête mise à jourCordialementJeffBonjourComment faire pour remplacer une virgule par un point dansplusieurs champs d'une table via une requête ou par lecode VBA.Par avance merci pour votre aide--Ceci est une signature automatique de MesNews.Site : http://mesnews.no-ip.com
Bonjour Voici une fonction de remplacement Function ReplaceString(ByVal p_varValuein$, ByVal p_varWhat$, ByVal p_varReplace$) As String Dim strChaine$, lngBoucle& strChaine = p_varValuein lngBoucle = InStr(strChaine, p_varWhat) Do While lngBoucle > 0 strChaine = Left(strChaine, lngBoucle - 1) & p_varReplace & Mid(strChaine, lngBoucle + Len(p_varWhat)) lngBoucle = InStr(lngBoucle + Len(p_varWhat), strChaine, p_varWhat, 1) Loop ReplaceString = strChaine End Function Utilise cette fonction dans une requête mise à jour Cordialement Jeff Bonjour Comment faire pour remplacer une virgule par un point dans plusieurs champs d'une table via une requête ou par le code VBA. Par avance merci pour votre aide -- Ceci est une signature automatique de MesNews. Site : http://mesnews.no-ip.com
