Convertir dates MJA avec une macro

Signaler
-
 mmyriamm -
Bonjour,

J'ai fait une macro avec l'enregistreur et j'aimerais la modifier pour que lorsque j'appuie sur le raccourci CTRL +N que ce soit la sélection en cours qui soit converti et non pas la colonne G puisque cela peut se produire sur différentes colonnes dans mes rapports. Je ne suis pas trop habile à modifier le format d'une macro.

Merci beaucoup!


Sub ConvertirMJA()
'
' ConvertirMJA Macro
'
' Touche de raccourci du clavier: Ctrl+n
'
Columns("G:G").Select
Selection.TextToColumns Destination:=Range( _
"Tableau1[#Headers,[Invoice Date]]"), DataType:=xlFixedWidth, FieldInfo:= _
Array(0, 3), TrailingMinusNumbers:=True
End Sub



Configuration: Windows / Chrome 91.0.4472.77

1 réponse

Messages postés
9848
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
9 juin 2021
2 127
Bonjour

A priori, en supprimant cette ligne
Columns("G:G").Select
ça devrait fonctionner

Cdlmnt
Malheureusement ça ne fonctionne pas. Aussi l'entête de colonne ne sera pas toujours Invoice date il faut donc changer plus que ça et la rendre très générique.