excel2007のマクロなのですが、データからグラフを作るときに、setsoursedataでデータ参照するときに、sheet1とsheet2からそれぞれデータを選択したいので、Unionを使ってそれぞれの範囲を結合しようとしたのですが、
worksheets("sheet1").Select
Set owarine = Range(Cells(st, 5), Cells(en, 5))
Worksheets("sheet2").Select
Set BB = Union(Range(Cells(st, 3), Cells(en, 3)), Range(Cells(st, 5), Cells(en, 6)))
Set sphere = Union(owarine, BB)
ActiveSheet.ChartObjects.Add(5, 18, 550, 250).Select
ActiveChart.ChartType = xlLineMarkers
ActiveChart.SetSourceData Source:=sphere, PlotBy:=xlColumns
としても、'Union'メソッドは失敗しました'_Global'オブジェクトと表示されてできません。どうすればいいのでしょうか?
No.1ベストアンサー
- 回答日時:
複数のシートの範囲をUinonで接続するのは無理です
ワーク用のシートにその2つの領域をコピーして
コピーした領域をCurrentRegionなどで取得しましょう
owarine.Copy Worksheets("Work").Range("A1")
BB.Copy WorkSheets("Work").Range("B1")
set sphere = Worksheets("Work").Range("A1").CurrentRegion
といった具合です
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
餃子を食べるとき、何をつけますか?
みんな大好き餃子。 ふと素朴な疑問ですが、餃子には何をつけて食べますか? 王道は醤油とお酢でしょうか。
-
人生最悪の忘れ物
今までの人生での「最悪の忘れ物」を教えてください。 私の「最悪の忘れ物」は「財布」です。
-
初めて自分の家と他人の家が違う、と意識した時
子供の頃、友達の家に行くと「なんか自分の家と匂いが違うな?」って思いませんでしたか?
-
【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
【お題】 ・買ったばかりの自転車を分解してひと言
-
「お昼の放送」の思い出
小学校から中学校、ところによっては高校まで お昼休みに校内放送で、放送委員が音楽とかおしゃべりとか流してましたよね。 最近は自分でもラジオができるようになって、そのクオリティもすごいことになっていると聞きます。
-
For~Next ループ内でUnionメソッドを使うとエラーになります。
Visual Basic(VBA)
-
エクセルVBA Unionはなぜ遅い?
Visual Basic(VBA)
-
VBAでループ内で使う変数名を可変にできないか。
Visual Basic(VBA)
-
-
4
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
5
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
6
ExcelのVBA。public変数の値が消える
Visual Basic(VBA)
-
7
cellsで特定の離れた範囲を選択する方法は?
Visual Basic(VBA)
-
8
エクセルVBAで5行目からオートフィルタモードに設定したいたい
Excel(エクセル)
-
9
VBAで文字を反映させると255文字の制限になってしまいます。
Visual Basic(VBA)
-
10
excel/vba/public変数
その他(Microsoft Office)
-
11
エクセルVBA 罫線 処理時間短縮
Word(ワード)
-
12
「メソッドまたはデータメンバが見つかりません。」というエラーが出ます。
その他(データベース)
-
13
エクセルの保護で、列の表示や非表示が加納にするには
Excel(エクセル)
-
14
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
-
15
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
16
【Excel VBA】指定行以降をクリアするには?
Visual Basic(VBA)
-
17
vba クリップボードクリアについて教えてください
その他(プログラミング・Web制作)
-
18
Excelの条件付き書式設定の太い罫線
Excel(エクセル)
-
19
WorkBooksをオープンさせずにシートにコピーしたい【EXCEL VBA】
Excel(エクセル)
-
20
特定の名前のオートシェイプの有無を知りたい(エクセルVBA)
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・一回も披露したことのない豆知識
- ・これ何て呼びますか
- ・チョコミントアイス
- ・初めて自分の家と他人の家が違う、と意識した時
- ・「これはヤバかったな」という遅刻エピソード
- ・これ何て呼びますか Part2
- ・許せない心理テスト
- ・この人頭いいなと思ったエピソード
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・あなたの習慣について教えてください!!
- ・ハマっている「お菓子」を教えて!
- ・高校三年生の合唱祭で何を歌いましたか?
- ・【大喜利】【投稿~11/1】 存在しそうで存在しないモノマネ芸人の名前を教えてください
- ・好きなおでんの具材ドラフト会議しましょう
- ・餃子を食べるとき、何をつけますか?
- ・あなたの「必」の書き順を教えてください
- ・ギリギリ行けるお一人様のライン
- ・10代と話して驚いたこと
- ・家の中でのこだわりスペースはどこですか?
- ・つい集めてしまうものはなんですか?
- ・自分のセンスや笑いの好みに影響を受けた作品を教えて
- ・【お題】引っかけ問題(締め切り10月27日(日)23時)
- ・大人になっても苦手な食べ物、ありますか?
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・都道府県穴埋めゲーム
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
マクロの「SaveAs」でエラーが...
-
EXCELのSheet番号って変更でき...
-
同じ作業(データコピー・貼付...
-
マクロ実行後に別シートの残像...
-
VBA別シートの最終行の次行へ転...
-
【VBA】複数シートのデータを1...
-
Excel VBA オートフィルターで...
-
Unionでの他のシートの参照につ...
-
前回質問の続きになりますが、...
-
VBAで変数の数/変数名を動的に...
-
エクセルVBA:軸の設定でエラー...
-
FindNextがうまくいかない
-
VBA 別ブックからの転記の高速...
-
【VBA】特定の条件でセルをコピー
-
Excelで横書き50行の漢字テス...
-
VBA 空白行に転記する
-
エクセル 複数シートの同一セ...
-
楽天RSSからエクセルVBAを使用...
-
VBA 実行時エラー1004 rangeメ...
-
VBAマクロ実行時エラーの修正に...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
マクロの「SaveAs」でエラーが...
-
EXCELのSheet番号って変更でき...
-
VBA 空白行に転記する
-
マクロ実行後に別シートの残像...
-
VBA別シートの最終行の次行へ転...
-
Changeイベントで複数セルへの...
-
Count Ifのセルの範囲指定に変...
-
ExcelのVBマクロを、バックグラ...
-
VBA 実行時エラー1004 rangeメ...
-
VBAで変数の数/変数名を動的に...
-
VBA 別ブックからの転記の高速...
-
Excel VBA オートフィルターで...
-
100万件越えCSVから条件を満た...
-
複数シートの複数列に入力され...
-
【VBA】特定の条件でセルをコピー
-
Excel2013で切り取り禁止
-
楽天RSSからエクセルVBAを使用...
-
アクセスからエクセルへ出力時...
-
グラフマクロで系列を変数にす...
-
FindNextがうまくいかない
おすすめ情報