Volání maker aplikace Microsoft Excel, která přijímají parametry

Souhrn

Pomocí automatizace můžete pracovat s Microsoft Excelem. Je možné volat procedury maker, které jsou uloženy v sešitech aplikace Microsoft Excel pomocí metody Spustit objektu aplikace Microsoft Excel. Procedury maker Microsoft Excelu, které přijímají parametry, způsobují mírnou změnu syntaxe. Níže je uvedená ukázka kódu, která ukazuje, jak volat proceduru makra Aplikace Microsoft Excel z jazyka Visual Basic.

Další informace

Podrobný příklad

  1. Spusťte nový projekt v jazyce Visual Basic. Formulář1 je ve výchozím nastavení vytvořen.

  2. Umístěte commandButton na Form1.

  3. V části Obecné deklarace formuláře Form1 zadejte tento kód:

          Option Explicit
    
    Private Sub Command1_Click()
           Dim oExcelApp As Object
    
    ' Create a reference to the currently running excel application
           Set oExcelApp = GetObject(, "Excel.application")
           ' Make the Excel Application Visible.
           oExcelApp.Visible = True
           ' Run the excel procedure
           oExcelApp.run "proc", "David", 30
          End Sub
    
  4. Spusťte službu Microsoft Update. Kniha1 je ve výchozím nastavení vytvořena.

  5. Přidejte do sešitu nový modul.

    Pro Excel 5.0 a 7.0: V nabídce Vložit zvolte Makro a vyberte možnost Modul. Získáte tak nový list modulu Module1.

    Excel 97 a novější: Stisknutím kombinace kláves ALT+F11 spusťte Editor jazyka Visual Basic. V nabídce Vložit klikněte na Modul.

  6. V modulu 1 zadejte následující kód:

    Sub Proc(sParam1 As String, iParam2 As Integer)
            MsgBox sParam1 & " is " & iParam2 & " Years Old"
          End Sub
    
  7. Nechte sešit otevřený v Microsoft Excelu a přepněte do projektu v jazyce Visual Basic.

  8. V jazyce Visual Basic spusťte projekt stisknutím klávesy F5. Klikněte na příkazové tlačítko a mělo by se zobrazit dialogové okno s textem David je 30 let starý.

Odkazy

Další informace o automatizaci Excelu pomocí jazyka Visual Basic najdete v následujících tématech:

219151 Automatizace aplikace Microsoft Excel z jazyka Visual Basic