Conversion format date en VBA

[nounbxl76]

Bonsoir,

Suite à l'import de données de différents classeurs dans mon classeur principal, le format de date de la colonne F telles que les données sont importées est "jj/mm/aaaa hh:ss" alors que j'aimerais qu'il soit juste "jj/mm/aaaa"... que dois-je intégrer dans mon code selon vous SVP?

Merci par avance pour votre aide.

Cordialement,

 

[kjin]

Re : Conversion format date en VBA

Bonsoir,

....que dois-je intégrer dans mon code selon vous SVP?

...que nous n'avons pas !
A+
kjin

 

[Grand Chaman Excel]

Re : Conversion format date en VBA

Bonjour,
Sans avoir vu ton code... peut-être comme ceci, en faisant une boucle sur les cellules de la colonne F :

For i = 1 to 100
Cells(i,6) = Format(Cells(i,6),"dd/mm/yyyy")
Next i

A+

 

[Compte Supprimé 979]

Re : Conversion format date en VBA

Re,

Avec le code précédent il faut changer celui de la boucle 😉

 ' Copier chaque plage indépendamment  For Inc = 0 To 8
    ShtFils.Range(TabColS(Inc) & "5:" & TabColS(Inc) & LigFin).Copy
    ShtPère.Range(TabColD(Inc) & "17").PasteSpecial Paste:=xlPasteValues
    ' Si la colonne copiée est celle de la date
    If Inc = 6 Then
      ' Appliquer le format date à la colonne de destination
      ShtPère.Range(TabColD(Inc) & "17:" & TabColD(Inc) & 17 - 5 + LigFin).NumberFormat = "dd/mm/yyyy"
    End If
  Next Inc

A+

 

[nounbxl76]

Re : Conversion format date en VBA

C'est vrai... c'est un peu bête de ne pas transmettre le code... comme c'est un peu bête d'avoir ouvert une autre discussion alors que le code a été élaboré avec l'aide de BrunoM45 sur cette discussion... https://www.excel-downloads.com/threads/transfert-classeur-pere-classeur-fils-vba.197880/

Merci pour votre aide.

Cordialement

 

[nounbxl76]

Re : Conversion format date en VBA

Re,

J'ai un petit problème avec le code... il y a un petit bug car il ne trouve plus le fichier fils censé s'ouvrir avec

' Récupérer le nom entier du fichier
 nf = Dir(ThisWorkbook.Path & "\TW*.xls")
  ' Ouvrir le fichier
 Workbooks.Open Filename:=nf, ReadOnly:=True
  ' Définir la feuille source

Je n'ai pas modifié l'emplacement de ce fichier fils donc je ne vois pas trop...

 

[nounbxl76]

Re : Conversion format date en VBA

ne pas tenir compte... erreur d'aiguillage !
Désolé... d'où l'intérêt de ne pas multiplier inutilement les discussions... 😉