Bonjour, Je débute en vba et bloque sur ce petit programme permettant de générer un tableau X , sin(X) ...
Sub Macro1() ' ' Macro1 Macro ' ' Touche de raccourci du clavier: Ctrl+b ' Numpoints = 21 Xnot = 0 dX = 0.1 ActivateCell.Value = "X" ActivateCell.Offset(0, 1).Value = "Sin(X)" X = Xnot For i = 1 To Numpoints ActivateCell.Offset(i, 0).Value = X ActivateCell.Offset(i, 1).Value = Sin(X) X = X + dX
Next
End Sub
D'après VBA, l'erreur se situe à la ligne : " ActivateCell.Value = "X" " Je ne vois absolument pas pourquoi...
Marsh Posté le 07-02-2010 à 21:03:44
Bonjour,
Je débute en vba et bloque sur ce petit programme permettant de générer un tableau X , sin(X) ...
Sub Macro1()
'
' Macro1 Macro
'
' Touche de raccourci du clavier: Ctrl+b
'
Numpoints = 21
Xnot = 0
dX = 0.1
ActivateCell.Value = "X"
ActivateCell.Offset(0, 1).Value = "Sin(X)"
X = Xnot
For i = 1 To Numpoints
ActivateCell.Offset(i, 0).Value = X
ActivateCell.Offset(i, 1).Value = Sin(X)
X = X + dX
Next
End Sub
D'après VBA, l'erreur se situe à la ligne : " ActivateCell.Value = "X" "
Je ne vois absolument pas pourquoi...
Merci de votre aide