Aller à la dernière ligne d'un tableau

DAN66 -  
DAN66_1956 Messages postés 3 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tout le monde,
J'ai un fichier Excel avec plusieurs onglets.
Tous les onglets contiennent un tableau de conception identique.
Mais chaque tableau a une longueur (nombre de lignes, parfois plusieurs centaines) différente.
J'aurai voulu, en cliquant sur un bouton me retrouver à la cellule "A" juste après la dernière ligne du tableau.
Merci à tous de votre aide.
Dan.


Configuration: Windows / Firefox 98.0
A voir également:

6 réponses

Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Bonjour

Pour cela il faut un code VBA si tu as quelques notions, sinon Excel sait faire, il suffit de cliquer sur une cellule d'une colonne et clic sur Ctrl et en même temps flèche vers le bas du clavier et la cellule s'arrête sur la dernière cellule du tableau

0
yclik Messages postés 3873 Date d'inscription   Statut Membre Dernière intervention   1 562
 
Bonjour
A tester dans une cellule
=LIEN.HYPERTEXTE("#"&"Feuille1!A"&NBVAL(Feuille1.A2:A5000)+1;"Aller Feuille1 ligne "&NBVAL(Feuille1.A2:A5000)+1)

si pas de ligne vide dans la feuille1
0
DAN66
 
Bonjour yclik,
Merci pour ton aide, mais ça ne fonctionne pas.
Dans la cellule, j'ai : #NOM?
Mais j'aurai préféré une macro, car je ne suis pas le seul à utiliser ces tableaux
et c'est plus facile avec juste un bouton à cliquer.
Merci quand même.
0
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Re,

alors soit tu crées un bouton Activex sur chaque onglet avec ce code

Private Sub CommandButton1_Click()
Range("A65536").End(xlUp).Offset(1, 0).Select
End Sub

ou tu crées un code dans un module VBA
Sub Cellule()
Range("A65536").End(xlUp).Offset(1, 0).Select
End Sub

et dans chaque feuille tu crées un bouton activeX avec ce code

Private Sub CommandButton1_Click()
Call Cellule
End Sub

ou tu crées un simple bouton, clic droit dessus/affecter à une Macro et tu pointe vers le code macro exemple Cellule

0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
JB22
 
Bonjour,

Vous pouvez créer la macro suivante:

1- Sub FIN()
2- ' FIN Macro
3- ' Macro enregistrée le 14/09/2008 par JB
'
4- [A65536].End(3).Offset(1, 0).Select ' Attention "entre crochet".

5- End Sub

Créer un bouton et lui affecter la macro

On peut aussi créer une macro pour revenir au début (première ligne de la base).

Cdt,
JB22
0
DAN66_1956 Messages postés 3 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour JB22,
Merci beaucoup pour ta réponse.
Désolé je ne t'ai pas répondu car la réponse ne m'a pas été signalé par l'ordi.
Je vais essayer.
Merci.
0