Discussion :

[AlainSch]

Bonjour,

Suite à ma demande formulée dans cette discussion :

https://www.developpez.net/forums/d2...te-formulaire/

Y aurait t'il un moyen d'avoir l'affichage des 7jours à encoder sur une seule page sachant que pour chaque jour de garde il n'y a pas plus que 4 vétérinaires
Celà éviterai de changer le formulaire et la date après avoir encodé pour un jour les 4 vét.
Comme si il y aurait 7 formulaires un après l'autre. La date du deuxième jour s'afficherai une fois la date du premier encodé, également pour les idgarde, genre id 01 + 1 et s'afficherai le 2 puis le 3 etc etc

Je joint également le print

Merci bien !

[User]

Le plus simple c'est de mettre le formulaire F_Garde comme sous-formulaire du formulaire de recherche et de le renommer SF_Gardes.

Comme cela tu peux afficher les gardes pour les 7 jours de recherche dans le sous-formulaire SF_Gardes. Mais attention il faut quand même faire défiler les gardes.

Pour avoir les gardes des 7 jours sur la même page, ce n'est pas vraiment possible pour un formulaire.

Une autre solution serait d'avoir un sous-formulaire pour les gardes et un autre sous-formulaires pour les vétérinaires de garde : les 2 sous-formulaires serait synchronisés sur la même page (cf. v2).

[AlainSch]

Bonsoir

Pourriez-vous me dire pourquoi la fonction Macro, ajout nv enregistrement etc ne fonctionne pas?
Et aussi pour le fichier xls, il ouvre xls mais n'ajoute pas le contenu.
J'ai essayé de trouver des codes mais je n'ai pas trouvé ce qu'il me faut
Je joins les photos....


Merci

[User]

Pourriez-vous me dire pourquoi la fonction Macro, ajout nv enregistrement etc ne fonctionne pas?

Logique, vous êtes sur un formulaire qui n'a pas de source de données. Il faut créer le bouton avec la macro "ajouter enrg." dans le sous-formulaire SF_Gardes qui est basé sur la table des gardes.

t aussi pour le fichier xls, il ouvre xls mais n'ajoute pas le contenu.

C'est vieux ça le format xls ???
Pour l'argument SpreadsheetType de la commande TransferSpreadsheet mettre acSpreadsheetTypeExcel9 à la place de acSpreadsheetTypeExcel12.

[AlainSch]

J'ai fait mais aucun résultat

Pourriez-vous s'il vous plaît le faire et mettre le bouton ajouter....

J'utilise Excel 365....

Je suis chiant je sais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
cheminFichier = CurrentProject.Path & "\Gardes des vétérinaires.xls"
    ' transfert de la requête dans le fichier excel situé à l'emplacement cheminfichier
    DoCmd.TransferSpreadsheet TransferType:=acExport, _
                                SpreadsheetType:=acSpreadsheetTypeExcel9, _

[User]

Bonjour,

J'ai mis à jour la pièce jointe ici