formatting question

ricksimm

Board Regular
Joined
Apr 28, 2005
Messages
188
I use the following code to build a two column array with dollar amounts in the first column and part description in the second column and then display the list.
Code:
                        i = 1
                        With Sheets("Main").Range("LBstart")
                                For Each c In Sheets("Main").Range(clientPPT, Sheets("Main").Range(clientPPT).End(xlDown))
                                        .Cells(i, 1) = c.Offset(0, 1).Value
                                        .Cells(i, 2) = c.Value
                                        i = i + 1
                                Next c
                        End With
                        With DetailsListBox
                                .ColumnCount = 2
                                .ColumnWidths = "44pt;200pt"
                                .List = Sheets("Main").Range("LBstart", Sheets("Main").Range("LBstart"). _
                                        Offset(65536 - Range("LBstart").Row, 1).End(xlUp)).Value
                                For i = 0 To .ListCount - 1
                                        .List(i) = Format(.List(i), "#,###.00")
                                Next
                       End With
When the list displays the dollar amounts are not right justified in the first list column. Can someone tell me how to make the dollar amounts right justify? Thanks.
 

Excel Facts

Back into an answer in Excel
Use Data, What-If Analysis, Goal Seek to find the correct input cell value to reach a desired result

Norie

Well-known Member
Joined
Apr 28, 2004
Messages
76,304
Office Version
  1. 365
Platform
  1. Windows
rick

What exactly do you mean the amounts aren't right justified?
 

ricksimm

Board Regular
Joined
Apr 28, 2005
Messages
188
column displays-
20.00
125.00
3.00
instead of all amounts being right-justified with all the decimal points lining up vertically.
 

Richard Schollar

MrExcel MVP
Joined
Apr 19, 2005
Messages
23,707

ADVERTISEMENT

Hi Rick

Have you tried explicitly right-justifying the relevant cells? eg:

Code:
Range(Whatever).HorizontalAlignment = xlRight

Richard
 

Norie

Well-known Member
Joined
Apr 28, 2004
Messages
76,304
Office Version
  1. 365
Platform
  1. Windows
rick

I don't think this is possible without padding out the values with spaces.

And even then you might not get the required look, depending on what font you are using.
 

ricksimm

Board Regular
Joined
Apr 28, 2005
Messages
188

ADVERTISEMENT

I think you are right. If I change from "###.00" to "000.00" they line up correctly but i get a list like -

125.00
025.00
175.00

This is not exactly the way to do things. It seems that Excel could surely handle this but it doesn't look as if it can. Any other suggestions?
 

pgc01

MrExcel MVP
Joined
Apr 25, 2006
Messages
19,884
Hi Rick

Please try:

"???.00"

? is like # but leaves the space.

Hope this helps
PGC
 

ricksimm

Board Regular
Joined
Apr 28, 2005
Messages
188
That gave me -

???125.00
???25.00
???175.00

Thanks for your suggestion.
 

pgc01

MrExcel MVP
Joined
Apr 25, 2006
Messages
19,884
Hi again

The ? as format is not to be used in the format function in vba. You have to use it in the custom number format of the cell.

By the way, why don't you just right-align the cells as Richard proposes?

HTH
PGC
 

Forum statistics

Threads
1,141,756
Messages
5,708,329
Members
421,565
Latest member
Lastadiego

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top