• 締切済み

他のブックのセルに楕円を埋め込む

VBAでボタンのなかに 他のブックのセルに楕円を埋め込むコードを つくることは可能でしょうか？ よろしくお願いいたします。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.2

マクロの記録をやってみるのが普通じゃないですか。 それさえ、やってもしないで質問して無いですか。 ボタンのクリックイベントにしたければ、下記コードの Macro1などをEnd Subとの間に挟めばよい。 ーー アクチブブックに＝＞マクロの記録で採ったものそのまま Sub Macro1() ActiveSheet.Shapes.AddShape(msoShapeOval, 168.75, 96.75, 90.75, 39.75).Select End Sub 指定シート（例　Sheet3）に Sub test02() Worksheets("Sheet3").Shapes.AddShape(msoShapeOval, 168.75, 96.75, 90.75, 39.75).Select End Sub 次に指定ブックにやってみる。 指定ブックの記述コードは修正してください Sub test03() Workbooks.Open "C:\Documents and Settings\XXXX\My Documents\a2.xls" Worksheets("Sheet3").Shapes.AddShape(msoShapeOval, 168.75, 96.75, 90.75, 39.75).Select End Sub うまく行くようだ。

全文を見る
すると、全ての回答が全文表示されます。
  • xls88
  • ベストアンサー率56% (669/1189)
回答No.1

