VBA/Excel/Access/Word/Data Type/OLE Equation
Add OLE-Equation
<source lang="vb">
Option Explicit Private Sub CommandButton1_Click()
Sheets(1).OLEObjects.Add("Equation.3").Name = "new" With Sheets(1).OLEObjects("new") .Left = 10 "size and position .Top = 10 .Width = 50 .Height = 50 .Activate "activate OLE objekt End With Sheets(1).[a1].Activate
End Sub
</source>