クリップボードからVBの配列にコピー

Question

私はここで分割機能を使用しようとしています。クリップボードからコンテンツを取得して配列に格納しようとしていて、配列から取得したものを件名に取り込みます。しかし、私は常に型の不一致のエラーを取得します。私はいくつかの助けに感謝します。 Dim varArray() as String

にここに私のコードだ

Dim DataObj As MsForms.DataObject 
Set DataObj = New MsForms.DataObject 
Dim varArray() As Variant 
Dim myString As String 


'Get data from the clipboard. 
DataObj.GetFromClipboard 

'Get clipboard contents 
myString = DataObj.GetText 
varArray() = Split(myString, Chr(10)) 

With OutMail 
    .BodyFormat = 3 
    .To = "" 
    .CC = "" 
    .BCC = "" 
    .subject = varArray(0) & " - " & varArray(2) & " - " & varArray(4) 
    Set olInsp = .GetInspector 
    Set wdDoc = olInsp.WordEditor 
    Set oRng = wdDoc.Range 
    oRng.collapse 1 
    oRng.Paste 
    .Display 

End With 
On Error GoTo 0 

Answer 1

変更

Dim varArray() As Variantも、varArray = Split(myString, Chr(10))で結構です。