XL 2021 création macro

Bruce68 · Aujourd'hui à 16:18

Bonjour à tous
Comment écrire une macro pour copier la valeur d'une date de la feuille1 en feuille2.
Je vous remercie de votre aide

Jacky67 · Aujourd'hui à 16:32

Bruce68 à dit:
Bonjour à tous
Comment écrire une macro pour copier la valeur d'une date de la feuille1 en feuille2.
Je vous remercie de votre aide

Bonjour,
Sans macro ' avec la date en feuil1 A1, puis en feuil2 choisir la cellule de destination
=Feuil1!A1

Avec macro 'copie la date feuil1 A1 vers Feuil2 A1
Sub copieDate()
Sheets("Feuil2").[a1] = Sheets("Feuil1").[a1].Value
End Sub

sylvanu · Aujourd'hui à 16:36

Bonjour Bruce, Jacky,
Ou encore :

VB:

Sub CopierDate()
With Sheets("Feuil2")
    .[E18] = [C8]
    .[E18].NumberFormat = "[$-F800]dddd, mmmm dd, yyyy"  ' Mettre le format voulu
End With
End Sub

Si en feuille 2 on veut un format date différent. Une copie de la valeur ne copie pas le format.

XL 2021 création macro

Bruce68

XLDnaute Impliqué

Jacky67

XLDnaute Barbatruc

sylvanu

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

XL 2021 création macro

Bruce68

XLDnaute Impliqué

Jacky67

XLDnaute Barbatruc

sylvanu

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

Privacy & Transparency

Privacy & Transparency