VBA

Résolu/Fermé
reidid3563
Messages postés
27
Date d'inscription
jeudi 4 mars 2021
Statut
Membre
Dernière intervention
9 avril 2021
- 4 mars 2021 à 23:18
reidid3563
Messages postés
27
Date d'inscription
jeudi 4 mars 2021
Statut
Membre
Dernière intervention
9 avril 2021
- 10 mars 2021 à 07:30
bonjour,
je suis tout nouveau sur ce forum et j'essaie de me familiariser avec le VBA.
Voilà j'ai tout d'abord un problème, j'ai créer un fichier excel pour gérer des commandes au sein de mon établissement, lorsque j'ouvre ce fichier j'ai un onglet visible ("stock avant commande") et 2 autres que j'ai volontairement masqués ("Commande" et "stock à réintégrer"). Lorsque je clique sur un bouton "retour menu" insérer dans cet onglet "stock avant commande", je souhaiterai enregistrer la date du jour dans la cellule A1 par exemple à la fois sur cet onglet mais aussi sur les 2 onglets masqués.
J'ai tenter une macro pour lancer cette fonction (ci-dessous) mais elle ne fonctionne pas, j'ai une erreur d'execution "1004", erreur définie par l'application ou par l'objet

Sub Bouton1_Clic()
Dim valeur As Date
valeur = InputBox("merci de saisir la date d'enregistrement")
Range("B1").Value = Date
Sheets("Commande","stock à réintégrer").Range("B1").Value = Date
userform1.Show
End Sub

quelqu'un peut-il m'orienter dans l'exécution de cette commande.
d'avance merci

1 réponse

yg_be
Messages postés
19998
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
10 août 2022
1 185
4 mars 2021 à 23:38
bonjour,
peut-être ainsi:
Range("B1").Value = valeur
Sheets("Commande").Range("B1").Value = valeur
Sheets("stock à réintégrer").Range("B1").Value = valeur
0
reidid3563
Messages postés
27
Date d'inscription
jeudi 4 mars 2021
Statut
Membre
Dernière intervention
9 avril 2021

5 mars 2021 à 17:30
bonjour yg_be,
j'ai testé ta commande mais toujours erreur d'éxécution "1004", erreur définie par l'application ou par l'objet
sur la ligne: Sheets("Commande").Range("B1").Value = valeur
peut-être une autre idée???
merci d'avance
0
yg_be
Messages postés
19998
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
10 août 2022
1 185 > reidid3563
Messages postés
27
Date d'inscription
jeudi 4 mars 2021
Statut
Membre
Dernière intervention
9 avril 2021

5 mars 2021 à 19:06
peut-être partager ton fichier?
0
reidid3563
Messages postés
27
Date d'inscription
jeudi 4 mars 2021
Statut
Membre
Dernière intervention
9 avril 2021
> yg_be
Messages postés
19998
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
10 août 2022

6 mars 2021 à 18:45
bonjour,
question peut-être toute bête mais à priori, je ne peux que partager des fichiers "images". Comment partager un fichier excel?
merci
0
yg_be
Messages postés
19998
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
10 août 2022
1 185 > reidid3563
Messages postés
27
Date d'inscription
jeudi 4 mars 2021
Statut
Membre
Dernière intervention
9 avril 2021

6 mars 2021 à 20:37
tu importes le fichier sur internet (google drive, cjoint.com, ...), et tu partages ici un lien vers le fichier.
0
reidid3563
Messages postés
27
Date d'inscription
jeudi 4 mars 2021
Statut
Membre
Dernière intervention
9 avril 2021
> yg_be
Messages postés
19998
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
10 août 2022

6 mars 2021 à 21:36
voici le lien de partage pour le fichier en espérant que cela fonctionne.

https://drive.google.com/file/d/1E0eilKjux8-7KxU0Xswmkl_gOseZPIqn/view?usp=sharing

2 problèmes se posent;
le premier est celui évoqué plus haut et qui concerne le renseignement de la date à la fois sur l'onglet actif et sur les 2 onglets masqués lorsque je click sur le bouton "retour menu".
Le second concerne le bouton "imprimer" que j'ai créé sur mon userform et pour lequel je souhaiterai une impression de ces 2 onglets masqués.
merci d'avance pour votre aide
0