bouton&ligne

Ilino

XLDnaute Barbatruc

• 3 Octobre 2013

• #2

Re : bouton&ligne

Re
ci joint fichier exemple
A+

 

Pièces jointes

• ILINO LIGNE BOUTON.xlsx

  15.4 KB · Affichages: 38

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 3 Octobre 2013

• #3

Re : bouton&ligne

Re,
ci dessous LE CODE

Code:

Private Sub CommandButton1_Click()
Rows(2).Select
End Sub
Private Sub CommandButton2_Click()
Rows(68).Select
End Sub
Private Sub CommandButton3_Click()
Rows(112).Select
End Sub

Je souhaite afficher la ligne souhaité( par le bouton) au dessous de la ligne des boutons
GRAZIE

 

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 4 Octobre 2013

• #4

Re : bouton&ligne

Bonsoir Ilino,

Essayer le code suivant dans le module de Feuil1:

VB:

Private Sub CommandButton1_Click()
  Application.Goto Range("A2"), True
End Sub

Private Sub CommandButton2_Click()
  Application.Goto Range("A68"), True
End Sub

Private Sub CommandButton3_Click()
  Application.Goto Range("A112"), True
End Sub

Si vous ne désirez pas revenir en tête de ligne, remplacer Range("Ann") par Rows(nn)

 

Dernière édition: 4 Octobre 2013

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 4 Octobre 2013

• #5

Re : bouton&ligne

Bonjour Mapomme
Mission accomplie , merci pour la réponse
Grazie
A+

 

Vote positif 0 Vote négatif