Put a Line on the bottom of a group of cells

[jgoulart]

I have a routine that loops through a database and picks out data and puts it on another sheet in columns 1 to 5 in the same row. It pulls data from the database file from 1 to 17 records before moving to the next row (or record). I want to put a line on the bottom of the cell of the last record of the group in the columns 1 to 5. The data in these columns is not always filled. I'm unsure how to format the cells with line at the bottom of the cell. Does anyone have some good advice?

John

[NateO]

Yes sir, right-click on the cell, choose 'format cells...' Click on the 'Border' tab. Select your line weight on the right and click beneath the text. Then hit the ok button.

HTH. Cheers,
Nate

[NateO]

Ou, en vba monsieur:

With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThin
End With

Cheers, Nate