Commande Insertion-Macro-Module introuvable ds Excel 2003
Bonjour, débutant en macros sur Excel 2003, je ne trouve pas la commande Insertion-Macro-Module.
Je cherche le moyen d'ouvrir un module dans mon classeur pour faire une macro simple d'addition :
Proc AdditionDansCellule()
AffecteRéf CelluleAdd = CelluleActive
Donnée = BoîteSaisie("Entrez la valeur:""Valeur à additionner")
Si Donnée <> ""Alors
NouvelleValeur = CelluleAdd + Donnée
CelluleAdd.Valeur = NouvelleValeur
Fin Si
Fin Proc
(j'ai l'impression qu'après Alors, il manque qq chose)
Je me base sur un livre SOS Excel 5 et 7 (ça ressemble à Excel 2003), mais les commandes de macros sont en français, alors qu'apparemment dans Excel 2003, elles sont en anglais (if, then).
Peut-être faut-il que je mette toutes les commandes en anglais ?
Bonjour et bienvenu sur le forum
C'est pas proc mais sub …
c'est pas boitesaisie mais inputbox ...
c'est if then....
Bref plein d'erreur...
Peux tu mettre un fichier
sub AdditionDansCellule()
dim données as integer 'ou double...
dim nouvellevaleur as integer
AffecteRéf CelluleAdd = CelluleActive 'connais pas...
Donnée = inputbox("Entrez la valeur";"Valeur à additionner")
if Donnée <> "" then
NouvelleValeur = CelluleAdd + Donnée
CelluleAdd.Valeur = NouvelleValeur
endif
end subcelluleadd je connais pas
A+ François
Bonjour, merci pour l'accueil et pour la réponse.
j'ai commencé à modifier :
Sub Macro_Addition()
Set CelluleAdd = CelluleActive
Donnée = InputBox("Entrez la valeur:""Valeur à additionner")
If Donnée <> "" Then
NouvelleValeur = CelluleAdd + Donnée
CelluleAdd.Valeur = NouvelleValeur
End If
End Sub
(pour joindre un fichier, il faut que je fasse un clic droit sur le nom du module et exporter le fichier ?)
Bonjour
Pour joindre un fichier clic sur X (à coté de X²)
A+ François