Défilement synchronisé

J'ai 2 tableaux en affichage mosaïque et je voudrais faire défiler les 2 ascenseurs en même temps.

Tu mets la petite macro ci-dessous, dans un module, tu rajoutes un petit bouton dans la barre d'outils, tu lui associes la petite macro. puis quand tu as mis ton curseur dans une cellule tu cliques sur le petit bouton .... et toutes les feuilles de calculs affichées se synchronisent.

sub Synchro_Gerflor()
 ' ---au cas ou ce ne serait pas une feuille de calcul
 On Error Resume Next
 ' ---dénombre les fenetres
 zz = Application.Windows.Count
 ' ---récupere le N° de ligne sélectionnée
  xx = ActiveCell.Row
 ' ---pour chaque fenetre
 For i = 1 To zz
  ' ---la ligne choisie en haut  
   Application.Windows(i).ScrollRow = xx
 Next
 end sub

Auteur :

Mots clefs associés à cette page : , ,