spinup & derligne

fhoest

XLDnaute Accro

• 16 Octobre 2013

• #2

Re : spinup & derligne

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

Code:

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

A+

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 16 Octobre 2013

• #3

Re : spinup & derligne

salut

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

Code:

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

 

Pièces jointes

• spinup.xlsm

  20.8 KB · Affichages: 40
• spinup.xlsm

  20.8 KB · Affichages: 48
• spinup.xlsm

  20.8 KB · Affichages: 45

Vote positif 0 Vote négatif

C

chris541

Guest

• 16 Octobre 2013

• #4

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

 

Vote positif 0 Vote négatif

C

chris541

Guest

• 16 Octobre 2013

• #5

Re : spinup & derligne

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

 

Vote positif 0 Vote négatif

C

chris541

Guest

• 16 Octobre 2013

• #6

Re : spinup & derligne

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

 

Vote positif 0 Vote négatif