Generation vba dans fichier Excel a partir d'un programme VB

Generation vba dans fichier Excel a partir d'un programme VB - VB/VBA/VBS - Programmation

Marsh Posté le 25-04-2005 à 21:14:32    

Bonjour,
Je genere un fichier excel a partir d'un programme VB.
J'aimerais en meme temps generer quelques objets (type "bouton" ou "checkbox" ) ainsi que le code VBA qui correspond aux evenements de ces objets (genre "click" ).
 
Est-ce possible et si oui comment ?
j'ai regardé du coté de la fonction application.recordMacro mais je pas trouvé grand chose
 
Merci

Reply

Marsh Posté le 25-04-2005 à 21:14:32   

Reply

Marsh Posté le 27-04-2005 à 12:30:16    

Bon ben je crois que j'ai trouvé mon bonheur :
(il faut utiliser le microsoft visual basic x.x extensibility)
 
http://bidou.ftp-developpez.com/Cours/VB/VB-excel2.pdf
http://www.cpearson.com/excel/vbe.htm
 
un pti exemple pour la route (recuperé sur le pdf en lien)
 
Public Sub AjoutBouton()
Dim MaFeuille As Worksheet, MonBouton As Shape, PosLigne As Integer
Set MaFeuille = ThisWorkbook.Worksheets("pilotage" )
Set MonBouton =
MaFeuille.Shapes.AddOLEObject(ClassType:="Forms.CommandButton.1",
Left:=100, Top:=100, Width:=100, Height:=200)
MonBouton.Name = "CommandButton1"
With ThisWorkbook.VBProject.VBComponents("Feuil4" ).CodeModule
.CreateEventProc "Click", "CommandButton1"
PosLigne = .ProcStartLine("CommandButton1_Click", vbext_pk_Proc)
.InsertLines PosLigne + 3, "msgbox " & Chr(34) & "nouveau bouton" &
Chr(34)
End With
End Sub

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed