Insérer formule dynamique avec VBA ne fonctionne pas...

Résolu
kllmoon Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
kllmoon Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

merci de me lire,

j'ai le code suivant et il ne fonctionne pas, je n'arrive pas à comprendre pourquoi...

Private Sub Worksheet_Activate()
Dim DernLigne As Long
DernLigne = Range("i62").End(xlUp).Row
formule = "=NB.JOURS.OUVRES(I3;I" & DernLigne & ";Exemple!A135:A148)"
Range("J103").Formula = formule
End sub

Simplement la dernière ligne ne fonctionne pas, le reste c'est nickel. J'ai essayé formular1c1 et toujours "erreur définie par l'application ou par l'objet"

Quelqu'un aurait des pistes de solution?

A voir également:

2 réponses

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Range("J103").FormulaLocal = formule
1
kllmoon Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
aussi simple que ça... merci beaucoup!
0