怎么设置全选？整个表格，谢谢

收藏

.OperationMode = OperationModeExtended

.SelectBlockOptions = SelectBlockOptionsRows

我想让表格全选中：.SetSelection 1, 1, .MaxCols, .MaxRows 为什么不行？怎么可以全选，谢谢

roger.wang · roger.wang

回复 1楼xjy2004的帖子

您用的是Spread Active那个版本？

请先参考一下如下代码：

fpSpread1.AllowMultiBlocks = True
fpSpread1.SetSelection 1, 1, 3, 1
fpSpread1.AddSelection 1, 3, 3, 3

复制代码

文档路径：ActiveX Reference > ActiveX Methods > SetSelection Method

xjy2004 · xjy2004

版本是7.0。
以下代码，似乎是有作用，但弹出的提示窗口显示，没有选中，界面上在第三行确有虚框（非选中状态）
With Grid1
  .AllowMultiBlocks = True
  .SetSelection 1, 3, .MaxCols, 3
'  .AddSelection 1, 4, .MaxCols, 4
  MsgBox .SelectionCount
End With

roger.wang · roger.wang

回复 3楼xjy2004的帖子

调整一下参数试试看。

如参考如下代码：

axfpSpread1.AllowMultiBlocks = true;
//开始默认无选择
MessageBox.Show(axfpSpread1.SelectionCount.ToString());
axfpSpread1.SetSelection(1, 1, axfpSpread1.MaxCols, axfpSpread1.MaxRows); //UI上实现选择
axfpSpread1.AddSelection(1, 1, axfpSpread1.MaxCols, axfpSpread1.MaxRows);
//选中了，个数为1
MessageBox.Show(axfpSpread1.SelectionCount.ToString());
//获得选择内容
object row = null, col = null, row1 = null, col1 = null;
axfpSpread1.GetSelection(0, ref col, ref row, ref col1, ref row1);

复制代码

xjy2004 · xjy2004

不要这句：.OperationMode = OperationModeExtended
就可以达到设置选区的目的，但是，这句不要，我就没办法让用户操作，鼠标拖选+按行选+不连续选的功能呀

roger.wang · roger.wang

回复 5楼xjy2004的帖子

能把您这个帖子要达成的需求描述一下一下，即需要做什么，不要做什么。
上面的问题，我理解的是您是要全选整个Sheet页面。

对OperationMode 的设置，有6种情况：

0 - Normal (Default) Performs default sheet operations OperationModeNormal
1 - Read Only Places sheet in read-only mode
(Within this mode, there is no current active cell.) OperationModeRead
2 - Row Mode Places sheet in row mode OperationModeRow
3 - Single Select Sets sheet to operate like a single-selection list box OperationModeSingle
4 - Multi Select Sets sheet to operate like a multiple-selection list box OperationModeMulti
5 - Extended Select Sets sheet to operate like an extended-selection list box OperationModeExtended

复制代码

参考文档路径：ActiveX Reference > ActiveX Properties > OperationMode Property

xjy2004 · xjy2004

先谢谢roger
我用的环境是VB6+fpspread7
需要达到的目标是：
表格按行选，只读，但要可以ctrl+点击实现不连续按行选，和鼠标拖动或shift实现连续（OperationMode 只能是5了）
现在需要一个整个表格全选的功能（正常您所说的），表格参数应该怎么设置？谢谢

roger.wang · roger.wang

回复 7楼xjy2004的帖子

周末晚上工作这么晚，辛苦辛苦 :g~ij:

您的需求分2类：
1 表格按行选择，只读
Ctrl 可实现不连续行选
Shift、鼠标可实现连续
2 全选功能

我试验的结果是，需要写2个函数实现，主要是配置2个属性：

'全选
axfpSpread1.OperationMode = OperationModeConstants.OperationModeNormal
axfpSpread1.SelectBlockOptions = SelectBlockOptionsConstants.SelectBlockOptionsRows
'非全选
axfpSpread1.OperationMode = OperationModeConstants.OperationModeExtended
axfpSpread1.SelectBlockOptions = SelectBlockOptionsConstants.SelectBlockOptionsRows

复制代码

xjy2004 · xjy2004

工作呀，没得办法，roger，感谢你多次辛苦回复！
终于解决了，谢谢

roger.wang · roger.wang

回复 9楼xjy2004的帖子

不客气，应该的。

也欢迎你有时间在论坛里面帮助解答问题，我们有精美礼品送出的

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

[已处理] 怎么设置全选？整个表格，谢谢

9 个回复

活字格认证

微信认证勋章

元老葡萄