Cell auto filled with dots [Solved/Closed]

Report
Posts
34
Registration date
Monday March 10, 2014
Status
Member
Last seen
September 21, 2015
-
Posts
34
Registration date
Monday March 10, 2014
Status
Member
Last seen
September 21, 2015
-
Hello,
I sow it once but not sure where and can't work out how to do it.
Basically, if I write things in excel, I need it to be auto filled with dots so that no space is left in the cell. I hope it is clear, but please let me know otherwise. I know it can be done because I've seen it before but didn't take a note at the time regretfully. Much appreciated

3 replies

Posts
2675
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
November 5, 2020
448
Hi Jutulu,

You mean something like this?:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim MyWidth As Currency

MyWidth = Target.ColumnWidth

Target.EntireColumn.AutoFit

If Target.ColumnWidth >= MyWidth Then
    Target.ColumnWidth = MyWidth
    Exit Sub
End If

Do
    Target = Target & "."
    Target.EntireColumn.AutoFit
Loop Until Target.ColumnWidth = MyWidth

End Sub


Best regards,
Trowa
5
Thank you

A few words of thanks would be greatly appreciated. Add comment

CCM 2942 users have said thank you to us this month

Posts
34
Registration date
Monday March 10, 2014
Status
Member
Last seen
September 21, 2015
1
Hi Trowa,

I didn't want to use macros. However, there is a much easier way to do it. I sow it once and thought it was very cool, but never wrote it down and can't remember it. Thanks anyway. Hope can find the answer to it.
Posts
2675
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
November 5, 2020
448
OK Jutulu, I got it.

Go to cell properties > number tab > go to the manual input and type in "@*."

Enjoy.

Best regards,
Trowa
Posts
34
Registration date
Monday March 10, 2014
Status
Member
Last seen
September 21, 2015
1
Great! It was just that. Thank a lot. Only, you mean to go to custom option at the bottom, not number

Subscribe To Our Newsletter!

The Best of CCM in Your Inbox

Subscribe To Our Newsletter!