macro qui crée un bouton en fonction d'un champ

[ryuk4747]

Bonjour,

j'ai créé un formulaire qui ajoute une ligne avec des infos à ma bdd.
il y a le champ "ville", "ip", "alveole" ....etc
sauf que j'aimerais que lorsque j'ajoute une ligne, il me crée aussi un bouton à droite de cette ligne en colonne H et que dans le bouton il y ait le code vb "sendkeys" suivi de la valeur du champ "ip" rentré dans le formulaire.
j'arrive a créer le bouton mais pas a le mettre dans la case associé à la ligne active.
quelqu'un aurait il une idée svp?


Cordialement,
cedric

 

[ryuk4747]

Re : macro qui crée un bouton en fonction d'un champ

j'ai testé ceci pour créer un bouton automatiquement en colonne h mais ça ne marche pas:

derligne = Range("H65535").End(xlUp).Row + 1

ActiveSheet.Buttons.Add(derligne, 8).Select

Selection.OnAction = "IP auto"

 

[ryuk4747]

Re : macro qui crée un bouton en fonction d'un champ

j'ai réussi à créer le bouton en colonne H mais ce que je voudrais c'est qu'à chaque fois que je crée un bouton, il se mette à la dernière ligne en colonne H.

Sub Macro2()
Dim top As Integer
top = top + 15
ActiveSheet.Buttons.Add(451.5, top, 60.75, 15).Select
End Sub