Raccourci clavier "select cellule pleine suivante"

[hbb]

Bonjour à tous,

Je ne comprends pas, dans l'exemple ci-joint, je recherche le raccourci clavier (à transposer en code VBA Exel), pour selectionner la cellule pleine suivante.

En ligne 1, je me positionne en A1, je fais "Ctrl + Flèche de droite" ActiveCell.End(xlToRight).Select, ce n'est pas la cellule B1 mais C1 qui est selectionnée !!!!!

En ligne 2 par contre, cela fonctionne.

La fonction Ctrl+Flèche direction permet donc de selectionner la dernière cellule d'une région ???

Merci d'avance,
Hbb.

 

[Pierrot93]

Re : Raccourci clavier "select cellule pleine suivante"

Bonjour Hbb

Ce raccourci ne selectionne pas la cellule suivante mais va à la dernière cellule non vide.

bonne fin d'après midi
@+

 

[hbb]

Re : Raccourci clavier "select cellule pleine suivante"

ok mais y a t-il un code vba ou un raccourci clavier pour select la cellule pleine suivante ?

Hbb

 

[Pierrot93]

Re : Raccourci clavier "select cellule pleine suivante"

Re bonjour

tout dépend de la structure de ton fichier, il existe plusieurs méthodes, mais c'est rarement utile de selectionner en vba;

@+

 

[porcinet82]

Re : Raccourci clavier "select cellule pleine suivante"

Salut,

Voici un code qui a l'air de fonctionner (chez moi, je me suis servi de l'enregistreur de macro pour créer une macro avec raccourci clavier et j'ai mis le code dedans) :

Sub Macro7()
' Touche de raccourci du clavier: Ctrl+w
If IsEmpty(ActiveCell.Offset(0, 1)) Then Exit Sub
If IsEmpty(ActiveCell.Offset(0, 2)) Then
    ActiveCell.End(xlToRight).Select
Else
    ActiveCell.Offset(0, 1).Select
End If
End Sub

@+

 

[porcinet82]

Re : Raccourci clavier "select cellule pleine suivante"

re,

Je n'avais pas vu la dernière remarque de PIerrot qui est tout a fait juste. Si c'est pour utiliser dans du code, ca n'a aucun interet!
Mon code permet seulement de rendre service dans des cas de saisie ou un truc dans le genre, ce à quoi j'ai pensé en le faisant.

@+

 

[Bernard_XLD]

Re : Raccourci clavier "select cellule pleine suivante"

Bonjour Hbb, Pierrot93, Porcinet82, le forum

si c'est pour utiliser pour une interface, tu peux utiliser un code du type suivant appelé par un raccourci clavier

Sub Cellule_Suivante()
Do
ActiveCell.Offset(0, 1).Select
Loop Until Not (ActiveCell = "") Or ActiveCell.End(xlToRight).Column = 256
End Sub

Cordialement, A+

 

[hbb]

Re : Raccourci clavier "select cellule pleine suivante"

je souhaiterais éviter d'insérer une boucle dans mon code VBA , pour faire ce genre de manip.

Exite-t-il un code du style Activecell.NEXT(xlToRight).select ????

Merci.
Hbb

 

[porcinet82]

Re : Raccourci clavier "select cellule pleine suivante"

re,

Pas sur de tout comprendre, mais peut etre un truc de ce genre :
ActiveCell.End(xlToRight).Offset(0,1).Select

Ce code permet de te déplacer d'une cellule de plus que celle trouvée avec le code ActiveCell.End(xlToRight).Select

Sinon, met nous un exemple de ce que tu veux faire, ou de ton code afin que l'on voir ce que l'on peut faire, notamment que comme l'as dit Pierrot, la selection est souvent à proscrire en vba...

@+

 

[hbb]

Re : Raccourci clavier "select cellule pleine suivante"

Re tout le monde,

en fait je me suis mal exprimé, quand je parlais de raccourci clavier, je ne faisais par référence à une macro lancée par le clavier.

Je recherchais mon fameux code VBA en faisant l'enregistrement de plusieurs manipulations au clavier et en les visualisant ensuite....

 

[porcinet82]

Re : Raccourci clavier "select cellule pleine suivante"

Et donc... tu veux quoi au juste???
Tu as réussit a faire ce que tu voulais???

 

[Mytå]

Re : Raccourci clavier "select cellule pleine suivante"

Salut le Forum

Pourquoi pas simplement

ActiveCell.Offset(0,1).Select

Mytå

 

[myDearFriend!]

Re : Raccourci clavier "select cellule pleine suivante"

Bonsoir hbb, Pierrot93, porcinet82, Yeahou, Mytå, le Forum,

Pas sûr d'avoir tout compris non plus... mais pour sélectionner la cellule non vide suivante, on peut aussi faire :

[SIZE=2]    Cells.Find("*", ActiveCell).[COLOR=NAVY]Select[/COLOR][/SIZE]

Cordialement,

Bonnes fêtes de fin d'année à toutes et tous !

 

[hbb]

Re : Raccourci clavier "select cellule pleine suivante"

Bonsoir "MyDear Friend" et tout le forum,

J'avoue avoir eu assez de mal à expliquer mon problème mais tu as quand même répondu à 100% à ma question.

Selection de la cellule non vide suivante, c'etait exactement ça !!!!
Un peu fatigué que je suis....

Merci encore.

Bonne soirée
Hbb

 

[hbb]

RESOLU raccourci clavier "select cellule pleine suivante"

Pardon...

A+