Changement de Colonne auto via date système

Bonjour à Tous,

Besoin de votre AIDE S.V.P.

En colonne "A", il y a des données quelconque.

Est-ce possible en VBA, qu'à chaque jour, la colonne "A" fasse un "COUPER" et "COLLER"

dans la colonne "B" automatiquement. (au changement de date système).

Voici la syntaxe que j'utilise pour le moment. Je dois moi-même l'activer à tous

les jours. Noter, que je dois garder les lignes d'entêtes "1 & 2" dans la colonne "A".

Merci.

Jean

Sub Compte_PO()
Columns("A:A").Select
Selection.Copy
Columns("B:B").Select
Selection.Insert Shift:=xlToRight
Range("B2").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=RC[1]+1"
Range("A3:A200").Select
Selection.ClearContents
Range("A3").Select
End Sub
1 2

bonjour

je ne sais pas à quoi sert ton tableau

ce que je peux dire c'est que ton idée de départ n'est pas la bonne (désolé )

globalement, on saisit des données dans des listes infinie, sans effacer. Les dates de ce genre de tableau servent ensuite à faire des TCD ou autres types de statistiques et d'extraction de données (RECHERCHEV, SOMMPROD...)

à quoi sert-il ?

Bonjour jmd,

Désolé pour le délai de réponse.

Ce tableau indique le nombre de bon de commande fait dans

une journée et quel bon de commande a été fait.

Merci

Jean.

Salut Moé, Jmd,

voici!

A toi de mettre la macro où c'est nécessaire..

A+

30decaler.xlsm (19.74 Ko)

Bonjour curulis57,

La solution que vous me donner me convient parfaitement.

Un Gros Merci.

Jean.

Avec plaisir!

A+

Rechercher des sujets similaires à "changement colonne auto via date systeme"