Bonjour,
j'ai une erreur qui apparait sur certains ordis et pas d'autres pour une macro:
Sub maj_qtite()
Dim j As Integer
Dim i As Integer
Dim l As Integer
Dim m As Integer
l = Sheets("achat").Range("A65536").End(xlUp).Row
m = Sheets("Liste").Range("X2000").End(xlUp).Row
For j = 7 To l
For i = 7 To m
If Month(Date) >= 1 And Month(Date) <= 3 Then
If Sheets("Liste").Range("Y" & i).Value = Sheets("achat").Range("A" & j).Value Then Sheets("Liste").Range("X" & i).FormulaR1C1 = "=RC[-1]*RC[-2]*achat!R" & j & "C10"
End If
Next
Next
End Sub
L'erreur apparait à Month(Date) en surlignant le Date. Il me faudrait incorporer un code pour prevenir cette erreur, de facon à ce que tous les utilisateurs n'aient pas à modifier les paramètres de VBA pour que cela fonctionne, parce qu'ils ne sauront pas le faire.
Mais je ne vois pas quel code insérer pour prévenir ce probleme. QUelqu'un aurait une idée?
Merci d'avance,
Bubus