connect two shape objects

layla · External Since: Sep 26, 2009 Posts: 4

Hi,
what code do we use if we want to connect to shape objects.i.e. connect
(shape1,shape2)

AlEdlund · External Since: Feb 17, 2009 Posts: 29

It's all in the visio sdk. There are also numerous examples over on Chris
Roth's site (www.visguy.com)
al

"layla" <princess.layla2.TakeThisOut@gmail.com> wrote in message
news:ac999df6-844f-49a2-803d-c21b732e7dd6@j9g2000vbp.googlegroups.com...
> Hi,
> what code do we use if we want to connect to shape objects.i.e. connect
> (shape1,shape2)

layla · External Since: Sep 26, 2009 Posts: 4

Hi,
I looked at the stuff ,but still I do not know how to connect a line.I
guess the links is useful for someone who try to draw them manulally
not for VBA. Any suggestion how I could write such a code
Thanks!

AlEdlund · External Since: Feb 17, 2009 Posts: 29

try this
http://msdn.microsoft.com/en-us/library/aa201778(office.10).aspx
al

"layla" <princess.layla2.DeleteThis@gmail.com> wrote in message
news:c6f8c7b3-e43f-4cd1-92e6-e3a09fef2618@k41g2000vbt.googlegroups.com...
> Hi,
> I looked at the stuff ,but still I do not know how to connect a line.I
> guess the links is useful for someone who try to draw them manulally
> not for VBA. Any suggestion how I could write such a code
> Thanks!

layla · External Since: Sep 26, 2009 Posts: 4

On Oct 2, 12:13 pm, "AlEdlund" <edl....DeleteThis@ameritech.net> wrote:
> try thishttp://msdn.microsoft.com/en-us/library/aa201778(office.10).aspx
> al
>
> "layla" <princess.lay....DeleteThis@gmail.com> wrote in message
>
> news:c6f8c7b3-e43f-4cd1-92e6-e3a09fef2618@k41g2000vbt.googlegroups.com...
>
>
>
> > Hi,
> > I looked at the stuff ,but still I do not know how to connect a line.I
> > guess the links is useful for someone who try to draw them manulally
> > not for VBA. Any suggestion how I could write such a code
> > Thanks!- Hide quoted text -
>
> - Show quoted text -

Hi,again,
I wrote this code to connect two shapes ,but I keep gettiing error
messages ,do you see what I am doing wrong
Set celObj1 = ashp(1).Cells(" AlignBottom")
Set celObj2 = ashp(2).Cells(" AlignTop")
celObj1.GlueTo celObj2

Thanks!

layla · External Since: Sep 26, 2009 Posts: 4

On Oct 7, 10:09 am, "David J Parker [MVP Visio]" <dav... DeleteThis @bvisual.net>
wrote:
> I don't think you can glue two Alignment cells together like that
> The Alignment section is transient.
>
> "layla" <princess.lay... DeleteThis @gmail.com> wrote in message
>
> news:3c55e106-24cb-47d3-853b-34d308b23b7a@o13g2000vbl.googlegroups.com...
>
>
>
> > On Oct 2, 12:13 pm, "AlEdlund" <edl... DeleteThis @ameritech.net> wrote:
> >> try thishttp://msdn.microsoft.com/en-us/library/aa201778(office.10).aspx
> >> al
>
> >> "layla" <princess.lay... DeleteThis @gmail.com> wrote in message
>
> >>news:c6f8c7b3-e43f-4cd1-92e6-e3a09fef2618@k41g2000vbt.googlegroups.com....
>
> >> > Hi,
> >> > I looked at the stuff ,but still I do not know how to connect a line..I
> >> > guess the links is useful for someone who try to draw them manulally
> >> > not for VBA. Any suggestion how I could write such a code
> >> > Thanks!- Hide quoted text -
>
> >> - Show quoted text -
>
> > Hi,again,
> > I wrote this code to connect two shapes ,but I keep gettiing error
> > messages ,do you see what I am doing wrong
> > Set celObj1 = ashp(1).Cells(" AlignBottom")
> > Set celObj2 = ashp(2).Cells(" AlignTop")
> > celObj1.GlueTo celObj2
>
> > Thanks!- Hide quoted text -
>
> - Show quoted text -

Hi,
The error message is" inappropriate source object"

AlEdlund · External Since: Feb 17, 2009 Posts: 29

The cells that you attach to should eventually point to a place on a page.
You might check this out...

http://msdn.microsoft.com/en-us/library/ms367543.aspx

al

"layla" <princess.layla2.RemoveThis@gmail.com> wrote in message
news:36dc7f0e-7aa2-4ea5-9d92-a51e077f5627@b18g2000vbl.googlegroups.com...
> On Oct 7, 10:09 am, "David J Parker [MVP Visio]" <dav....RemoveThis@bvisual.net>
> wrote:
>> I don't think you can glue two Alignment cells together like that
>> The Alignment section is transient.
>>
>> "layla" <princess.lay....RemoveThis@gmail.com> wrote in message
>>
>> news:3c55e106-24cb-47d3-853b-34d308b23b7a@o13g2000vbl.googlegroups.com...
>>
>>
>>
>> > On Oct 2, 12:13 pm, "AlEdlund" <edl....RemoveThis@ameritech.net> wrote:
>> >> try
>> >> thishttp://msdn.microsoft.com/en-us/library/aa201778(office.10).aspx
>> >> al
>>
>> >> "layla" <princess.lay....RemoveThis@gmail.com> wrote in message
>>
>> >>news:c6f8c7b3-e43f-4cd1-92e6-e3a09fef2618@k41g2000vbt.googlegroups.com...
>>
>> >> > Hi,
>> >> > I looked at the stuff ,but still I do not know how to connect a
>> >> > line.I
>> >> > guess the links is useful for someone who try to draw them manulally
>> >> > not for VBA. Any suggestion how I could write such a code
>> >> > Thanks!- Hide quoted text -
>>
>> >> - Show quoted text -
>>
>> > Hi,again,
>> > I wrote this code to connect two shapes ,but I keep gettiing error
>> > messages ,do you see what I am doing wrong
>> > Set celObj1 = ashp(1).Cells(" AlignBottom")
>> > Set celObj2 = ashp(2).Cells(" AlignTop")
>> > celObj1.GlueTo celObj2
>>
>> > Thanks!- Hide quoted text -
>>
>> - Show quoted text -
>
> Hi,
> The error message is" inappropriate source object"