VBA : transformation en date

eglantine217 Messages postés 64 Statut Membre -  
eglantine217 Messages postés 64 Statut Membre -
Bonjour,

J'essaye de transformer les . en / de la colonne B, ça commence à B3 et la dernière ligne est variable (entre 28000 et 30000). Mon code plante comme je ne suis pas experte je ne sais pas quel est le PB.

Sub Macro1()
    Range("B:B").Select
    Selection.TextToColumns Destination:=Range("B3"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
        :="/", FieldInfo:=Array(1, 4), TrailingMinusNumbers:=True
             
End Sub


Merci d'avance

1 réponse

ccm81 Messages postés 11033 Statut Membre 2 434
 
bonjour

1. sans macro un simple Remplacer dans la feuille devrait suffire
2. si tu tiens à une macro
Public Sub RemPpS()
    Range("B:B").Replace What:=".", Replacement:="/"
End Sub

bonne suite
1
eglantine217 Messages postés 64 Statut Membre
 
ça marche très bien merci le seul problème c'est que lorsque je place un filtre en haut de la colonne, et que je positionne le mois de mars par exemple je ne trouve pas le même nombre de valeurs que je trouve lorsque je le fais manuellement ... je comprend plus rien je pense que le format de la cellule ne se met pas en format date c'est peut être ça mon problème
0