Alignment
 

Can anyone help?


Code please to align wording in a cell such as:

For c = 1 to 1000
If cell Ec is greater than 0 the wording in cell Cc is aligned right,
other wise wording in cell Cc is aligned left.

Thanks in advance

Ed English

Alignment
 

One way:

Dim c As Long
For c = 1 To 1000
Cells(c, 3).HorizontalAlignment = _
IIf(Cells(c, 5).Value 0, xlRight, xlLeft)
Next c



,
ED wrote:

Can anyone help?


Code please to align wording in a cell such as:

For c = 1 to 1000
If cell Ec is greater than 0 the wording in cell Cc is aligned right,
other wise wording in cell Cc is aligned left.

Thanks in advance

Ed English

Alignment
 

Works well.

Thank you,

Ed English


On Mon, 15 Aug 2005 15:50:18 -0600, JE McGimpsey
wrote:

One way:

Dim c As Long
For c = 1 To 1000
Cells(c, 3).HorizontalAlignment = _
IIf(Cells(c, 5).Value 0, xlRight, xlLeft)
Next c



,
ED wrote:

Can anyone help?


Code please to align wording in a cell such as:

For c = 1 to 1000
If cell Ec is greater than 0 the wording in cell Cc is aligned right,
other wise wording in cell Cc is aligned left.

Thanks in advance

Ed English