This will insert a split balloon with "A" on the top, and "23" on the bottom. You'll need to change the SelectByID2 to actually select what you want to balloon:
I am a novice at macros. I do want it to select the ID by the BOM I have it linked too. Would it be possible for you to change this macro to show that? I would but knowing me and what little I know about creating macros I am sure I would screw it up. Thanks
This will insert a split balloon with "A" on the top, and "23" on the bottom. You'll need to change the SelectByID2 to actually select what you want to balloon:
Dim swApp As SldWorks.SldWorks
Dim Part As ModelDoc2
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Sub main()
Dim myNote As Note
Dim BomBalloonParams As BalloonOptions
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
boolstatus = Part.Extension.SelectByID2("Line3", "SKETCHSEGMENT", 0.272729922359744, 0.19285376344086, 0, False, 0, Nothing, 0)
Set BomBalloonParams = Part.Extension.CreateBalloonOptions()
BomBalloonParams.Style = 7
BomBalloonParams.Size = 2
Set myNote = Part.Extension.InsertBomBalloon2(BomBalloonParams)
myNote.SetBomBalloonText 1, "A", 1, "23"
End Sub