Hi all,

Need a quick fix on this one;

Private Sub CommandButton2_Click()

Dim MyData As DataObject
Set MyData = New DataObject
MyData.GetFromClipboard
TextBox1.Text = MyData.GetText
End Sub

I only need the last 19 characters from the right displayed in textbox1. How
do I incorporate the right function in this procedure?

Regards

basta

Try

TextBox1.Text = Right(MyData.GetText, 19)

--
Jacob


"Basta1980" wrote:

Hi all,

Need a quick fix on this one;

Private Sub CommandButton2_Click()

Dim MyData As DataObject
Set MyData = New DataObject
MyData.GetFromClipboard
TextBox1.Text = MyData.GetText
End Sub

I only need the last 19 characters from the right displayed in textbox1. How
do I incorporate the right function in this procedure?

Regards

basta

Jacob,

Thanks (again)

"Jacob Skaria" wrote:

Try

TextBox1.Text = Right(MyData.GetText, 19)

--
Jacob


"Basta1980" wrote:

Hi all,

Need a quick fix on this one;

Private Sub CommandButton2_Click()

Dim MyData As DataObject
Set MyData = New DataObject
MyData.GetFromClipboard
TextBox1.Text = MyData.GetText
End Sub

I only need the last 19 characters from the right displayed in textbox1. How
do I incorporate the right function in this procedure?

Regards

basta