spinup & derligne

[chris541]

Bonjour au forum,
voilà g un petit souci dans le fichier ci joint ....
comment sélectionner la dernière cellule de la colonne en fonction du déplacement du spinup...
merci d'avance...pour votre aide

 

[fhoest]

Re : spinup & derligne

Bonsoir,
en mettant le showmodal du userform sur 0 un test avec ce code sous le spinbutton.

Dim col As Integer
col = ActiveCell.Column
Cells(Cells(65000, col).End(xlUp).Row + 1, col).Select

A+

 

[Si...]

Re : spinup & derligne

salut

Min à 1, Max à N° dernière colonne voulue

Private Sub SpinButton1_Change()
  Cells(Cells(Rows.Count, SpinButton1).End(xlUp).Row + 1, SpinButton1).Select
End Sub

 

[chris541]

Re : spinup & derligne

Bonsoir et merci pour ton aide, j'ai testé j'arrive à déplacer une seule fois
existe t-il une commande pour le spinup et spindown de manière à me deplacer sans toucher au showmodal?
merci pour ton aide...
chris

 

[chris541]

Re : spinup & derligne

merci à SI.....et à fhoest
ca fonctionne
a+

 

[chris541]

Re : spinup & derligne

Juste une petite question
comment faire avancer le curseur en sautant une colonne sur deux( janvier ,mars ,...)
merci
a+