2016-11-02 4 views
0

データの束をシートにインポートして、テーブルにしたいのですが。私はそこにどれだけのデータ列があるのか​​分かりません。このコードは数日前に正しく動作していましたが、何かを無意識に変更した可能性があります。ここでは、コードです:「テーブルのためのワークシートのデータが表と同じシート上にある必要があり、」VBA Excelでテーブルを作成する際にエラーが発生する

Sheets("Enrollment Data Aggregate").ListObjects.Add(xlSrcRange, Range([A1].End(xlDown), "$n$1"), , xlYes).Name = "EDA_Table" 

私が言うエラーメッセージを取得しています私が知る限り、私はデータがある場所と同じページにテーブルを作っています。助言がありますか?

+0

ちょうど親切なヒント、[How-To-Ask Guide](https://stackoverflow.com/help/how-to-ask)を読むことができます。あなたの質問が容易に答えることができ、できるだけ明確であることを確認してください。あなたが抱えている問題を修正するためにあなたがした努力と、それらの修正を試みたときに何が起こったのかを必ず含めてください。ショーコードとエラーメッセージも忘れないでください! –

答えて

1

範囲オブジェクトを宣言して、そのプロパティにアクセスできるようにする必要があります。

Dim wks As Worksheet 
Set wks = ThisWorkbook.Sheets("Enrollment Data Aggregate") 
Dim rng As Range 
Set rng = wks.Range([A1].End(xlDown), "$n$1") 
wks.ListObjects.Add(xlSrcRange, rng, , xlYes).Name = "EDA_Table" 
+0

これで私にエラーが表示され、4行目が強調表示されます。 "オブジェクト '_Worksheet'のメソッド '範囲'に失敗しました。 – Lui

+0

最新版をお探しですか?ページを更新してもう一度お試しください:-) – Niclas

+0

すべて動作しています!ありがとうございました!私も見て、私は物事を台無しにしているかもしれない名前付きの範囲を持っていたことを知った。私は確信していませんが、私はそれを削除する必要はありませんでした。私は再びマクロを実行し、すべてが機能しました。ありがとうございました!何らかの理由で私はあなたの答えを受け入れることができません。エラーが発生したというボックスが表示されます。私は評判の点と関係があると思いますか? – Lui

関連する問題