activé la cellule du bas

ninbihan

XLDnaute Impliqué

• 27 Février 2008

• #2

Re : activé la cellule du bas

Bonjour Astralon,


Tu peux essayer

Code:

activecell.offset(1,0).select

Bonne journée,

Ninbihan

 

Vote positif 0 Vote négatif

A

astralon

XLDnaute Occasionnel

• 27 Février 2008

• #3

Re : activé la cellule du bas

Bonjour ninbihan,

ça fonctionne bien merci, mais est-ce que c'est ce qu'il y a de mieux, parce que les selects dans une prog, il parait que c'est pas top

 

Vote positif 0 Vote négatif

ninbihan

XLDnaute Impliqué

• 27 Février 2008

• #4

Re : activé la cellule du bas

Re,

Ben çà dépend ce que tu veux faire...
Ici tu demandes:

je recherche en VBA la commande qui le permet de selectionner la cellule qui se trouve juste en bas de la mienne ex si je suis en A1, je vais en A2

Cliquez pour agrandir...

Je t'indique donc comment sélectionner

Dis nous plus,

@+

Ninbihan

 

Vote positif 0 Vote négatif

A

astralon

XLDnaute Occasionnel

• 27 Février 2008

• #5

Re : activé la cellule du bas

re

ok, c'est parfait, j'ai même fini mon application (j'en suis fier)

 

Vote positif 0 Vote négatif

A

astralon

XLDnaute Occasionnel

• 5 Mars 2008

• #6

Re : activé la cellule du bas

Bonjour,

dans le même genre de demande, je voudrais que mon curseur se déplace de 12 cases vers la droite
ex : si je suis en A1 => A12 => A24.....

 

Vote positif 0 Vote négatif

CelluleVide

XLDnaute Occasionnel

• 5 Mars 2008

• #7

Re : activé la cellule du bas

Bonjour Astralon, le forum,

Pour décaler ta selection vers la droite:

Activecell.Offset(0,12).Select

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 5 Mars 2008

• #8

Re : activé la cellule du bas

Bonjour,
tu aurais dit A1 -> A12 -> A23 ou A1 - > A13 -> A25, tu aurais pu faire :

Code:

ActiveCell.Offset(0, 11).Select   ou
ActiveCell.Offset(0, 12).Select

Offset(nb_de_lignes, nb_de_colonnes)

 

Vote positif 0 Vote négatif

Dan

XLDnaute Barbatruc

Membre du Staff

Modérateur

• 5 Mars 2008

• #9

Re : activé la cellule du bas

Bonjour,

Vers la droite ??? Dans ton exemple c'est vers le bas là (A1;A12;A24
essaye ce code :
1. Vers le bas

Code:

Sub test()
'Macro par Dan pour XLD - astralon le 05/03/08
Dim a As Byte
If ActiveCell.Row = 1 Then
a = 11
Else: a = 12
End If
ActiveCell.Offset(a, 0).Select
End Sub

2. vers la droite

Code:

Sub test()
'Macro par Dan pour XLD - astralon le 05/03/08
Dim a As Byte
If ActiveCell.Row = 1 Then
a = 11
Else: a = 12
End If
ActiveCell.Offset(0, a).Select
End Sub

Espérant t'avoir aidé

Amicalement

Dan

 

Vote positif 0 Vote négatif

A

astralon

XLDnaute Occasionnel

• 5 Mars 2008

• #10

Re : activé la cellule du bas

Bonjour a tous

merci pour les infos et Surtout Merci a DAN qui a vu que .... j'avais fais une betise

Je teste le tout et encore merci beaucoup

 

Vote positif 0 Vote négatif