选择行颜色改变的问题

收藏

我用VB设置了如下代码
在leaverow事件里
if row<>newrow then
If Cancel = False Then
VSP.Col = -1
VSP.Row = Row
VSP.BackColor = 16777215
VSP.Row = NewRow
VSP.BackColor = &H80000013
End If
end if
我希望突出显示焦点所在的行
现在效果是出来了，但是当焦点行中有合并的单元格时，合并的单元格只有一半变色，而且焦点离开后，变色部分不会变回来，但是二次选中该行再离开，又可以变回白色，这是为什么？
变一半无所谓，但是我希望离开时合并的单元格的颜色可以立刻变回来。

顺便问一下，数字型单元格的value和text可以不同吗？能不能实现text为空时，value可以赋上0值？

danlan · danlan

合并单元格是通过设置.ColMerge = MergeAlways属性实现的

iceman · iceman

danlan 你好，
1.不好意思，我没有重现你的问题，下面是我的代码，请对比：

Private Sub Form_Load()
fpSpread1.OperationMode = OperationModeRow
fpSpread1.Col = 1
fpSpread1.ColMerge = MergeAlways
End Sub
Private Sub fpSpread1_LeaveRow(ByVal Row As Long, ByVal RowWasLast As Boolean, ByVal RowChanged As Boolean, ByVal AllCellsHaveData As Boolean, ByVal NewRow As Long, ByVal NewRowIsLast As Long, Cancel As Boolean)
If Row <> NewRow Then
If Cancel = False Then
fpSpread1.Col = -1
fpSpread1.Row = Row
fpSpread1.BackColor = RGB(255, 255, 255)
fpSpread1.Row = NewRow
fpSpread1.BackColor = RGB(255, 10, 111)
End If
End If
End Sub

复制代码

如果仍然有疑问，请发 Demo 论坛调试，感谢你的配合~:-D

2.不好意思， Case 2 无法实现。

danlan · danlan

呃，这个问题不是每一次都出现的，有的时候效果很正常，有的时候就会留下修改过的颜色，
或许你不断点击有合并的行再点击没有合并的行交替，可以重现这个问题
一般当点击带有合并了得单元格的时候
比如第一行第一列和第二行第一列的单元格合并了，点击第一行某单元格，那么合并的单元格和第一行整个变色，离开这个行时，这个单元格只有上半部分和整行变色，下半部分还是选中时的颜色，当点击第二行时合并的单元格会出现有时下半部分变色，有时候不变色，当变色时，焦点离开这行，有时候变回来，有时候保持
这个状况比较诡异，所以我想问问是不是有解决的办法
我认为这个可能是合并单元格时，因为最上面的单元格覆盖了下面的单元格导致的，但是就是不知道为什么有时候覆盖，有时候还能显现覆盖下面的颜色
至于demo，我整个程序对颜色的修改就只有发上来的这部分，没有其他的了
或者版主可以给我意见还有什么设置可能会导致这种问题，我自己去查一查……
-----------------------------------------------------------------
我好像不能上传附件，所以没办法把出错后的样图发上来
因为我合并的只有第一列，所以也可以选择除第一列以外的整行有焦点时变色，请问有没有什么方便的设置方法，还是只能一个单元格一个单元格的设置过去？

danlan · danlan

试试看能不能贴上来
----------------------------
成功了~
就是让那残留的一小块蓝颜色消失掉啊~他为什么会留在那OTL

iceman · iceman

感谢楼主把解决方案反馈给我们~

danlan · danlan

NO!亲，我这不是解决方案啊，我只是提出了这个问题可能出在哪里而已，他没有解决！
我想问难道只要我设置自动合并他就一定要出这个问题吗？为什么？
这应该算你们软件的问题？我这边程序的问题？VB兼容性的问题？还是其他的问题啊？囧

iceman · iceman

danlan 你好，
下面是我的测试 Demo ，楼主可以和有问题的工程进行对比。

demo.rar (735 Bytes, 下载次数: 281)

danlan · danlan

呃，我用的是7.0版本，版主的DEMO加载不能，而且他提示我说没有FORM3

iceman · iceman

danlan 你好，
问题正在处理中，明天回复。

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

[已处理] 选择行颜色改变的问题

12 个回复

回复 2# danlan 的帖子

回复 5# danlan 的帖子

回复 9# danlan 的帖子

浏览过的版块

活字格认证

微信认证勋章

元老葡萄