Microsoft 365 Problème de collage des données

job75

XLDnaute Barbatruc
Bonjour nayhi, chris, le forum,

Voyez le fichier .xlsm joint et la macro du bouton :
VB:
Dim c As Range
For Each c In ActiveSheet.UsedRange
    If IsDate(c) Then If c.NumberFormat = "d-mmm" Then c = "'" & Day(c) & "-" & Month(c)
Next
End Sub
Je n'ai pas compris pourquoi chez moi il faut tester le format "d-mmm" alors qu'on a "01-janv" en D2.

Je suis sur Excel 2019, chez vous c'est bon ?

A+
 

Pièces jointes

  • Programme tips(1).xlsm
    25.3 KB · Affichages: 2

chris

XLDnaute Barbatruc
Bonjour
Ce sont les données d'un site je les importent comment ?? La seule manière les prendre c'est de les copier !!!
On peut dans nombre de cas télécharger les données via PowerQuery intégré à Excel

Cette transformation par Excel de ce qu'on colle ou de ce qu'il trouve quand on ouvre directement un txt ou csv est un problème aussi vieux qu'Excel

tu as 1-1 1-2 : il prend ça comme le 1er des mois 1 et 2 mais comme 2-0 ou 0-4 il ne peut le prendre comme date, il le prend tel que donc le joyeux mélange.

@job75 : il faudrait formater le colonne en texte avant je pense, sinon il n'est pas exclu qu'il reconfigure...
Quoi qu'il en soit on n'est pas sûr avec 1-2 que ce cela ait été interprété comme le 01 février ou bien le 2 janvier... Souvent il ne fait pas cela de façon homogène...
 
Dernière édition:

Statistiques des forums

Discussions
312 329
Messages
2 087 334
Membres
103 519
dernier inscrit
Thomas_grc11