Excel Select Case with HorizontalAlignment
 

I'm trying to use Select Case to determine if a cell's text is aligned
to the right or the left and check that the cell is not empty ... and
am having no luck.

Can someone suggest a code fragment

thanks


Derrick

Excel Select Case with HorizontalAlignment
 

Derrick:

You can use this code to see if the text in cell A1 is left, right or
center aligned
Private Sub CommandButton1_Click()

Select Case Worksheets(1).Range("A1").HorizontalAlignment

Case xlRight
MsgBox "right"
Case xlLeft
MsgBox "left"
Case xlCenter
MsgBox "center"

End Select

End Sub

HTH
-Satish

Derrick Salmon wrote:
I'm trying to use Select Case to determine if a cell's text is aligned
to the right or the left and check that the cell is not empty ... and
am having no luck.

Can someone suggest a code fragment

thanks


Derrick