2 réponses
Bonjour,
Pourquoi une macro lorsque la plus élémentaire des formules suffit, si par exemple la date est en A1 de la feuille 1, écrire sur la feuille 2 :
=Feuil1!A1
Pourquoi une macro lorsque la plus élémentaire des formules suffit, si par exemple la date est en A1 de la feuille 1, écrire sur la feuille 2 :
=Feuil1!A1
Bonsoir Patrice,
Merci pour ta réponse.
En fait la feuille A me sert de masque de saisie pour quelques variables, (dont la date) que je transfère dans la feuille B pour mes calculs.
Jean
Merci pour ta réponse.
En fait la feuille A me sert de masque de saisie pour quelques variables, (dont la date) que je transfère dans la feuille B pour mes calculs.
Jean
Alors voici une macro :
Je préfère cette autre façon d'écrire la même chose :
Cordialement
Patrice
Option Explicit
Sub CopierLaDate()
'Copier la valeur de la cellule de la feuille 1 sur la feuille 2
Worksheets(2).Range("A1").Value = Worksheets(1).Range("A1").Value
'Mettre la cellule de la feuille 2 au format date souhaité
Worksheets(2).Range("A1").NumberFormatLocal = "jj/mm/aa"
End Sub
Je préfère cette autre façon d'écrire la même chose :
Option Explicit
Sub CopierLaDate()
With Worksheets(2).Range("A1")
'Copier la valeur de la cellule de la feuille 1 sur la feuille 2
.Value = Worksheets(1).Range("A1").Value
'Mettre la cellule de la feuille 2 au format date souhaité
.NumberFormatLocal = "jj/mm/aa"
End With
End Sub
Cordialement
Patrice
