2016-11-10 83 views
0

我有一个在Visual Studio 2013中创建的窗口应用程序窗体。我需要从窗体输入数据到excel工作表,直到用户关闭窗体。该工作簿将由多个用户同时共享。此外,我不希望他们看到工作簿,除非他们打开它。工作簿共享vb.net

我该怎么做?

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 
    xlWorkBook = xlApp.Workbooks.Open("C:\1.xlsx") 
    xlWorkSheet = xlWorkBook.Sheets("Sheet1") 
    Dim iRow As Long 
    Dim alpha As Long = 0 
    iRow = 5 
    With xlWorkSheet 
     Do While .Cells(iRow, 2).value <> "" 
      iRow = iRow + 1 
     Loop 

     .Cells(iRow, 2).Value = t1.Text 
     .Cells(iRow, 3).Value = t2.Text 
     .Cells(iRow, 5).Value = t3.Text 
    End With 
    xlApp.DisplayAlerts = False 
    xlWorkBook.Save() 
End Sub 

回答