Microsoft 365 Bouton à position variable

Sub Macro1()
Dim Range_Object As Range
Set Range_Object = ActiveCell
With ActiveSheet.Shapes("Button 1")
    .Top = Range_Object.Top
    .Left = Range_Object.Left
End With
End Sub

​

bzhjenny à dit:

Bonjour le forum,

Bien que je progresse rapidement (Merci de votre aide !), un nouveau pb se présente.

Je voudrais créer un bouton qui viendrais se positionner à côté de la dernière ligne d'un tableau (pour créer un pdf) sachant que le tableau a un nombre de lignes très variable.

Je bloque sur la définition de la position du bouton.

Si quelqu'un a un moment ;-)

Jenny

Cliquez pour agrandir...