Convertir dates MJA avec une macro

mmyriamm -  
 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

  1. ccm81 Messages postés 11033 Statut Membre 2 434
     
    Bonjour

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

    Cdlmnt
    0
    1. mmyriamm
       
      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.
      0