Unlocks all cells on the server for the specified worksheet.
EssVUnlock(sheetName)
ByVal sheetName As Variant
Text name of worksheet to operate on. sheetName is of the form "[Book.xls]Sheet". If sheetName is Null or Empty, the active worksheet is used.
Returns 0 if successful. A negative number indicates a local failure (see VBA Return Values). A return value greater than zero indicates a failure on the server.
Declare Function EssVUnlock Lib "ESSEXCLN.XLL" (ByVal sheetName As Variant) As Long Sub UnlockData() X=EssVUnlock("[Book2.xls]Sheet1") If X = 0 Then MsgBox("Unlock successful.") Else MsgBox("Unlock failed.") End If End Sub
See EssVSendDatafor another example of EssVUnlock. |