割り当てワークシートの範囲Iが割り当てられ、以下の値を持つ文字列変数を持つ文字列に変数

Question

を使用して：

Answer = ""M3:AM3""

私は次のように範囲に、この変数を割り当てる：

DIM xlRange As Excel.Range 
Set xlRange = xlApp.Sheets("Sheet1").Range(Answer) 

このエラーを生成し、「アプリケーション定義またはオブジェクト定義エラー」が

Iはまた、範囲およびgの変数を使用して値を貼り付けるために、次の試み同じエラーです：

xlApp.Sheets("Sheet1").Range(Answer).PasteSpecial xlPasteAll 

誰かがこの問題を解決するのに手伝ってください。おかげさまで

Answer 1

私はあなたのエラーが定義されていないxlApp、だと思う：

DIM xlApp as Excel.Application 

あなたはすでにそれが定義されていた場合は、その後、問題はVBAには何も意味しない二重引用符、です。 xlApp後

xlApp.Sheets("Sheet1").Range(Answer) 

ワークブックではなくワークシートを定義する必要があります。また、あなたは階層別の問題を抱えています。

Answer="M3:AM3" 

はあなたが書くことができます：あなたはあまりにも

はそうと仮定すると、シート1のワークブックを与える必要が

Set xlApp = Application 
Set xlRange = xlApp.ActiveWorkbook.Sheets("Sheet1").Range(Answer) 

あなたが特定のためのワークブックの名前を知っている場合は、交換することができますブック付きActiveWorkbook（ "MyWorkbookName"）。