Bonjour,
Et .... tout simplement :
MonResultat=Date()-MaDateDeDepart
:lol::mouarf:
Type: Messages; Utilisateur: Dixies
Bonjour,
Et .... tout simplement :
MonResultat=Date()-MaDateDeDepart
:lol::mouarf:
Bonjour,
Tu veux dire le formulaire ?
Oui, c'est possible, c'est d'ailleurs prévu nativement. Regarde dans les propriétés de ton Form, tout en bas, tu trouveras :
-> Fichier Aide
...
Bonsoir facteur & madefemere
et bien dans les propriétés de ta TxtBox, tu dois trouver, parmi d'autres, la procédure Aprés Maj ...
La proprosition de madefemere quant aux formes...
Bonsoir,
J'ai testé ton code sur événement Après MAJ de la Textbox et il fonctionne correctement.
Placer ce code sur Ouverture ou Chargement de ton Form va nécessiter systématique la fermeture...
Bonjour,
A quoi te sert ton formulaire principal ? Uniquement de "support " pour tes boutons et tes SF ?
S'il n'y a pas d'autres contrôles dedans, pourquoi ne pas opter pour un ruban personnalisé...
Bonjour,
Si ton post est toujours d'actualité, je te propose ceci :
Private Sub TaListe_Change()
Dim strSql As String
Dim n As String
n = Left(Me.TaListe.Text,...
Bonjour,
oui ça doit être possible : http://loufab.developpez.com/tutoriels/access/operateurlike/
Cdlt.
Re,
Hum !
Bon perso je ferais comme ceci :
-> enregistrer les dates dans une variable tableau
-> l'afficher dans la zone de liste
Dim MyTab(5) As Date ...
Bonjour,
Tu peux obtenir ça soit avec un Sous_Formulaire ou bien alors une Zone de Liste.
Dans les propriétés Sources de l'un et l'autre (générateur d'expression), tu renseignes les conditions...
Bonjour,
Je ne suis pas sûr de comprendre ce que tu cherches. :(
Qu'a cela ne tienne, crées autant de formulaire que tu le souhaites, mais l'intérêt d'un tel développement m'échappe car je...
Bonjour,
J'ai eu la même chose, pour ma part concernant l'export PDF d'un formulaire.
A priori, cela semble venir du fait que la procédure d'export n'est applicable que sur un objet ouvert....
Bonsoir,
Ceci fonctionne, j'ai testé :
Gauche([prixunitaire]-Int([prixunitaire]);4)+Int([prixunitaire])
Bonsoir Kintin,
Et bien je suis ravi que tu es réussit à faire ce que tu cherchais.
Tu as dit que la Db que je t'ai envoyée ne fonctionne pas non plus sur ton PC.
Donc, il y a interférence entre...
Re,
Donc, tu veux carrément ignorer la 3ème décimale (et plus) et sans arrondi du coup ? C'est ça ?
Comme le propose madefemere, il y a ça :
Format$(Round([prixunitaire1];2);"Fixe")
mais ce...
Bonjour,
Tu veux imposer comme séparateur décimal un "." c'est bien ça ?
Alors avec ceci :
Remplacer([prixunitaire1];",";".")
pour le nombre de décimal, il suffit de voir dans les...
Bonjour,
Alors il y a une solution : envoie moi ta Db, épurée de tes données, juste ces deux formulaires et la table liée (avec quelques (fausses) données dedans).
Je la testerai.
Courage et...
Bonsoir,
Mais en fait, tu n'a même pas besoin de mettre une macro sur ouverture de ton Form.
Dans les propriétés de F11, va sur Filtre et colle cette expression : [Ndoc-T19]=Forms!F6![Ndoc-T3]...
Bonsoir,
Où as-tu mis ta condition where ? Sur le bouton du Form_F11 qui ouvre ton Form_F6 ?
En fait, il faut appliquer le tri sur ouverture du Form_F6.
J'ai testé avec ceci :...
Bonsoir,
C'est parce que le "a" dans cette expression ne permet la saisie d'un chiffre ou d'une lettre.
>LL00000L"00-"aaaaaaaaaaaaaaaaaaaa
Par contre, écrit comme ça, tous caractères sont...
Bonjour,
Dans un cas comme le tiens où les chaines de caractères sont aléatoires, les masques de saisie ne sont plus adaptés.
Tu dois faire de la concaténation.
Regarde les fonctions : Left();...
Bonjour Kintin,
Je ne suis pas à l'aise avec les macros mais bon ....
Déjà ceci me semble pas bon :
"[Formulaires]![F11].[Ndoc-T19]=" & [Formulaires]![F6].[Ndoc-T3]
Ecrit de la sorte,...
Bonjour,
J'utilise ceci pour céer un PDF d'un de mes formulaires.
DoCmd.OpenForm "F_Prevision"
Forms("F_Prevision").Printer.Orientation = acPRORLandscape
DoCmd.OutputTo acOutputForm,...
Bonsoir,
Essaye :
Me.txtUseraccess.Value = DLookup("UserAccess", "tblUser", "UserName = '" & LstUserName.Column(1, LstUserName.ListIndex) & "'")
Cdlt
Ton code ne reconnait pas ta variable en tant que tel.
Il faut la mettre entre cote.
Me.txtUseraccess.Value = DLookup("[UserAccess]", "tblUser", "[UserName] = '" & Test & "'")
Cdlt.
Bonjour,
et avec ceci ?
Cdlt.
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.