Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


22906 / 76732 ←次へ | 前へ→

【59198】ピボットテーブルでエラー
質問  enachin  - 08/12/2(火) 10:10 -

引用なし
パスワード
   ピボットテーブルのマクロでエラーになり、原因が分かりません。
エラー:実行時エラー'1004'
worksheetクラスのPivotTablesプロパティを取得できません。
エラー行は、PivotFields("定数")の行です。
よろしくお願いします。

  ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
    "Sheet1!R3C1:R" & Range("E65536").End(xlUp).Row & "C7").CreatePivotTable TableDestination:= _
    "'[Sampleデータ.xls]Sheet5'!R3C1", TableName:="ピボットテーブル1", DefaultVersion:= _
    xlPivotTableVersion10
  ActiveSheet.Cells(3, 1).Select
  With ActiveSheet.PivotTables("ピボットテーブル1").PivotFields("定数")
    .Orientation = xlRowField
    .Position = 1
  End With

Sampleデータ.Sheet1
  A     B   C   D   E   F
1
2 日付   規格A 規格B 規格C 規格D 定数
3 2008/12/2 abc  def  uuu  www  50
4 2008/12/2 kkk  djj  oui  swe  20
0 hits

【59198】ピボットテーブルでエラー enachin 08/12/2(火) 10:10 質問
【59206】Re:ピボットテーブルでエラー n 08/12/2(火) 13:10 発言
【59215】Re:ピボットテーブルでエラー enachin 08/12/2(火) 16:33 お礼

22906 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free