Author Topic: VBA equivalent to Burst?  (Read 2613 times)

0 Members and 1 Guest are viewing this topic.

Matersammichman

  • Guest
VBA equivalent to Burst?
« on: December 13, 2006, 01:08:32 PM »
My BURST command freaks out at least once daily  :ugly:
Does anyone know a VBA equivalent?

David Hall

  • Automatic Duh Generator
  • King Gator
  • Posts: 4075
Re: VBA equivalent to Burst?
« Reply #1 on: December 13, 2006, 02:56:20 PM »
not that I know of, but it wouldn't be hard to code it up
Everyone has a photographic memory, Some just don't have film.
They say money can't buy happiness, but it can buy Bacon and that's a close second.
Sometimes the question is more important than the answer. (Thanks Kerry for reminding me)

Matersammichman

  • Guest
Re: VBA equivalent to Burst?
« Reply #2 on: December 13, 2006, 03:23:48 PM »
I don't mind doing the legwork, but could you throw me a clue or two?

iliekater

  • Guest
Re: VBA equivalent to Burst?
« Reply #3 on: December 13, 2006, 03:30:57 PM »
What does the BURST command do ?

Arizona

  • Guest
Re: VBA equivalent to Burst?
« Reply #4 on: December 13, 2006, 03:32:00 PM »
Ok, here is some bits and pieces, I hope it is enough to get you started... (Sorry, I had about two minutes before I had to leave)

Select your block
Code: [Select]
  If objOldBlk.HasAttributes Then
              varOldAtt = objOldBlk.GetAttributes     'get block attributes
            End If
Get your attributes, insertion points, text strings, etc...
Add text and feed back all the above values.


David Hall

  • Automatic Duh Generator
  • King Gator
  • Posts: 4075
Re: VBA equivalent to Burst?
« Reply #5 on: December 13, 2006, 04:05:31 PM »
burst is explode without losing the attribute values.  So as AZ started, you need to get the block, filter the attributes, create a text equal to the att value, making sure to use the right layer, etc.  Then explode block, and erase/delete any attdef s that were in the selection set.  In a nutshell that is what needs to happen.  I have some att filter code, and an iterator for working through the atts, so all you really need is the text insertion (easy) and the deletion of attdefs (not something I know how to do.  The hard part is keeping them in the selection set.)
Everyone has a photographic memory, Some just don't have film.
They say money can't buy happiness, but it can buy Bacon and that's a close second.
Sometimes the question is more important than the answer. (Thanks Kerry for reminding me)

Guest

  • Guest
Re: VBA equivalent to Burst?
« Reply #6 on: December 13, 2006, 04:14:44 PM »
I've done the before.  Let me see if I can find it.


Stay tuned....

Guest

  • Guest
Re: VBA equivalent to Burst?
« Reply #7 on: December 13, 2006, 04:19:33 PM »
If the file name is any indicator (RemoveAttDefs.dvb) I have a VBA-type BURST.

HOWEVER.... Somebody (me) password protected it and now I'm racking my brain trying to figure out what the F it could be!!  :realmad:

Matersammichman

  • Guest
Re: VBA equivalent to Burst?
« Reply #8 on: December 13, 2006, 04:32:08 PM »
[link removed]

Comment from MP: The intent to help a fellow swamper is appreciated Matersammichman but the swamp isn't about breaking passwords or thwarting author's attempts to protect their work. Peace.
« Last Edit: December 13, 2006, 09:47:01 PM by MP »

Guest

  • Guest
Re: VBA equivalent to Burst?
« Reply #9 on: December 13, 2006, 04:35:15 PM »
Not needed... I figured it out.

And here it is.  It needs a little tweaking but it gives you a starting point.  It will prompt you to save the drawing in E:\Temp  (you can change that).

Any questions, lemme know.

Matersammichman

  • Guest
Re: VBA equivalent to Burst?
« Reply #10 on: December 15, 2006, 07:33:32 AM »
Nice work.
Thanks Matt and everyone!