Discussion :

[mennix]

Bonjour
J'ai une petite requete,
j'ai une feuille excel avec des donnees une 20lignes et 20 colonnes
j'aimerais quand je suis sur une ligne, qu'au lieux que cela soit la cellule qui soit colorier, cela soit mes 20 colonnes, une espece de barre de defilement.
quand je me ballade de ligne en ligne ,c'est un ensemble qui est mis en evidence, et non juste une cellule.

j'ai déjà fait une petite routine, mais bon, c'est pas du nickel

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim Plage As Range
    Dim y As Long
    y = Target.Row
    Application.EnableEvents = False
    Range(Cells(y, 1), Cells(y, 10)).Copy
'    Range(Cells(y, 1), Cells(y, 10)).select
    Application.EnableEvents = True
 
End Sub

pas genial, existe il une fonction dans excel autre que ma bidouille?

merci a vous
byebye

[ouskel'n'or]

Je ne sais pas si c'est ce que tu veux mais je trouvais l'idée marrante

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Rows(Target.Row - 1).Interior.ColorIndex = xlNone
Rows(Target.Row).Interior.ColorIndex = 8
Rows(Target.Row + 1).Interior.ColorIndex = xlNone
End Sub

A+

Edit
ajoute cette ligne en début de macro

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Target.Row < 2 Then Exit Sub

Vi parce que sinon... ça beûgue ! Pièce jointe 15208

[mennix]

malheureusement, mes cellules possedent de la couleur. donc je ne peux pas toucher a la structure des celulles.
Et je crains que dans ton exemple, tant que je me deplace de un en un , ca marche, mais si j'utilise la sourie et que je selectionne une zone ou il ya plus d'une ligne entre.... le rafraichissement ne peut se faire.

je pense que je vais resté avec mon copier, ca fait un certain style, mais je suis preneur de toute autre idée... ca doit bien exister ca dans excel, je pense

[ouskel'n'or]

Attends, tu jètes trop vite les bonnes idées
Si tu stockes "Target.row dans un coin qui ne te sert pas, tu peux ré-initialiser la ligne en récupérant le N° de ligne là où c'est que tu penses que tu as rangé son N°

[AlainTech]

Ce ne serait pas ça que tu veux, par hasard:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Target.EntireRow.Select
End Sub

[mennix]

Merci a toi AlainTech, mon idée premiere etait ta fonction, seulement, avec cette méthode, je ne peux plus me deplacer dans mon document par le biais des fleches, il faut utiliser la souris pour les scroller l'ecran.

ouskel'n'or: l'avantage de passer par mon copier, c'est que je ne gere pas la mise a jour des cellules apres un déplacement... deplus je peux continuer a copier ou me deplacer sans souci.
J'avais pensé generer un cadre sur ma zone, mais , il faut qu eje pense a l'enlever quand je sauve mon document, ou que je print celui_ci, ou quand je passe d'une feuille a l'autre....
ca fait bcp d'action pour enlever les cadres et mettre les cadres sur le nouvelle endroit.
mais je peux effectivement stocker la position Old du curseur, et l'utiliser au moment d'un rafraichissemnt, il faut juste creer une variable old curseur, sur chacune des feuilles, vu que je voudrais utiliser cette méthode sur 4 feuilles.
Tu comprends pourquoi je passe par un copier... c'est quand meme bcp moins contrainiant eheheh ...