Results 1 to 2 of 2

Thread: Listing names within a table

  1. #1

    Thread Starter
    Lively Member
    Join Date
    Mar 2006
    Posts
    74

    Listing names within a table

    I have a macro that places people in a list on a grid by their capability rating and their result rating. the macro determines where they belong on the grid and thne places their name in the appropriate cell along with anyone else who belongs in that part of the grid.

    After deciding what cell on the grid the person's name belongs in , I want to bold that ONE person's name AND somehow be able to click the person's name and have it go back to the person's name and record in the original record list(problem is i don't think you can link individual names within one cell).

    Here is the code I am working with:
    VB Code:
    1. 'If this is the first employee being added
    2.                             'don't insert a comma before the name...
    3.                             If .Value = "" Then
    4.                                 .Value = saEmployee(1, lRecordNum)
    5.                               '(1, lRecordNum) is the name of the employee
    6.                             Else
    7.                                 '... otherwise append the employee to the
    8.                                 'list
    9.                                 .Value = .Value & Chr(10) & saEmployee(1, lRecordNum)
    10.                             End If


    After it is done listing the names, I have it resize the rows so it looks good. Problem here is that if someone has more than about 30 people in one cell, the row height is too large and you can't see some of the people's names. Here is the code and does anyone have any suggestions on getting around this? Is there any way to increase the max row height?

    VB Code:
    1. 'now go back and autofit all the rows, and then re-size them based on a standard and add two to the ones above the standard
    2.     rngGrid.Rows.AutoFit
    3.     For Each rngCell In rngGrid.Columns(1).Cells
    4.         If rngCell.RowHeight < 60 Then
    5.             rngCell.RowHeight = 60
    6.         Else
    7.             rngCell.RowHeight = rngCell.RowHeight + 2
    8.         End If

  2. #2

    Thread Starter
    Lively Member
    Join Date
    Mar 2006
    Posts
    74

    Re: Listing names within a table

    I am just bumping my own message to see if there is anyone on the board today who might have a clue as to what I can do to fix this problem.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width