Exporting Title Block Information To Excell

Exporting Title Block Information To Excell

Chirpyboy2060647
Advocate Advocate
796 Views
3 Replies
Message 1 of 4

Exporting Title Block Information To Excell

Chirpyboy2060647
Advocate
Advocate

Hey everyone,

 

Well my job has just gave me the task of finding out how to export the information from a finished titleblock into excell (for now just figure out how to do it, how to make it look nice will come later). I exploded the current title block in autocad and found what parameters are what and which i need to put...

 

I figured on our current Macro of editing our title block i can just add a new button and call it "Export". But not that caught up on VBA as far as how to tell the button to pull 001-006 properties and export those to Excell...Any help or info on the right direction would help a lot.

0 Likes
797 Views
3 Replies
Replies (3)
Message 2 of 4

Owner2229
Advisor
Advisor

HI, you want to export the properties of the drawing, the model (assembly or part), or model and submodels (assembly, subassembly and parts)?

I have a rule that takes info from main assembly, all subassemblies and parts and writes them in an Excel table.

See the attachment.

Consider using "Accept as Solution" / "Kudos" if you find this helpful.
- - - - - - - - - - - - - - -
Regards,
Mike

"Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live." - John F. Woods
0 Likes
Message 3 of 4

Chirpyboy2060647
Advocate
Advocate

Well I want to be able to export the information thats in my Titleblock. It as a bunch of client information and different labels/BOM that as of right now are manual entered into excel for a ship list. Id like to cut out that entering it manually. Yes I can export the BOM through the Manager but there is a macro setup for me to add in things like "inserts" and "bolts" but not have them actually in my drawing, into the titleblock

 

...I just looked at your excel sheet and yes thats some of the type of information I'd like to grab but take it from what I've typed into my titleblock

0 Likes
Message 4 of 4

Chirpyboy2060647
Advocate
Advocate

I figured it would help with some code that already exists.

 

Private Sub txtOrdNum_Exit(ByVal Cancel As MSForms.ReturnBoolean)

    If txtOrdNum.Text = "" Then
    oProperties.Item("FI_103").Expression = ""
    Else
    oProperties.Item("FI_103").Expression = txtOrdNum.Text
    End If

 

Pretty much i have about 10 of these different blocks that I write into the exisiting macro that goes into my Titleblock. Client name order number parts and so forth and so on. I guess i just need a little help on what to add to my "Export" button to bring those to Excel.

0 Likes