SpreadForWin 追加删除行后显示固定行
Public Sub InsertRow2(AnySs As vaSpread, ByVal Row&)
AnySs.MaxRows = 6
AnySs.Row = Row
AnySs.Action = SS_ACTION_INSERT_ROW '行を挿入する。
End Sub
Public Sub DeleteRow2(AnySs As vaSpread, ByVal Row&)
AnySs.Row = Row
AnySs.Action = SS_ACTION_DELETE_ROW '行を削除する。
AnySs.MaxRows = 6
End Sub
![]() | 本作品采用 知识共享署名-非商业性使用 2.5 中国大陆许可协议进行许可。 |