試されているコードがあれば拝見できないでしょうか。 無いのでしたら、「マクロの記録」されたコードでも結構です。 コードを拝見した方がアドバイスし易いです。 Excel(エクセル) VBA入門：マクロの自動記録と実行 http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/vba_01.html

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • エクセルVBAで他ブックのセルへジャンプするコード

    お世話になります。アクティブセルから他ブックを開き、元の内容と同じ文字列が含まれるセルにジャンプするVBAのコードを教えていただけないでしょうか。 ・ブック１「１２３４５」のアクティブセルでマクロボタンを押す。 ・指定のブック２シート１を開き、「１２３４５」が含まれるセルを検索しジャンプ（アクティブセル）する。 ・指定の文字列が無い場合は「検索条件に一致するデータは見つかりません。」 ネットなどでいろいろ調べたのですが見つかりませんでした。みなさんご教授お願いいたします。

  • エクセル）VBAで他のブックのセル参照

    はじめまして。 エクセルのVBAについて教えてください。 VBAで、 book1のsheet1のセルA1にあるデータを開いていない(アクティブでない)別のbook2のsheet2のセルB1にコピーしたいのですがこんなことってできるのでしょうか？ ・・やはり開いていないとダメなんでしょうか？ あと、これって"ブック参照"っていうことなんでしょうか？自分がやりたいことが何なのか判らないので上手く調べる事が出来ず難儀しています。 よろしくお願いします。

  • ボタン入力で他ブックのセルへコピー

    ブックBシート炉の１月１日の横にある入力ボタンでブックAシート総括の日付のマッチ（ブックBのA3とブックAのA2）したらブックBの１月１日のB3:C7がブックAのA1:B7にコピーしたいのですがどなたかVBAコードが解る方お願いします。 同様に順に１月２日の横にある入力ボタンでブックAへコピーしたいのですが。

  • Excel VBA トグルボタンで一定のセルへ楕円を書き込みしたり消したりしたいのですが

    Excel VBAの初心者です。Ｗｅｂ検索で同じ事例がないか検索をしてみましたが、２件程近いものがありましたので、それを参考に自力でやってみましたが、書き込みまではすんなりいきますが、トグルボタンをＯＦＦにした場合（消すという動作）がどうも旨くいきません。どなたか宜しくお願いします。 根本的にVBAのコードが全部理解出来ていないというレベルですので、その辺をお察しの上お願いします。 実施したい内容は以下の条件下で行いたいと思います。 (1)sheet１にトグルボタンを作成 (2)トグルボタンを押した時、sheet2の２箇所のセル(AJ3とCJ3)と、sheet3の２箇所のセル(AJ3とCJ3)に楕円（透明）を書き込む (3)トグルボタンを押した時、トグルボタン自体の色を赤色に変更 (4)トグルボタンを戻した時、(2)の作成した楕円を消す。またトグルボタン自体の色を元の色に戻す。

  • Excel　同ブックの他シートを参照するセルを、他ブックのセルにコピー

    こんにちは。Excelの使い方について質問させていただきます。 よろしくお願いします。 Excel2003を使っています。 シート数、シート名がまったく同じブックが２つあります。 AブックのAシートのA1セルを参照しているセルである AブックのBシートのA1セルをコピーします。 BブックのBシートのA1セルにペーストします。 BブックのAシートのA1セルを参照して欲しいのですが、 別ブックであるAブックのAシートのA1セルを参照するように 自動的に変換されてしまいます。 シンプルにそのままコピーすることは不可能でしょうか。 セルのコピーでは無く、中の文字列を選択してコピーしても、 何が起こっているのかよくわかりませんが上手くいきません。 Excel初心者です。マクロはまったく使えません。 親切な方、どうぞよろしくお願いします。

  • ■　他のブックのセル値を取り込むことは可能ですか？

    マクロで他のブックの特定のセルの値を取り込むことは可能ですか？ 例えば、今A.xls B.xlsという２つのエクセルファイルを開いていまして、A.xlsの　Ａ４　の値を　B.xls の　Ｇ８　に入れたいのですが・・・。 説明分かりにくかったでしょうか？ もしお分かりになった方がいらっしゃいましたら教えていただけないでしょうか？ よろしくお願いします。

  • EXCEL　VBA　他のブックを検索し、値を代入する方法

    EXCEL　VBA　他のブックを検索し、値を代入する方法 下記の様な２つのブックがあった時に ブック１（入力用） 顧客コード,作業員コード,チェックボックス ブック２（顧客マスタ） 顧客コード,顧客名,顧客住所,備考 ブック１は日報の様な物です。 ブック２は顧客マスタの様な物です。 ブック２に登録されている顧客数が10件とすると、ブック１は顧客コードを 名前としたブック名で計10個創成されています。 ブック１のチェックボックスにチェックを入れると、ブック１の顧客コードをブック２の顧客コードの中から検索し、そのレコードの「備考」フィールドにブック１の作業員コードを代入する、といった処理を行いたいのですが、 「他のブックを開けて」の後の「検索をかけて、ヒットしたらそのいくつとなりのセルに値を代入」の 記述の仕方が分かりません。 どなたかご教授よろしくお願いします。

  • セルに楕円の挿入方法について

    いつもお世話になっております。 お尋ねいたします。 セルに楕円を挿入したいのですが、（塗りつぶしの楕円ではなく、線だけの楕円） また、その楕円をいくつものセルにコピーしたいのです。 よろしくお願いいたします。

  • 他ブックのセルの値をリンクさせたい

    Excel2007でマクロ作成中の初心者です。 常に同一フォルダの中のブックA（マクロ記入用）とブックB（データ計算用）を開いて、作業しています。 ちなみにこのフォルダはデスクトップ上にあります。 まず、ブックAを開き、出てきたフォームの中のコマンドボタンを押して、 ブックBを開き、セル("D2")に、ブックAのセル("A1")の値がリンクされているようにしたいです。 どのようにしたらリンクできるでしょうか。 Private Sub CommandButton89_Click() ブックBを開く Sheets("管理").Select 　Range("D2").select End Sub ------------------------------------- Sub ブックBを開く() ChDrive ThisWorkbook.Path ChDir ThisWorkbook.Path On Error GoTo err: Workbooks("25年計算.xlsm").Activate Exit Sub err: Workbooks.Open Filename:=ThisWorkbook.Path & "\25年\25年計算.xlsm" End Sub

  • エクセル　他BOOKへの参照式　セル位置情報

    　 他BOOKへの参照を設定しているリンク内のセル情報を自BOOKの特定セルのValueを当てはめる方法についてですが、 例えば、 =D:\フォルダA\[他BOOK名.xls]シート名!自BOOKの特定セルの値 とリンクを設定します。 この中の「自BOOKの特定セルの値」のところに 例えば、自BOOKのA4セルに入っている値であるA25と入れたいのですが どういう式を組めばいいでしょうか。 よろしくお願い致します。 　

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する