Selectionner plage de cellule suite InputBox

[mikael2235]

Bonjour

Je récupère la valeur "A30" d'une InputBox nommée Cellule

Je voudrais ensuite que mon Range().Select me prenne en compte A32:A42

soit A30+2 à A32+10

Je ne vois pas comment faire. J'ai essayé Range(Cellule+2:Cellule+10).Select, mais c'est bien trop simple pour que ça marche...

Merci pour votre aide.

 

[Robert]

Re : Selectionner plage de cellule suite InputBox

Bonjour Mikael, bonjour le forum,

Peut-être comme ça :

Sub Macro1()
Dim o As Range
 
Set o = Application.InputBox("Tapez la référence de la cellule de départ.", "DÉNITION DE LA PLAGE", Type:=8)
Range(o.Offset(2, 0), o.Offset(12, 0)).Select
End Sub

Édition :

Bonjnour Jean-Marcel on s'est croisé.

 

[Pierrot93]

Re : Selectionner plage de cellule suite InputBox

Re, bonjour Jean-Marcel

peut être comme ceci, supposant x un objet range :

x.Offset(2, 0).Resize(11).Select

@+

Edition : bonjour Robert

 

[mikael2235]

Re : Selectionner plage de cellule suite InputBox

Re, bonjour Jean-Marcel

peut être comme ceci, supposant x un objet range :

x.Offset(2, 0).Resize(11).Select

Merci Pierrot, ta syntaxe fonctionne parfaitement
avec celles de Robert et JM, j'ai pas réussi, mais merci quand même à vous