Thanks Jason,
That worked. It took a little while to figure out the radio buttons but
it works.
Thanks for you help.
--
J_Toy
"Jason Wilder" wrote in message
news:F401143C4AB3C33523B305F0D6C5877E@in.WebX.maYIadrTaRb...
> J_Toy,
>
> Here is a snipet of code I use, I think it'll give you the idea. I use
this
> for details that I insert into my detail sheets. I mainly got it out of
the
> help refernences in the VBA IDE help.
>
>
> Dim detInsPt(0 To 2) As Double
> Dim detName As String
> detInsPt(0) = 0#
> detInsPt(1) = 0#
> detInsPt(2) = 0#
> detName = detDir + lstbxDtl.Text
> Set detBlock = ThisDrawing.ModelSpace.InsertBlock(detInsPt, detName,
1#,
> 1#, 1#, 0)
>
> Obviously you'll have to substitute in your method for the blockname
> (detName variable in my case).
>
> HTH
>
>
> wrote in message
> news:943D97BFCE6B335F4EE75D85902473C4@in.WebX.maYIadrTaRb...
> > I'm new to VB programming in Autocad. Here's what I'd like to do.
> >
> > Say I have 3 groups of blocks(.dwg files)
> > Group 1: 1a.dwg, 1b.dwg
> > Group 2: 2a.dwg, 2b.dwg
> > Group 3: 3a.dwg, 3b.dwg
> >
> > I want to have a dialog box that I can select 1 block from each group
and
> > have it insert all of them at 0,0 and 1:1 scale. I have the dialog box
> but
> > can't figure out how to insert the blocks that I select.
> >
> > --
> > J_Toy
> >
> >
> >
>
>