• 締切済み

エクセルＶＢＡについて。

あるセルの数値を別シートへ連続してコピーするにはどのようなコードを使えばいいのでしょうか？ 教えてください。お願いします。

みんなの回答

  • Wendy02
  • ベストアンサー率57% (3570/6232)
回答No.2

こんばんは。 Copy コマンドを使うというぐらいで、それ以上は、答えようがないです。 Range("A1").Copy Sheets("Sheet2").Range("A1") なんていうのは出来るけれども、この程度では、数式のほうがマシかもしれませんね。気持ちを改めて、本を購入して、少しずつ覚えるようにしたほうがよいかもしれません。VBAというのは、関数のように単発ではなくて、積み上げで覚えていかないと使いこなせないので、すぐに思ったように自由に使えるということにはなりません。ですから、「マクロ集」という本も出ています。ほんのちょっと替えれば使えるようになります。

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

質問があいまい。 コンピュターをやる以上もっと正確に。 １つのセルの値をを ＞連続してコピーするにはどのような・・ の連続とはシートのこと、１シートの連続したセルのこと。 ーー どちらにしても、「マクロの記録」をとれば判る。質問する問題でもなかろう。 マクロの記録の結果を見て、変え方を判らないならその点の質問をすること。

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • エクセル内でのVBAの質問です。

    閲覧ありがとうございます。 エクセルの作業ファイルにてVBAのコードを作成しているのですが、中々思う通りに実行できないので、ご教授願います。 実行したい内容については以下の通りです。 ボタン1を押すと(添付画像上段のブック)、マイドキュメント内にある「データ転送ソフト2」という名前のブックを開き、そのブックのシート「A」内(添付画像下段)の、ボタン1を押したシートのF1セル(添付画像上段のブック)と同じ文字(日付)の列と"う"と入力された行の交差したセルの数値(添付画像下段の紫色のセル)をコピーして、ボタン1を押したシートのT4のセル(転送値1:の右隣にある薄緑のセル)に貼り付ける作業が行えるコードをご教授願いたいです。 要約しますと、作業しているシートのボタン1を押すと、別の場所にあるブックを開き、そのシート内の条件に沿った数値をコピーして、作業しているシートの指定されたセルに貼り付ける作業が行いたいです。 とても分かりにくい文章で申し訳ございませんが、お願いします。 可能ならば、コードの解説もつけてくださると嬉しいです。

  • エクセルVBAのコーディング

    現在、次のようなことがやりたくてエクセルのコードを作ってみました。 ・データが書かれたエクセルの複数のsheetの特定のセルをコピーして、sheet1にコピーペーストしていきたい。 そこでこのようなコードを書いてみました。 Private Sub Worksheet_Activate() Sheet4.Select Range("A16").Copy Sheet1.Select Range("U63").Select Sheet1.Paste End Sub とりあえずSheet4のセルA16のデータをSheet1のU63にコピーペーストするようにしてみたのですが、うまくいきません。 この場合のコードの書き方をご教授いただけないでしょうか？ どうぞ、よろしくお願い致します。

  • excel vba　作成について教えて下さい。

    excel VBAを使ってあるブックのセル範囲を別のブック（日報.XLS)のシートへコピー貼り付けをしたいのですが、コピーする側のブックがランダムに取り込まれ（例　８時間ピッチにて自動的にブックが作成される）そのブックを日にちごとに集計し、一か月ごとにまとめるということをやらなければなりません。 例）8時間ごとにフォルダが作成されます。 　　000001.XLS 000002.XLS 　　00000F.XLS ・・・・・・・・16進数にて 　　上記ブックのSheet1のA2:A11までの数値を別のブック（日報月報集計）のに貼り付ける。 別のブック(日報月報集計）は項目ごとに１０個のシートがあり ８時間ごとのファイルのセルA2は別ブックのSheet1の日付けに対応するセルへ貼り付け B2は　　　　　　　Sheet2 上記操作を８時間ごと（可変可能）に自動的にコピー貼り付けをやりたいのですが ブック間のコピー貼り付け等わからないことが（初心者です。）多々あり、いろいろ調べてはいるのですが、ＳＴＯＰした状態です。 出来れば、初心者にも理解しやすい解説等あれば宜しくお願いします。

  • ExcelのVBAについて。

    ExcelのVBAについて。 画像のようなコードを利用してセルに入力時の日付時間を自動的に付加させたいのですが、、 VBA初心者な為に上手くいきません。 コード自体はサイトのを切り貼りして使えるのですが、これ以上の応用例に行き着けません。目的としては、データベース的に、あと入力数値から特定文字を抜き出して変数を当て嵌め文字列の語呂を当てます。様式はまだ作成中ですが、ある種の図表化してプリントアウトまでしたいと思っています。 何が上手くいかないか、まず自動的に付加させる所は何となく出来ているので、これをシート1とした場合に、シート2に図表化した転記内容を構成し、、シート1入力、シート2表示、またシート1A3セルに戻るというコードにしたいです。 この記述は不味いとかこうこうああした方が良いというアドバイスや指摘をお願いします。 よろしくお願いします。

  • ExcelでVBAで選択範囲の値のみを挿入

    始めて質問いたします。よろしくお願いします。 Excel2010にて作成された選択範囲(Sheet1)のセルを同じブックの別シート(Sheet2"A1:AB20")で参照しています。その参照部分をVBAにてコピーして、そのすぐ下("A21:AB40")に挿入していきます。自分で作成したコードでは、数式もコピーするので当然参照しているセルからずれてしまいます。(Sheet1)の数値はその度に変わりますので絶対参照にすることもできません。 作成したVBAに値のみをコピーするコードを追加したいので教えて下さい。 Private Sub CommandButton1_Click() Sheets("Sheet2").Range("A1:AB20").Copy Sheets("Sheet2").Range("A21:AB40").Insert Shift:=xlDown Application.CutCopyMode = False End Sub このコードだと、参照している　"A1:AB20"　がテキストなどの場合はうまくいきます。数式が入っていると当然ですが、数式をコピーしてしまいます。 いろいろなサイトを見ていると Paste:=xlPasteValues　　が、値のみペーストだと書いてありますが、適応の仕方がわかりません。 Insert　の場合はどうなるのかもわかりません。 同じような質問も探しましたが見つからなくて困っています。 よろしくお願いいたします。

  • ｅｘｃｅｌ vba で変数に格納そして取り出し方

    参考書、相談室で教えて頂き、何とかなっておりましたが、変数に格納、その数値を取り出すことについて、基本的な事をもう一度基本を教えて頂けませんか。 今,sheet2の、b3セルの数値が変化しています、それをSｈeet1のb3セルが参照しています。 そのsheet1の参照セルの数値を変数に格納し、それを読み出して使いたいのですが、うまくできません、どのように考えたらいいのですか。現在は、下記コードの、ｋ、の引き数の変化ができなく暗礁に乗り上げております。 ｓｅｔ　temp = worksheets(("描画").shapes.addTextbox(mosTextboxorientationHorizontal.86,k,66,18) の、,k、の数値を変化させたいのですが出来ません。 sheet1のセルの数値を変化させないで、一つの数値に固定すれば、問題なく目的の描画が行われます。 変数に格納、for....nextで取り出して等いろいろ試みましたが、参照セルが変化すると描画しません。 申し訳ありませんが、もう一度教えて頂けませんか。

  • エクセル　ＶＢＡ　初心者で困っております！

    いつもありがとうございます。VBA初心者です。 データベース（sheet2）のデータをセルＡ１（sheet1）の値をオートフィルタ－に反映させて抽出し、 その後、セルＢ１（sheet1）に入力した値と貼り付けた別のシート（sheet3）で数値１×数値２（Ｂ１で入力した値）を掛け算し、数値３に出すのが目的です。 sheet1 セルA１【製品名を入力】例、【製品Ａ】を入力 セルB1【数値を入力】例、５を入力 コマンドボタン１を押すと実行 sheet2（データベース） 　　 　　製品名　　　　　　数値1　　　　数値2　　　数値３ １　製品C　　　　　　　2　　　　 　　　　　 ２　製品A　　　　　　　2 ３　製品A　　　　　　　1 ４　製品B　　　　　　　4 ５　製品D　　　　　　　3 ６　製品D　　　　　　　5 sheet3（貼付先） 実行結果 　　製品名　　　　　　数値1　　　　数値2　　　数値３　　 　　　　　 １　製品A　　　　　　　2　　　　　　　　５　　　　　１０ ２　製品A　　　　　　　1　　　　　　　　５　　　　　 ５ 当初、リストボックスを選択出来るようにし、その値を別のシートに貼り付け、演算処理を行うの方法を模索しておりましたが、 shee2のデータベース、Ａ１・Ｂ１（検索値・値）も毎回変わるため、１回ずつの作業を行うように考えなおしたところ、 いきずまってしましました。 時間がないためによろしくお願い致します。

  • エクセル上のＶＢＡ

    当方、ＶＢＡまるっきり初心者です（触りはじめて３日くらい）。 エクセルはある程度理解しているつもりですが… バージョンはエクセル２０００です。 他シートのセルのひとつに入力すれば、 別シートのセルがそれを参照したうえで 値として表示出来るようにならないでしょうか。 　今のところ、以下のような状況です。 step01　sheet1のセルＡ１に任意の数値（整数限定です）を入力。 step02　sheet2のセルＡ１に、sheet1のセルＡ１の数値を用いて 　　　　MOD関数で余りを出す。 step03　sheet2のセルＢ２に以下のＶＢＡによって 　　　　step02の余りを値として表示。 　　　　　Private Sub Worksheet_Change(ByVal Target As Range) 　　　　　　　Range("b2").Value = Range("a1") 　　　　　End Sub 　これだとsheet1の数字を変えても、 sheetの切替後sheet2のセルＢ２に 表示される値が変わってくれません。 　最初の入力（step01の入力）をおこなえば sheet2のセルＢ２まで値が変わってくれるような方法を 教えていただけないでしょうか。 　拙い説明で申し訳ありませんが、よろしくお願いします。

  • VBAについて教えて下さい

    エクセルのファイルを2つ開いている状態で 仮に名前を試験1、試験2とします。 VBAを使用し 試験2の指定した位置にあるセル(数値)を 試験1の任意の位置に挿入する しかし、試験2のシートは複数あります。 僕がやりたいのは 試験1の任意の位置に挿入する数値は 試験2のシートが変わっていようが 今開いているシートから指定した位置にあるセルから数値を挿入してほしいのです いちいち、VBAを使いwooksheetsで指定するのも面倒なので質問しました。 なにか、別の方法あるでしょうか？ あれば、コード書いて貰えるととても助かります。

  • EXCEL　VBAでできますか？

    皆様おはようございます。時々質問させていただきよい回答を得られまして 感謝しております。今回質問させていただきたいのは質問する僕のほうでもうまく説明できるかどうかわかりませんが・・・・ EXCELのSheet1のセルA1に数値205があります。右隣のSheet2にB2から下にかけて205、206、205、199、197と数値があります。 このSheet1の数値205と同じ値をSheet2から選択してそのセルの番地を Sheet1のD1から下に表示するという方法はありますでしょうか？ この設問でいうとSheet1のD1、D2にSheet2のB2、Sheet2のB3と表示される と思うのですが・・・ どうか回答をよろしくお願いいたします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

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

質問する