Raccourci clavier "select cellule pleine suivante"

Pierrot93

XLDnaute Barbatruc

• 26 Décembre 2006

• #2

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
@+

 

Vote positif 0 Vote négatif

H

hbb

XLDnaute Occasionnel

• 26 Décembre 2006

• #3

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

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 26 Décembre 2006

• #4

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;

@+

 

Dernière édition: 26 Décembre 2006

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 26 Décembre 2006

• #5

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) :

Code:

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

@+

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 26 Décembre 2006

• #6

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.

@+

 

Vote positif 0 Vote négatif

Bernard_XLD

XLDnaute Barbatruc

Membre du Staff

Modérateur

• 26 Décembre 2006

• #7

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+

 

Vote positif 0 Vote négatif

H

hbb

XLDnaute Occasionnel

• 26 Décembre 2006

• #8

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

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 26 Décembre 2006

• #9

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...

@+

 

Vote positif 0 Vote négatif

H

hbb

XLDnaute Occasionnel

• 26 Décembre 2006

• #10

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....

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 26 Décembre 2006

• #11

Re : Raccourci clavier "select cellule pleine suivante"

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

 

Vote positif 0 Vote négatif

M

Mytå

Guest

• 26 Décembre 2006

• #12

Re : Raccourci clavier "select cellule pleine suivante"

Salut le Forum

Pourquoi pas simplement

ActiveCell.Offset(0,1).Select

Mytå

 

Vote positif 0 Vote négatif

myDearFriend!

XLDnaute Barbatruc

• 26 Décembre 2006

• #13

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 :

Code:

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

Cordialement,

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

 

Vote positif 0 Vote négatif

H

hbb

XLDnaute Occasionnel

• 26 Décembre 2006

• #14

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

 

Vote positif 0 Vote négatif

H

hbb

XLDnaute Occasionnel

• 26 Décembre 2006

• #15

RESOLU raccourci clavier "select cellule pleine suivante"

Pardon...

A+

 

Vote positif 0 Vote négatif