déplacement curseur

breeze · 20 Novembre 2011

Bonsoir,
J,ai une macro qui me permet de déplacer mon curseur vers la droite de 7 cases à la fois.
Ce qui me permet d'amener la colonne qui s'appelle "activité" au début de mon classeur.
Le problème est le suivant. mon tableau est long et irrégulier.
Pour mieux comprendre je vous envoie un modèle
Ce que je voudrait c'est qu'en cliquant sur mon bouton ,la macro amème la colonne "activité"après la colonne "C" Mon fichier est peut-être plus clair

Merci

BOISGONTIER · 20 Novembre 2011

Re : déplacement curseur

Bonjour,

Voir PJ

Code:

Sub positionneActivitéSuivant()
  On Error Resume Next
  Range(Cells(2, ActiveCell.Column + 1), Cells(2, 255)).Find(What:="Activité", SearchDirection:=xlNext).Select
  ActiveWindow.ScrollColumn = ActiveCell.Column
End Sub

Sub positionneActivitéPrécédent()
  On Error Resume Next
  Range(Cells(2, ActiveCell.Column - 1), Cells(2, "A")).Find(What:="Activité", SearchDirection:=xlPrevious).Select
  ActiveWindow.ScrollColumn = ActiveCell.Column
End Sub

JB

breeze · 20 Novembre 2011

Re : déplacement curseur

Merci, Barbatruc
C'est exactement ce que je voulais
Mille merci !!!

déplacement curseur

breeze

XLDnaute Occasionnel

Pièces jointes

BOISGONTIER

XLDnaute Barbatruc

Pièces jointes

breeze

XLDnaute Occasionnel

Discussions similaires

déplacement curseur

breeze

XLDnaute Occasionnel

Pièces jointes

BOISGONTIER

XLDnaute Barbatruc

Pièces jointes

breeze

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency