是否能EXCEL那样拖动数据？

收藏

版主：
你好！
请问是否能像excel那样选定某些内容，进行拖动数据达到移动功能？例如：选定了A1：A10内容，将这些数据拖动到C1：C10单元格去?

谢谢

iceman · iceman

回复 1楼atrm的帖子

Spread for ActiveX 8.0 支持，需要设置 AllowDragDrop 属性为 True。

atrm · atrm

能否提供给一段代码？我按你方法，不成功，谢谢

atrm · atrm

我知道怎样做了，但是鼠标形状是否能改变为十字形状？

iceman · iceman

回复 4楼atrm的帖子

当拖拽单元格时，可以触发 DragDropBlock 事件，通过 fpSpread1.CursorStyle = CursorStyleArrow
设置鼠标形状。

atrm · atrm

谢谢，是否能锁定某列数据不能拖动？

iceman · iceman

回复 6楼atrm的帖子

例如希望使第一列不能移动，可以使用fpSpread1_DragDropBlock进行判断，实现代码：

Private Sub fpSpread1_DragDropBlock(ByVal Col As Long, ByVal Row As Long, ByVal Col2 As Long, ByVal Row2 As Long, ByVal NewCol As Long, ByVal NewRow As Long, ByVal NewCol2 As Long, ByVal NewRow2 As Long, ByVal Overwrite As Boolean, Action As Integer, DataOnly As Boolean, Cancel As Boolean)
If Col = 1 Then
Cancel = True
End If
End Sub

复制代码

为了能为您提供更好的服务，请对本次服务做出评价。谢谢

atrm · atrm

回复 4楼atrm的帖子

当拖拽单元格时，可以触发 DragDropBlock 事件，通过 fpSpread1.CursorStyle = Cursor
iceman 发表于 2014-7-10 19:02:00

谢谢，我没解析清楚，如果我选定了要拖动区域，然后在鼠标移出该区域的时候，鼠标形状是十字

iceman · iceman

回复 8楼atrm的帖子

抱歉，这个用例当前 Spread for ActiveX 版本还实现不了。

		自动登录	找回密码
密码			立即注册

[已处理] 是否能EXCEL那样拖动数据？