正在检查打开的文件 vb.net

Checking file open vb.net

我在 visual studio 2013 年创建了一个表单,用于将数据填充到 excel 文件中。加载表单后,文件对用户可见。

我的 excel 文件将由多个用户共享。问题是我的代码重写了其他人的数据。 如何刷新 excel 文件,以便所有计算机上的所有用户都能看到新所做的更改?

请帮忙。

编辑:我的代码:

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    workbook.ReadOnlyRecommended = True
    Dim row As Long
    Dim alpha As Long = 0
    row = 5
    With worksheet
        Do While .Cells(row, 4).value IsNot Nothing
            row = row + 1
        Loop

        .Cells(row, 2).value = Me.fname.Text
        .Cells(row, 3).value = Me.lname.Text
        Me.fullname.Text = Me.fname.Text + Me.lname.Text
        .Cells(row, 4).value = Me.fullname.Text

    End With
    xlapp.DisplayAlerts = False
    workbook.ReadOnlyRecommended = False

    If workbook.MultiUserEditing Then
        workbook.AcceptAllChanges()
        workbook.Save()
    End If

    workbook.SaveAs("\test.xlsx",AccessMode:=excel.XlSaveAsAccessMode.xlShared)
    workbook.Close()
    Call Form1_Load(sender, EventArgs.Empty)

End Sub

我的问题已通过以下方式解决:

If workbook.MultiUserEditing Then
        workbook.AcceptAllChanges()
        workbook.Save()
    End If