Bonjour Le Forum,
C'est Chloé qui décidement ne comprend toujours rien en VBA
Je souhaite changer dans un colonne toutes les cellules qui contiennent une date (certaines cellules sont vides ou contiennent du texte) par la valeur de cette date suivie d'un tiret suivi du titre de la colonne (qui est toujours en ligne 3)....et ceci sur plusieurs colonnes.
Du coup j'ai écrit ceci :
For Each c In ActiveSheet.UsedRange
If IsDate(c) Then
c.Value = c.Value & " - " & Cells(3, c.EntireColumn.Value).Value
End If
Next
Je pense que c'est le morceau "c.Value & " - " & Cells(3, c.EntireColumn.Value).Value" qui coince, mais je ne trouve pas pourquoi.
Une bonne volonté aurait-il la gentillesse de me corriger mon code SVP
Bon A.M. à tous
Chloé
C'est Chloé qui décidement ne comprend toujours rien en VBA
Je souhaite changer dans un colonne toutes les cellules qui contiennent une date (certaines cellules sont vides ou contiennent du texte) par la valeur de cette date suivie d'un tiret suivi du titre de la colonne (qui est toujours en ligne 3)....et ceci sur plusieurs colonnes.
Du coup j'ai écrit ceci :
For Each c In ActiveSheet.UsedRange
If IsDate(c) Then
c.Value = c.Value & " - " & Cells(3, c.EntireColumn.Value).Value
End If
Next
Je pense que c'est le morceau "c.Value & " - " & Cells(3, c.EntireColumn.Value).Value" qui coince, mais je ne trouve pas pourquoi.
Une bonne volonté aurait-il la gentillesse de me corriger mon code SVP
Bon A.M. à tous
Chloé