GetInsertKey – Get the current state of the Insert key
Private Declare Function GetKeyState Lib “user32” (ByVal nVirtKey As Long) As _ Long’ Get the current state of the Insert keyFunction GetInsertKey() As Boolean GetInsertKey = GetKeyState(vbKeyInsert)End Function