Jak automatizovat Excel z jazyka VBScript straně klienta

Souhrn

Tento článek popisuje Microsoft Visual Basic Scripting Edition (VBScript) klientský kód, který spustí a automatizuje aplikace Microsoft Office Excel nebo Microsoft Excel, když uživatel klepne na tlačítko na webové stránce.

Další informace

Ukázkový kód

  1. Vytvořte následující soubor HTML v libovolném textovém editoru a uložte soubor jako c:\excel.htm.
    <HTML><BODY>

    <INPUT id=button1 name=button1 type=button value=Button>

    <SCRIPT LANGUAGE="VBScript">

    sub button1_onclick()

    ' Launch Excel
    dim app
    set app = createobject("Excel.Application")

    ' Make it visible
    app.Visible = true

    ' Add a new workbook
    dim wb
    set wb = app.workbooks.add

    ' Fill array of values first...
    dim arr(19,9) ' Note: VBScript is zero-based
    for i = 1 to 20
    for j = 1 to 10
    arr(i-1,j-1) = i*j
    next
    next

    ' Declare a range object to hold our data
    dim rng
    set rng = wb.Activesheet.Range("A1").Resize(20,10)

    ' Now assign them all in one shot...
    rng.value = arr

    ' Add a new chart based on the data
    wb.Charts.Add
    wb.ActiveChart.ChartType = 70 'xl3dPieExploded
    wb.ActiveChart.SetSourceData rng, 2 ' xlColumns
    wb.ActiveChart.Location 2, "Sheet1" 'xlLocationAsObject

    ' Rotate it around...
    for i = 1 to 360 step 30
    wb.activechart.rotation = i
    next

    ' Give the user control of Excel
    app.UserControl = true

    end sub
    </SCRIPT>

    </BODY>
    </HTML>

  2. Spusťte aplikaci Internet Explorer zadejte c:\excel.htm v adresním řádku a stiskněte klávesu ENTER.
  3. Klepněte na tlačítko se zobrazí na stránce.

    Poznámka: Pokud se zobrazí výzva o ovládací prvek ActiveX na stránce upozornění zabezpečení, klepněte na tlačítko Ano.

Odkazy

Další informace získáte v následujícím článku znalostní báze Microsoft Knowledge Base:

195826 CreateObject nezdaří ze skriptů na straně klienta

Vlastnosti

ID článku: 198703 - Poslední kontrola: 8. 1. 2017 - Revize: 1

Váš názor