Open userform excel

Status
Niet open voor verdere reacties.
R

rudyV

Gebruiker
Lid geworden
25 feb 2019
Berichten
34
Geacht forum,

In een Word sjabloon is een excel worksheet geïntegreerd.
Graag wil ik bij het openen van dit sjabloon, dat excell wordt geactiveerd én het userform "menu" wordt geopend.
Mijn code (deels) tot dusver:
Code: 
Dim objOLE As OLEFormat
Dim objEXL As Excel.Workbook

Set objOLE = ActiveDocument.InlineShapes(1).OLEFormat
objOLE.Activate
Set objEXL = objOLE.Object
With objEXL.ActiveSheet
    Dim fName As String
    fName = "menu"
    Dim objForm As Object
    Set objForm = UserForms.Add(fName)
    objForm.Show
End With

Dit geeft de fout: "object vereist"
Graag uw hulp?

met vriendelijke groet,

Ruud.
 
Ik snap niet wat je wilt; een Excel formulier openen of een Word formulier openen?
 
Dank voor je reactie,
Wat ik wil is het volgende:
Als het Word sjabloon opent, het hierin 'embedded' excel workbook benaderen en het excel urenform1 opstarten.
Dit automatisch via document_new.

Met vriendelijke groet

Ruud.
 
En hoe heb je die Excel gekoppeld? Iets als: "LINK Excel.SheetMacroEnabled.12 "C:\\Desktop\\HelpMij\\Downloads\\Ledenkaartje.xlsm" "Stamkaart!R1K1:R9K6" \a \f 4 \h "? Want ik denk eerlijk gezegd niet dat je vanuit een gekoppeld werkblad hoeft te werken, of überhaupt kúnt werken. Het is al voldoende als je een Excel sessie opstart met VBA, en van daaruit het bestand + formulier opent. De koppeling staat er dan m.i. helemaal buiten. Hooguit dat je daar de link uithaalt.
 
Het excelbestand heb ik ingevoegd via Word-invoegen-object etc.
Als ik met de muis dubbelklik in de shape, wordt excel wakker en kan ik simpel het formulier openen. Vanuit het form bewerk ik dan het werkblad in de shape.
Het lijkt mij alleen fijn als dat formulier opent nadat Word opstart.
 
Hebben we het over hetzelfde soort formulier? Heb je dat met VBA gemaakt?
 
Ik heb een uitgekleed bestand bijgevoegd.
In het geopende document1 kan je op de cellen A1:F21 klikken om het excel formulier te openen.

Makkelijk zat, maar ik wil heel graag dat dit formulier opent als Word owrdt opgestart. Dus als ik het sjabloon open.

Vriendelijke groet,

Ruud.
 

Bijlagen

  • TestDocment1.zip
    30 KB · Weergaven: 57
Als ik je bestand open, zit er wel een embedded Excel blad in, maar dat is leeg. En als ik die dan open, gebeurt er uiteraard niet zoveel. Moet de Excel file er niet bij?
 
Als je klikt in het excel, ergens in een cel tussen a1 en f21, opent het excel userform.
Doet verder niks. Hoeft ook niet want het is helemaal gestript.
Waar ik naar op zoek ben, is de manier om bedoeld userform te laten openen als Word wordt geopend.

Als het Word dotm file nu wordt geopend, zie je ook dat excel wordt geactiveerd. Inderdaad gebeurt er verder niets. Voor het voorbeeld hoeft dat ook niet. Als je vervolgens naast de inline shape klikt, sluit excel weer, totdat je dubbelklikt in de shape, dan activeert excel weer.

Het excel file bijsluiten hoeft ook niet, want qua vba hoeft er niets te gebeuren in excel.
Het spannende (openen excel userform) moet gebeuren in Word (document_new)
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan