Convert numeric value to string made of characters representing the value

[sprocket87]

Hi all, this one is hard to describe, but basically I want to take a numeric value, then insert a character (text character or symbol, such as X) for each of the instances of that number.

For example: If B2 has a value of 7, I want C2 to show a visual representation of the numeric value (7) using X's. So C2 would show X X X X X X X

This is kind of like the opposite of LEN.

I'm sure it can be done with some kind of loop (for each number, insert character) but I have no idea how to do that.

Thanks

 

[shaowu459]

=rept("x",b2)

 

[nemmi69]

something like this?

Sub CellLetterText()
Const Letter = "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"


'Set C2 to 7 x's
Range("C2").Value = Left(Letter, 7)


End Sub

 

[sprocket87]

=rept("x",b2)

Holy cow, your reply was both so much faster and so much simpler than I expected. THANKS!!

 

[shaowu459]

glad to help