programmation sur VBA d'un diagramme de GANTT

Bonjour Isa et le forum,

Pour que cela marche, il ne faut pas mettre Value à la variable. La variable est un objet sans valeur constante.

Voila un exemple :

Sub macro1 ()
Dim boite_type_utilisateur As Currency ' Valeur monétaire
Dim i As Integer

For i = 1 To 20
boite_type_utilisateur = Range('a' & i).Value +1
Range('B1') = boite_type_utilisateur
Next i
End Sub

Cordialement

Bernard

rebonjour,

je vous remercie de votre réponse.
J'aimerais avoir quelques précisions par rapport à la notion d'objet.
Qu'est ce qu'il faut que je modifie?

merci
à bientôt

Re ISA,

La notion d'objet, c'est la référence à un objet. En VBA, l'application Excel est un objet, ActiveSheet est un objet, ActiveCell est un objet, Range('A1') est un objet.

Pour assigner une valeur à une variable, il suffit d'utiliser le signe égale, pour assigner à une variable une référence à un objet, on fait précéder l'instruction du mot clé Set

Exemple de macro à voir évoluer (saisir 11 dans la cellule 'A1') :

Sub AttriObjet()

Dim MyObjet As Variant

MyObjet = Range('A1') 'Assigne à la variable le contenu de la plage

Set MyObjet = Range('A1') 'Assigne à la variable une référence à l'objet Range.

End Sub

Pour voir les changements qui s'opèrent au niveau des variables locales, faire dans Visual Basic Editor Affichage/Fenêtre Variables Locales. Cette fenêtre s'ouvre en bas, puis, exécuter la macro ci-dessus pas à pas Affichage/Barres d'outils/Débogage. On voit la variable prendre trois états :

1- Variant/Empty ' Au début la variable est vide ;
2- Variant/Double ' La valeur 11 lui est assignée ;
3- Variant/Objet/Range ' Assigne à la variable une référence à l'objet Range (une plage).

Voila pour une première approche des objets en VBA.

Un bouquin est recommandé pour approfondir le cours.

Cordialement

Bernard

bonjour CBernardT

merci pour ton aide
c'est cool

A bientôt