Beste Forumlezers,
Ik ben een macro aan het maken, en alles gaat eigenlijk goed, alleen moet ik ergens de macro vanzelf de knop "ok" laten indrukken, ofwel laten "enteren". Kan dat?
Alvast bedankt,
Anton van Horen
vanhorentrash schreef:Ik ben een macro aan het maken, en alles gaat eigenlijk goed, alleen moet ik ergens de macro vanzelf de knop "ok" laten indrukken, ofwel laten "enteren". Kan dat?
sub webpagina_openen
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
dim strCellValue as string
dim objDoc as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
objDoc = ThisComponent
rem plakken zonder opmaak
dim args25(0) as new com.sun.star.beans.PropertyValue
args25(0).Name = "Format"
args25(0).Value = 1
dispatcher.executeDispatch(document, ".uno:PasteSpecial", "", 0, args25())
end sub
Gebruikers op dit forum: Geen geregistreerde gebruikers. en 0 gasten