VBA
Résolu
reidid3563
Messages postés
27
Date d'inscription
Statut
Membre
Dernière intervention
-
reidid3563 Messages postés 27 Date d'inscription Statut Membre Dernière intervention -
reidid3563 Messages postés 27 Date d'inscription Statut Membre Dernière intervention -
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
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
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
bonjour,
peut-être ainsi:
peut-être ainsi:
Range("B1").Value = valeur
Sheets("Commande").Range("B1").Value = valeur
Sheets("stock à réintégrer").Range("B1").Value = valeur
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
question peut-être toute bête mais à priori, je ne peux que partager des fichiers "images". Comment partager un fichier excel?
merci
Dans quel module de quel classeur se situe ta macro ?
Le classeur est-t'il actif ?
La feuille Commande est-t'elle une feuille de calcul ?
valeur est un texte, est-t'il convertible implicitement ?
La feuille est-t'elle protégée ?
et encore bien d'autres idées ...