Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17


msflexgrid - Merging header cells without losing selection hightlight

Posted on 2001-08-30
Medium Priority
Last Modified: 2008-03-10
I need to find a way if possible to merge cells strictly in the fixed header rows (which I have done). But not lose the selection highlight. I still want to be able to multselect cells.

Here is a quote from documentation msflexgrid - merge cells:

"When MergeCells is set to a value other than 0 (Never), selection highlighting is automatically turned off. This is done to speed up repainting, and because selection of ranges containing merged cells may lead to unexpected results."

I understand their reasons, but I am only merging cells in the fixed column headers.

Or is there a better way to label columns/rows where the text can span more then one column and/or row within the header?

Wish msflexgrid had a CellAlignment - "across cells..."

I know there are 3rd party grids with this ability, but trying to avoid 3rd party controls if possible.

Currently use formula ones grid and it works ok. But becoming expensive to keep upgrading.

Question by:RPWard
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 3
  • 2
  • +1

Expert Comment

ID: 6441272
i dont understand..could u copy paste your code?

Author Comment

ID: 6441319
I have a grid with 13 columns. Two rows are fixed (headers). I want text to span more then one column in the first row (for example). I used the mergecells options to accomplish this. However, using the mergecells options - I lose the ability to multi-select cells within the grid (for cutting and pasting or whatever).

Question is, is there a better way to label headers across columns? Or is there a way to keep selection highlighting on, doing it the way I am doing it?

Accepted Solution

BlaZer earned 800 total points
ID: 6441382 could make a Fake selection by just changing the backcolor in the cells.....

a little something like this

Dim LastSelectedRow As Long
Dim LastSelectedCol As Long

Private Sub MSFlexGrid1_Click()
If LastSelectedRow <> 0 Then
For x = LastSelectedRow To MSFlexGrid1.Row
For y = LastSelectedCol To MSFlexGrid1.Col
MSFlexGrid1.Row = x
MSFlexGrid1.Col = y
MSFlexGrid1.CellBackColor = RGB(0, 0, 255)
End If
LastSelectedRow = MSFlexGrid1.Row
LastSelectedCol = MSFlexGrid1.Col

End Sub

would somethin like that be usefull?
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!


Expert Comment

ID: 6441508
use this for the columns u need to merge
MSFlexGrid1.MergeCol(1) = True
LVL 38

Expert Comment

ID: 6441656
I would have suggested exactly what Blazer has suggested. :)

Author Comment

ID: 6441861
Kuppachi - Thanks, but I have the merge figured out. Trying to figure a way to have selection highlighting on.

Blazer - This may help, need to check it out - Thanks.
LVL 38

Expert Comment

ID: 6441975
Unfortunately, I was never able to get it working properly.  I ended up turning off the merge, because it was more important for me to have the selection working properly than the merged cells look.  While this works ok for row headers (leaving a blank row header instead of repeating it) it doesn't look very good for column headers and I also wish the flexgrid had alignment across cells.

I've never used the Hierarchical Flexgrid, does it have the same limitations?  As far as third party goes, we have FarPoint Spread here, and it is good, but it is often too complex for the simple grid work that I need.

Author Comment

ID: 6441986
PaulHews, I have tried both msflexgrid and mshflexgrid - same limitations. I am going to give Blazer's suggestion a try. See what happens.

Author Comment

ID: 6444570
Thanks BlaZer, your answer pushed me in the right direction. Seems like it's going to work. Thanks again.

Expert Comment

ID: 6448839
no problem....glad to help :=

Featured Post

Enroll in September's Course of the Month

This month’s featured course covers 16 hours of training in installation, management, and deployment of VMware vSphere virtualization environments. It's free for Premium Members, Team Accounts, and Qualified Experts!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…
Suggested Courses

705 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question