Discussion :

[Pascalou2008]

Bonsoir,
J'aimerais trouver un code qui me permette en me positionnant sur une cellule quelconque, de sélectionner x cellules à droite et x ligne en dessous.
J'ai trouvé un code qui permet de sélectionner x cellules à droite de la cellule active mais les lignes sont déjà définies.
Pour le reste je coince.

Code :

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

Range("A1:A10", Range("A1:A10").Offset(0, 10)).Select

Range("A1:A10", Range("A1:A10").Offset(0, 10)).Select
Mais dans ce code les lignes sont définies...

Pourriez-vous me dépanner svp? Merci !
Pascale

[Qwazerty]

SAlut
Je pense, sans avoir fait de teste

Code :

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

range(selection,selection.offset(y,x))

et si ce code est utilisé dans SelectionChange de l'objet Worksheet, tu peux utiliser

Code :

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

range(Target,Target.offset(y,x))

Je n'ai pas testé les code mais ca doit etre dans ce gout la
Bonne nuit
A++
Qwaz

[Abed_H]

Bonsoir
essaie cette variante

Code :

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

1
2
3
Sub sPlage()
    ActiveCell.Resize(10, 10).Select ' à adapter
End Sub

Abed_H

[Pascalou2008]

Bonsoir,
Un tout grand merci ça fonctionne nickel!
Très bonne soirée à toi,
Pascale