Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Merci à tous pour vos propositions,.
Je regarde tout ça et j'essaye d'avancer dans mon projet.
Et je reviendrai vers vous surement pour d'autres problèmes.
Merci TooFatBoy pour tes solutions.
Cathodique le but est de renseigner le tableau par l'intermédiaire de l'UserForm, dans le projet final il y aura plus de cases à renseigner.
Et à partir du tableau je pourrai faire des graphiques.
Et tu as raison je suis parti un exemple de J.Boisgontier.
Merci pour votre aide,
Convertissez le contenu de vos résultats de UserForm dans les bons formats avant de les rapatrier sur votre feuille de calcul.
Comment convertir avant de rapatrier ?
Bonjour le forum,
Plusieurs problèmes dans mon UserForm,
La date saisie dans l'UserForm ne correspond plus dans la colonne A
09/12/2025 devient 12/09/2025
Dans la colonne D et E le calcul ne se fait pas lors de nouvelles saisies.
Voir le fichier joint.
Merci pour votre aide
Bonjour le forum,
Je ne c'est pas comment faire pour que les deux parties de code fonctionnent dans un worksheet_change.
Un part un cela marche mais les deux ?
Private Sub worksheet_change(ByVal Target As Range)
' validation date de livraison
Dim H, iSct As Range
Set iSct =...
Quand je lance la macro:
Elle copie la cellule à droite de la cellule active / Sub lien_Plan_Image
Ouverture d'une fenêtre windows pour sélectionner le fichier / Sub Chemin_plan_Acno
C'est là que je voudrais copier le contenue de la cellule colonne C
Bonjour le forum,
Dans la colonne A la référence du plan, saisie manuellement.
Dans la colonne B création d'un lien hypertexte par macro.
Dans la colonne C formule pour ajouter l'extension .pdf.
Je me place dans une cellule de la colonne B et je clic sur le rectangle pour lancer la macro.
La...
Bonjour le forum,
Comment remplacer dans la macro ci-dessous D101847-02 par la valeur de la cellule active ?
Sub A()
Dim Fichier As String
Fichier = Dir("C:\Users\fd\Documents\Thierry\Ds\D101847-02.pdf")
If Fichier <> "" Then
MsgBox "Le fichier '" & Fichier & "' éxiste"
Else
MsgBox "Le...