VBA : transformation en date

eglantine217 Messages postés 54 Date d'inscription   Statut Membre Dernière intervention   -  
eglantine217 Messages postés 54 Date d'inscription   Statut Membre Dernière intervention   -
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 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
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 54 Date d'inscription   Statut Membre Dernière intervention  
 
ç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