Udføre handlinger i andet program

Fra VBA-editoren skal du gå i menuen Tools->References
Her skal du finde en reference som hedder noget i stil med "Microsoft Visio 2002 Object Library" og afkrydse den.

Herefter kan du, fra koden på din knap, lave noget kode, som ser ud a la dette:

Dim OVisio as New Visio.Application
OVisio.Activate
OVisio.dokuments.add
...
...
...


Jeg har ikke selv Visio 2002, så derfor kan jeg ikke give dig de nøjagtige kommandoer, men blot fortælle dig vejen frem ;)

VBA er jo så pragtfuldt, at når du f.eks. skriver OVisio. så dukker der en liste frem med tilgængelige kommandoer og egenskaber.

Det gælder også for den første linie - når du har skrevet:
Dim OVisio as New
...skulle Visio gerne komme frem på listen. Men måske hedder den noget andet (MSVisio f.eks.)

Prøv dig frem :o)

/Thomas

ØØhmmm.. Det besvarede vel egentlig mit spørgsmål... (delvist i hvert fald)
For jeg har absolut ingen ide om hvilke funktioner jeg skal vælge efter OVisio.???
Og du kan jo ikke rigtig hjælpe når du ikke har programmet?
Jeg kan dog fortælle dig at det hed "Microsoft Visio 2002 Type Library" - ikke object library.. Eller har jeg gjort noget forkert?

Det lyder helt rigtigt...

Ved du om man kan optage Makroer i Visio, som man kan i Excel og Word?
Hvis det er tilfældet, kan du optage alt hvad du gør manuelt og derefter kopiere koden over i Access.
Jeg kender desværre kun lidt til Visio 2000 og da kunde man ikke optage makroer...men det er muligt at de har fået lagt det ind i den nye version!?

Det er da et forsøg værd.. Det vil jeg undersøge..
Jeg kan se at jeg også kan åbne en VBA editor i Visio, men jeg ved ikke om jeg skal bruge den til noget?
Jeg leder straks efter en makrooptager..

Funktioner->Makroer->Indspil ny makro

Jeg kan kun vælge eksisterende makroer i "Visio add-ins" - jeg kan ikke få lov til at indspille mine egne!

øv....du kan ikke regne ud vhlke kommandoer, du skal bruge (du ved jo hvad du ønsker at gøre)

Jeg plejer at åbne Visio, åbne Organizational Chart Wizard, vælge datakilde, vælge data, vælge "Name", vælge "Reports to", vælge "Finish" - groft sagt.. Det er alle disse skridt jeg vil spare brugerne for, men det lader til at jeg ikke engang selv kan klare det?!?!
Jeg synes ikke at OVisio.-kommandoerne har nogle navne, der umiddelbart viser mig lyset?