VS2010 EXCEL2010 Addin 如何将Winform数据写入worksheet?

zhenghui2915

在VS2010中生成了一个 EXCEL2010 Addin项目，添加了一些控件，如图所示：

想要将Winform控件中的内容依次写入A1、A2、A3，请问如何操作？

wpxxsyzx

是这样？
功能区按钮代码：
Public Class Ribbon1

    Private Sub Ribbon1_Load(ByVal sender As System.Object, ByVal e As RibbonUIEventArgs) Handles MyBase.Load

    End Sub

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As Microsoft.Office.Tools.Ribbon.RibbonControlEventArgs) Handles Button1.Click
    Dim myf As New Form1
    myf.ShowDialog()
  End Sub
End Class
窗体：
Public Class Form1

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim mys As Excel.Worksheet
    mys = CType(Globals.ThisAddIn.Application.ActiveSheet, Global.Microsoft.Office.Interop.Excel.Worksheet)
    mys.Range("a1").Value = Me.TextBox1.Text
  End Sub
End Class

zhenghui2915

多谢分享，已经解决了问题，谢谢！