Bonjour,
depuis ce matin je me bataille avec la fonction dcount, j'arrive a la faire
fonctionner avec du numerique mais pas avec des dates
voici ma fonction:
If DCount("*", "calendrier", "dte='" & dtev & "'") > 0 Then
MsgBox "existe"
Exit Sub
Else
dte = dtev
End If
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pierre CFI [mvp]
bonjour si ce sont bien des format date If DCount("*", "calendrier", "dte=#" & Format(dtev ,"mm/dd/yyyy") & "#")
-- Pierre CFI MVP Microsoft Access
Site pour bien commencer Access http://www.mpfa.info
"yannick" a écrit dans le message de news:
Bonjour, depuis ce matin je me bataille avec la fonction dcount, j'arrive a la faire fonctionner avec du numerique mais pas avec des dates voici ma fonction:
If DCount("*", "calendrier", "dte='" & dtev & "'") > 0 Then MsgBox "existe" Exit Sub Else dte = dtev End If
merci pour toutes aides et bon dimanche Yannick
bonjour
si ce sont bien des format date
If DCount("*", "calendrier", "dte=#" & Format(dtev ,"mm/dd/yyyy") & "#")
--
Pierre CFI
MVP Microsoft Access
Site pour bien commencer
Access http://www.mpfa.info
"yannick" <yannick@discussions.microsoft.com> a écrit dans le message de news: 0C864682-56BF-4193-B84F-79296CFCF5C6@microsoft.com...
Bonjour,
depuis ce matin je me bataille avec la fonction dcount, j'arrive a la faire
fonctionner avec du numerique mais pas avec des dates
voici ma fonction:
If DCount("*", "calendrier", "dte='" & dtev & "'") > 0 Then
MsgBox "existe"
Exit Sub
Else
dte = dtev
End If
bonjour si ce sont bien des format date If DCount("*", "calendrier", "dte=#" & Format(dtev ,"mm/dd/yyyy") & "#")
-- Pierre CFI MVP Microsoft Access
Site pour bien commencer Access http://www.mpfa.info
"yannick" a écrit dans le message de news:
Bonjour, depuis ce matin je me bataille avec la fonction dcount, j'arrive a la faire fonctionner avec du numerique mais pas avec des dates voici ma fonction:
If DCount("*", "calendrier", "dte='" & dtev & "'") > 0 Then MsgBox "existe" Exit Sub Else dte = dtev End If