テキストはテキストがVBAで長すぎる場合はユーザーフォームのラベルの説明でトリプルドットを追加

Question

エクセルたとえば

エクセルVBAで長すぎる場合、私は、ID、名前、電話としてユーザーフォームで5つのラベルを持っていますユーザーフォームでのトリプルドットを追加しますいいえ、アドレスと電子メールID、学生の詳細の各セルのテキストサイズが10文字を超えている場合は、最後に3ドットを表示する必要があります。 名：ABCDEFGHIJ ... 住所：あなたは完全な言葉を返すようにしたい場合を除き、ABC通り、デフコロニー...

は、VBAのユーザーフォームのコードを作成するために私を助けては、簡単な関数が何をすべき

Answer 1

を優れています。

Public Function TrimText(Value As String) 
    TrimText = IIf(Len(Value) > 10, Left(Value, 10) & "...", Value) 
End Function 

それを呼び出すには：

TrimText("abcdefghijklmnopq") 
'abcdefghij...