Etendre une série en vba excel

[lolosca]

Bonjour,

je met un petit programme vba excel en place et pour faciliter l'usage par l'utilisateur, j'aimerai savoir si c'est possible, pouvoir étendre une série dans un onglet (voir exemple en pièce jointes)

Dans mon fichier chaque numéros de dossier commence par l'année met mettre trops d'année allourdi mon fichier alors je voudrais que tous les ans en appuyant sur un bouton de commande, ma base avec mes numéros de dossier supprime la première colonnes (déjà fait dans le fichier) puis etende la séléction à l'année suivante.

Je joins un fichier qui permettra de se rendre compte de ce que je voudrais.

Merci d'avance,

Bonne journée à tous

 

[lolosca]

Re : Etendre une série en vba excel

excusez moi je joins le fichier ici!

 

[phlaurent55]

Re : Etendre une série en vba excel

bonjour lolosca

avec ce code, la colonne de l'année dernière sera supprimée

Private Sub CommandButton1_Click()
If Year(Now) > [A1] Then Columns(1).Delete
End Sub

à+
Philippe

 

[lolosca]

Re : Etendre une série en vba excel

Merci, mais j'avais déjà ce code c'est celui pour etendre une série qui me pose plus problème,

Merci quand même bonne journée

 

[phlaurent55]

Re : Etendre une série en vba excel

Re,
que dois-je comprendre par

etendre une série qui me pose plus problème,

avec ceci pour sélectionner les données présentes en colonne A
Range("A1:A" & Range("A65535").End(xlUp).Row).Select

à+
Philippe