Discussion :

[locweb]

Bonjour,
ça marche !!!

Merci

J'ai effectué toutes les modifs pas à pas, et cela ne fonctionnait pas, puis j'ai enlevé la légende du formulaire dans ses propriétés, et cela a fonctionné.
En effet, c'est plus propre si on le supprime après, je suppose qu'il y a une ligne de code à ajouter à la suite du bouton rename ?
J'ai essayé ceci, mais il me met un message d'erreur, attendu fin d'instruction:

Code :

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

1
2
3
4
5
6
7
8
9
Dim NomTempo As String
     NomTempo = "BILAN_CHEOPS_N°_" & Me.BCHEOPSNUMERO & "_" & Me.NOM
 
    DoCmd.CopyObject , NomTempo, acReport, "BILAN_CHEOPS"
    DoCmd.OpenReport NomTempo, acPreview
    'DoCmd.DeleteObject [typeobjet][, nomobjet]
 
 
 DoCmd.DeleteObject [acReport][, NomTempo]

L'étape suivante sera de transposer cette fonction à mon autre bda, ou j'ai 3 appartements loués à la semaine.
Selon la valeur du champ ID_LOC, par exemple A B & C, il faudra qu'en appuyant sur un seul bouton j'ouvre un des 3 états de confirmation de réservation correspondant à la bonne location, et l'envoyer en pdf avec le nom du client.
Je vous tiendrais au courant de mon W.

Encore merci.

[Gabout]

Bonjour,

Va jeter un oeil sur la question que j'avais posée hier http://www.developpez.net/forums/sho...d.php?t=545856

A+

[locweb]

Bonjour,
cela marche très bien, cependant on arrive vite à encombrer la base avec les nouveaux états.
Francishop a raison de dire qu'il faut supprimer ensuite cet état, j'ai essayé de régiger une ligne de code supplémentaire pour cela
DoCmd.DeleteObject [typeobjet][, nomobjet] avec les infos suivantes
DoCmd.DeleteObject [acReport][, NomTempo]
il me renvoie le message suivant:
"attendu fin d'instruction"
J'ai essayé pluieurs syntaxes diffèrentes, rien n'y fait.
Pouvez-vous m'aider ?

Merci.

[francishop]

Bonjour,

Code :

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

DoCmd.DeleteObject acReport, "NomTempo"

Cordialement.