XL 2016 positions boutons de macro

Mariusweber

XLDnaute Nouveau
Bonjour,

Je vous explique mon problème. J'ai une feuille excel sur laquelle j'aimerais avoir 2 boutons éxécutant des macros, et que ces 2 boutons soient juste en dessous de la dernière ligne remplie.

Le probleme est que cette feuille excel est elle même générée par une macro, et sa taille (et surtout son nombre de lignes utilisées) peut varier, alors qu'à l'heure actuelle mes boutons sont fixes et ne s'adaptent pas (cf capture).

Quels outils pourrais-je utiliser pour que ces 2 boutons s'ajustent automatiquement par rapport à la derniere ligne non vide ?

Je vous remercie par avance.

Marius
 

Fichiers joints

Mariusweber

XLDnaute Nouveau
Voila ce que j'ai essayé, sans réussite :

Private Sub Worksheet_Activate()

xx = Range("E" & Rows.Count).End(xlUp).Row
ActiveCell = xx + 1
CommandButton (act_52_v2)
ActiveCell = xx + 2
CommandButton (act_55_v2)

End Sub
 

Dranreb

XLDnaute Barbatruc
Vous vous plaignez de ne pas être assez calé pour appliquer ce qu'on vous dit, et vous ne joignez pas de classeur pour qu'on puisse vous dire, après avoir testé, quoi mettre exactement et où, alors qu'est-ce que vous voulez qu'on fasse ?
Quels sont les noms des boutons ActiveX ?

C'est de ce genre là :
VB:
Private Sub Worksheet_Activate()
Dim Cel As Range
Set Cel = Range("E" & Rows.Count).End(xlUp).Offset(1)
CommandButton1.Top = Cel.Top
CommandButton2.Top = CommandButton1.Top + CommandButton1.Height
End Sub
Si ce sont bien des contrôles ActiveX et si CommandButton1 et CommandButton2 sont bien leurs noms.
 
Dernière édition:

Discussions similaires


Haut Bas