Bouton de saisie ajustable à la dernière ligne remplie

job75

XLDnaute Barbatruc

• 6 Mai 2015

• #2

Re : Bouton de saisie ajustable à la dernière ligne remplie

Bonsoir fleet21,

La ligne 1 étant figée, augmentez sa hauteur et placez-y le bouton.

Bonne nuit.

 

Vote positif 0 Vote négatif

F

fleet21

Guest

• 7 Mai 2015

• #3

Re : Bouton de saisie ajustable à la dernière ligne remplie

bonjour job75,

ce n'est pas le résultat demandé désolé.

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Mai 2015

• #4

Re : Bouton de saisie ajustable à la dernière ligne remplie

Bonjour fleet21, le forum,

Alors pour répondre strictement au problème posé, dans le code de la feuille :

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
With Shapes("Bouton 6")
  .Top = IIf(Application.CountA(Cells), _
    Cells.Find("*", , xlValues, , xlByRows, xlPrevious), [A1]).Offset(8).Top
  '---cadrez comme vous voulez---
  ActiveWindow.ScrollRow = Application.Max(.TopLeftCell.Row - 14, 1)
End With
End Sub

Les nombres 8 et 14 peuvent bien sûr être modifiés.

Bonne journée.

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Mai 2015

• #5

Re : Bouton de saisie ajustable à la dernière ligne remplie

Erreur de fil...

 

Vote positif 0 Vote négatif

F

fleet21

Guest

• 7 Mai 2015

• #6

Re : Bouton de saisie ajustable à la dernière ligne remplie

j'ai intégré ton code au mien mais cela génère une erreur avec 'sub', faut-il le placer ton ailleurs ?

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Mai 2015

• #7

Re : Bouton de saisie ajustable à la dernière ligne remplie

fleet21 à dit:

j'ai intégré ton code au mien

Cliquez pour agrandir...

Il n'y a rien à intégrer du tout.

Mon code est à placer dans le code de la feuille (clic droit sur l'onglet et Visualiser le code).

A+

 

Vote positif 0 Vote négatif

F

fleet21

Guest

• 7 Mai 2015

• #8

Re : Bouton de saisie ajustable à la dernière ligne remplie

ça y est le code est à mettre dans la feuille concernée, ça c'est bon.
la ligne "With Shapes("Bouton 6")" génère une erreur j'ai renommé mon bouton Bouton 6 mais idem ??

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Mai 2015

• #9

Re : Bouton de saisie ajustable à la dernière ligne remplie

fleet21 à dit:

j'ai renommé mon bouton Bouton 6 mais idem ??

Cliquez pour agrandir...

Le nom du bouton n'est pas ce qui est écrit dessus 🙄

Clic droit sur le bouton pour le sélectionner : son nom est affiché en haut à gauche.

A+

 

Vote positif 0 Vote négatif

F

fleet21

Guest

• 7 Mai 2015

• #10

Re : Bouton de saisie ajustable à la dernière ligne remplie

Tu ne l'avais pas di aussi 🙂.
Il me restera juste à effacer les restes du bouton lorsqu'il se déplace.
Merci de ta patience et ton aide.

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Mai 2015

• #11

Re : Bouton de saisie ajustable à la dernière ligne remplie

fleet21 à dit:

Il me restera juste à effacer les restes du bouton lorsqu'il se déplace.

Cliquez pour agrandir...

😕 il n'y a aucun "reste"... Vous aviez sans doute copié plusieurs fois le bouton au même endroit 🙄

A+

 

Vote positif 0 Vote négatif

F

fleet21

Guest

• 7 Mai 2015

• #12

Re : Bouton de saisie ajustable à la dernière ligne remplie

je viens de revérifier pour être sûr, j'avais fait la manip rapidement ce midi il reste bien des ''restes'' du premier cadre si celui ci est amené à se déplacer.

 

Vote positif 0 Vote négatif

F

fleet21

Guest

• 14 Mai 2015

• #13

Re : Bouton de saisie ajustable à la dernière ligne remplie

Bonsoir à tous,
Allez je rattaque cette fonction qui est quasiment finalisée !!

Après verification, il s'avère que le bouton laisse bien des "traces", un essai rapide la macro permet de s'apercevoir que l'ancien bouton n'est pas totalement effacé ou pas du tout effacé selon la ligne de saisie, le nouveau lui se déplace bien mais avec plusieurs saisies à la suite on arrive plus à voir quel bouton est le bon.

Mon souhait est de faire disparaitre systématiquement ses restes de bouton, quelque soit la ligne incrémentée.

JOB75, peux tu m'expliquer les différentes lignes de codes permettant le déplacement auto du bouton, je ne veux pas appliquer bêtement des lignes de codes merci.

 

Pièces jointes

• Essai.xls

  41.5 KB · Affichages: 25
• Essai.xls

  41.5 KB · Affichages: 37
• Essai.xls

  41.5 KB · Affichages: 30

Vote positif 0 Vote négatif