SwimCoachNico79
XLDnaute Occasionnel
Bonsoir à tous,
J'ai crée la macro suivante via un enregistrement automatique :
Sub Macro1()
'
' Macro1 Macro
'
'
Application.WindowState = xlMinimized
Application.WindowState = xlNormal
Range("H2").Select
ActiveCell.FormulaR1C1 = _
"=IF(LEN(RC[-2])=0,"""",IF(LEN(RC[-2])<6,RC[-2]/86400,IF(LEN(RC[-2])>6,RC[-2]/1)))"
Range("J11").Select
End Sub
Ma question : cette macro marche pour la cellule "H2" mais comment l'automatiser pour qu'elle fonctionne sur toute la colonne "H:H" de mon onglet.
Merci d'avance pour vos réponses et votre aide.
Bonne soirée,
SCN79
J'ai crée la macro suivante via un enregistrement automatique :
Sub Macro1()
'
' Macro1 Macro
'
'
Application.WindowState = xlMinimized
Application.WindowState = xlNormal
Range("H2").Select
ActiveCell.FormulaR1C1 = _
"=IF(LEN(RC[-2])=0,"""",IF(LEN(RC[-2])<6,RC[-2]/86400,IF(LEN(RC[-2])>6,RC[-2]/1)))"
Range("J11").Select
End Sub
Ma question : cette macro marche pour la cellule "H2" mais comment l'automatiser pour qu'elle fonctionne sur toute la colonne "H:H" de mon onglet.
Merci d'avance pour vos réponses et votre aide.
Bonne soirée,
SCN79