XL 2019 saisie de date dans une listbox

[micpid62]

bonsoir à tous
Je vous expose mon problème : je suis en charge de la gestion d'un cimetière (pas gaie mais intéressant) dont j'ai une base de donnée pour gérer les emplacements.
Pour cela j'ai une formulaire(FrmSaisie) pour géré l'ajout de concessions et une autre (Database) pour modifier ou supprimer.
Dans ma base(source) je fait le calcul de la durée de concession(date de début et date de fin)
Lorsque que je saisie à l'aide du formulaire (FrmSaisie) le calcule se fait correctement mais lorsque je veux modifier la date de début j'obtiens dans la cellule date de fin le résultat TEXTE
Je ne sais pas si je me suis bien expliqué mais je joint le fichier pour plus de compréhension
D'avance je vous remercie pour votre aide
MP

 

[micpid62]

Est ce que vous pouvez me faire un exemple §

 

[Dranreb]

Là. À vérifier et corriger s'il y a lieu.

 

[micpid62]

merci beaucoup
pouvez vous faire les mêmes modifications sur le fichier que j'ai modifier (selon mes connaissances) et en plus je ne trouve pas la solution pour afficher les images. Par la même occasion merci de m'apporter vos critiques

 

[Dranreb]

Installez déjà un contrôle Image dans l'UserForm et nommez le ImgPhoto, et mettez sa propriété PictureSizeMode à 3 — fmPictureSizeModeZoom.

 

[micpid62]

Voilà c'est mais je suis coincé

 

[Dranreb]

Eh bien il ne reste plus qu'à ajouter dans la Sub UserForm-Initialize :

CAs.Add Me.ImgPhoto, "Nom photo", "C:\gestioncimetiere\photos"

(Après avoir aussi ajouté dans le tableau cette colonne Nom photo, bien entendu)

 

[micpid62]

C'est fait j'ai ajouter le chemin dans la cellule colonne nom phot mais plus rien de marche

 

[Dranreb]

C'est, je suppose l'UserForm qui a noté ce chemin différent de celui spécifié au CAs.Add Me.ImgPhoto ? …
Si vos numéro de concession sont alphanumériques sans '0' non significatif, ils ne seront pas dans l'ordre après un classement de la base: d'abord tous ceux qui commencent par 'A-1' donc aussi A-11, A-123, après seulement ceux qui commencent par 2 …
Je me serais attendu à ce que la CBxCim soit prise en charge par le CLs

 

[micpid62]

pour tout vous dire je ne sais pas !

 

[Dranreb]

Non mais moi je vous le dis: si, après avoir cliqué sur le contrôle Image, vous changez le dossier ou le lecteur par rapport à celui défini au Add, il notera le chemin entier.
Curieux aussi qu'il y ait une virgule au lieu d'un point devant jpeg

 

[micpid62]

j'ai mis le dossier dans les lecteur c mais quant je saisi la recherche sur le n° de concession rien ne s'affiche

 

[Dranreb]

Alors d'où vient ce chemin spécifié du lecteur H ???
Rappelez cette fiche et recliquez sur l'image.

 

[micpid62]

Le lecteur H est une clé usb

 

[Dranreb]

Essayez en enlevant le chemin manuellement dans la base.
Vérifiez aussi si le chemin spécifié au CAs.Add Me.ImgPhoto, "Nom photo", "C:\gestioncimetiere\photos" est le bon, s'il ne manque pas un dossier racine au début ou des accents dans des noms de sous dossiers.

 

[micpid62]

Voilà une copie du lien où se trouve le dossier image : C:\GestionCimetière\photos
Je suppose qu'il faut ajouter le nom de l'image et l'extension ?