2016-11-10 1 views
0

У меня есть форма приложения для Windows, созданная в 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 

ответ

Смежные вопросы