View Single Post
 
Old 04-16-2012, 10:48 PM
jolivanes jolivanes is offline Windows XP Office 2007
Advanced Beginner
 
Join Date: Sep 2011
Posts: 91
jolivanes will become famous soon enough
Default

You could try any of these.

Code:
Private Sub UserForm_Initialize()
TextBox1 = Range("B1").Value
TextBox2.Value = Format(Range("B1"), "$###.00")
TextBox3 = Sheets("Sheet1").Range("B1").Text
TextBox4.Value = Format(Range("B1"), "$###.##")
TextBox5.Value = Format(Range("B1"), "$0,000.00")
End Sub
Reply With Quote