XL 2016 VBA Rechercher colonne et copier/coller valeurs

jl456

XLDnaute Junior
Bonjour,

Je sollicite votre aide pour un code vba.
En fonction de la date du jour, je souhaite trouver la colonne de ma feuille "synthèse" qui correspond à cette date, puis copier les données de cette colonne et les coller en valeurs afin de retirer les formules.

Je vous mets en PJ l'exemple.

Je vous remercie par avance.
 

Fichiers joints

sousou

XLDnaute Barbatruc
Bonjour
Si j'ai bien compris!
à l'ouverture de ton fichier.

Private Sub Workbook_Open()
With Sheets("Synthèse")
d = Date
Set dj = .Rows(1).Find(d)
dj.Parent.Columns(dj.Column).Copy
dj.Parent.Columns(dj.Column).PasteSpecial (3)

End With
End Sub
 

jl456

XLDnaute Junior
Bonjour,
Merci beaucoup pour ton aide, cela répond à mon besoin :)
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas