Problème compilation macro sous excel 2007

cs_Jay29 Messages postés 4 Date d'inscription mercredi 16 septembre 2009 Statut Membre Dernière intervention 18 septembre 2009 - 18 sept. 2009 à 14:43
cs_Jay29 Messages postés 4 Date d'inscription mercredi 16 septembre 2009 Statut Membre Dernière intervention 18 septembre 2009 - 18 sept. 2009 à 14:45
Bonjour a tous,
Je vous explique j'ai crée une macro sous excel 2007 cependant lorsque je l'exécute j'ai une erreur sur la dernière ligne de mon code. Le voici ci dessous :

Sub Macro1()
'
' Macro1 Macro
'
Dim firstDate As Date
Dim i As Long
Dim Res As Variant

Range("AC1").Value = "Ancienneté Instruction"
firstDate = CDate(InputBox("Entrer une date"))
For i = 2 To Range("F65536").End(xlUp).Row
For j = 2 To Range("R65536").End(xlUp).Row

If Range("F" & i).Value < 4 Then
    Res = -1
Else
    If Range("F" & i).Value < 6 Then
        If Range("R" & j).Value = "" Then
            Res = "NA"
        Else
            Res = DateDiff("m", Range("R" & j).Value, firstDate)
        End If
    End If
End If

Range("AC" & j, "AC" & i).Value = Res

Next j
Next i

'
End Sub


Merci d'avance pour votre aide!!!

1 réponse

cs_Jay29 Messages postés 4 Date d'inscription mercredi 16 septembre 2009 Statut Membre Dernière intervention 18 septembre 2009
18 sept. 2009 à 14:45
Suis-je bête j'ai oublié de préciser que l'erreur se situe au niveau de :

Range("AC" & j, "AC" & i).Value = Res


En effet je ne sais pas si c'est la syntaxe qui n'est pas bonne ou si il faut que je m'y prenne d'une autre façon.

Merci!!
0
Rejoignez-nous