• ベストアンサー

Excellで1行おきの数字をコピー、貼り付けしたい

1行おきに数字を入力し、計算式も1行おきに入力されたシート1があります。シート2で入力した数字をこの数字と置き換えたいのですが、できますか。 A1の2の代わりにシート2の4を、A3の3の代わりにシート2の5をコピーしたい。シート2の範囲を選択してコピー、シート1へ貼り付けすると、計算式が消えてしまいます。 シート1のA2、A4の計算式を残したまま、シート2のA1,A3をコピーしてきたいのです。お願いします。 シート1  A1 2 数字入力 A2 A1+1 計算式 A3 3   数字入力 A4 A3+1 計算式 シート2 A1 4 A2 A3 5 A4

  • hima3
  • お礼率81% (221/270)

質問者が選んだベストアンサー

  • ベストアンサー
  • maruru01
  • ベストアンサー率51% (1179/2272)
回答No.3

こんにちは。maruru01です。 シート2のA2とA4(シート1で計算式が入っているセル)が空白の場合は、 ・シート2のA1~A4(必要な範囲)をコピーする ・シート1のA1(範囲の先頭)を右クリックして、[形式を選択して貼り付け]をクリック ・下の方の[空白のセルを無視する]にチェックを付けてOK これで、空白の場合はコピーしません。

hima3
質問者

お礼

早速の回答をありがとうございます。 そんな方法があるとは知りませんでした。大変参考になりました。

その他の回答 (4)

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

値を移すのは、手操作のコピーがだめなら、関数式を考えるのでしょう。 >1行おきに数字を入力し・・ 第1行、第3行、第5行、・・・に数字入力があるのでしょうが、ここへ、別のセルから値を持ってくるには、これらのセルに関数式を入れなければなりません。当然式を入れる前にあった値は消えます。良いのですか。 「関数式では、値をもって来るセル側に関数式を入れないといけません。」コピー元から投げつけるイメージではなく、コピー元から引き入れるイメージです。 >シート2で入力した数字をこの・・ シート2では、値は第1行、第3行、第5行に(シート1 と対応して)入力されているのですか。それとも(シート1)第1行-(シート2)第1行、3-2、5行-3行・・・のようになっていますか。 >関数式を使う便利さの、ほとんどの部分は、関数式を 複写(全行に渡り、プラス+ハンドルで複写する)した時に、上手く働くことにあります。この複写が1発で済むことが生命線です。 Sheet1で1行おきに関数式を入れようとしても、この機能が使えないと思うので、関数式を考える意味が非常に少なくなるのではないかと疑うべきです。 よっぽどトりッキーな方法を思いつかないとだめです。 ●VBAを使えば、規則性さえ見つかれば、プログラムで 組んで処理できるでしょう。 こちらは、「コピー元から投げつけるイメージ」で処理できます。

hima3
質問者

お礼

早速の回答をありがとうございます。おっしゃるとおり入力が大変な表になりました。関数でコピーしやすい表を心がけないと駄目なのを実感しています。

  • tbobi
  • ベストアンサー率45% (544/1189)
回答No.4

#1です。まちがいました。 誤 C1,E1・・・ 正 A3,A5・・・ すみません。

  • tksoft
  • ベストアンサー率36% (99/273)
回答No.2

シート1に直接数字を入力するのではなくシート2のセルの参照を入力するのではだめでしょうか? 例えば シート1のA1に =シート2!A1 とする具合に。

hima3
質問者

お礼

早速の回答をありがとうございます。これも表が大きいと大変です。

  • tbobi
  • ベストアンサー率45% (544/1189)
回答No.1

A1のセルに「=シート2!A1」 と入れてあとは確定し、それからそのセルを、シート1の、C1,E1・・・にコピーしていけばできると思います。 ラクにやるのであれば、選択・コピー後、 Ctrlキーを押しながら、コピー先を選択していき、最後に「貼り付け」をします。 はずしていたらすみません。

hima3
質問者

お礼

早速の回答をありがとうございます。これは表が大きいと大変です。

関連するQ&A

  • エクセル(2003)のコピーと貼り付けについて。

    エクセル(2003)のコピーと貼り付けについて、操作を自動化したいです。 VBA初心者です。 同じフォルダ内にAファイルとBファイルがあります。 Aファイルにはシート1からシート4まで有り、シート1とシート2にシート3と4を比較したデータを表示させています。 シート1とシート2はA1からG1まで項目として、A2からデータが表示されます。約20行程度、表示される行数は毎日変わります。 Bファイルにはシート1しかありません。A1からG1まで項目とし、A2からデータが表示されています。約100行。毎日変わります。 (Aファイルのシート1とシート2の表示されているデータを貼り付けていく為) Aファイルのシート1に表示されているデータ(A2から)を仮に20行としBファイルの101行目(入力されているデータのすぐしたの行)に貼り付け、Aファイルのシート2に表示されているデータ(A2から)を仮に20行とし、120行目に貼り付け。 毎日コピーする範囲や貼り付けをするセルが変わっていく、固定の範囲、セルではない。この作業を毎日、コピー貼り付けで操作しています。 この操作をラクにしたいです。 困っていることは、コピーする範囲が毎日変わってしまう。(行数が増減するため) 貼り付けるセルも変わってしまう、(行数が増減するため) 分かりずらい説明になっていましたら、申し訳ないです。 よろしくお願いします。

  • Book1からBook2へコピー/貼り付け

    Excel2003です。基本知識かもしれませんがお尋ねします。 たとえばBook1のSheet1をそっくりそのままBook2の空いているSheetへコピー/貼り付けする方法なのですが。 コピーから「形式を選択して貼り付け」を選択してどの項目を選んでも行の幅とかが違ってくるのです。手間をかけて行幅を微調整して、作成したSheetなのにまた貼り付け先で調整しています。 列幅は選択肢にありますね。 どんな方法でもかまいませんので、お教えください。

  • 計算結果のコピー&貼り付けについて

    計算結果のコピー&貼り付けについて A1セルに関数を入れて、計算結果が表示されているとします。 そして、その計算結果の数字を他のセルへコピーして貼り付ける時、 通常は「形式を選択して貼り付け」にすると思いますが、 もっと簡単な方法を探しています。 ・単純な「コピー&貼り付け」だけで済むような方法はないでしょうか? ・A1セルの下に、計算結果の数字のみを表示させられないでしょうか? ご存じの方、教えてください。 よろしくお願いします。

  • Excelのシート間のコピー&貼付け

    皆様にお聞きしたいのですが。。m(_ _)m あるシートで作成したデータ(罫線等は入れてません。セルに入力したデータのみです)を、一番上の項目名のみまず最初に別シートにコピーしました。 そして元データでフィルタで抽出した間違いがあったデータのみ、複数の行番号をドラッグで選択して別シートにコピー&貼付けをしていたら、なぜか元のシートと列の数が合わなくなりました; 列の数は40前後と多いのですが・・・ 一番上の項目名と途中か合わなくなっていました(T-T) 普通に行を選択してコピー、そして別シートへ貼付けしていただけなのですが。。 こうゆうことってあるのでしょうか??? どなたか、どうかご教授ください。宜しくお願い致します。。 補足 ちなみに、ちゃんとコピー先のシートのA2(項目行の先頭の下の行)にコピーしたのですが・・。

  • G→可視セル→コピー貼り付けがうまくいかない

    お世話になります。 エクセル2007でよく使う「可視セルのみコピーし貼り付け」がうまくいきません。 既存ブックの印刷したい行以外は非表示にし、 印刷したい範囲を選択してから 「ジャンプ→可視セル選択→コピー」し、 別のブックを開きひとつだけセルを選択し「貼り付け」すると、 非表示行まですっかり貼り付いてしまいます。 「形式を選択して貼り付け」にすると、 「ワークシートオブジェクト」とか「図」とか 「ビットマップ」とか書いてある見覚えのないウィンドウが開きます。わからないまま「ワークシートオブジェクト」でOKすると 「貼り付けられませんでした」と言われます。 目的は、不要なところを除き必要なところだけ 紙をケチって詰め詰めで印刷したい、ということです。 どなたかご指導お願いします。

  • シート1のC列の最終行をコピーして同じ行に値貼り付けしたい

    シート1のC列の最終行を取得して その行を丸々値貼り付けするマクロを作りたいと思います。 シート3のB18の値をシート1のC列の最終行の1つ下のセルに値貼り付け すると、その行のA、B列に日付が入力される関数が入っています。(下まで) 関数が入ったままだと、うまくいかない時があるので最終行をコピーして値貼り付けしたいのですが、マクロの作り方を教えてください。 シート1の最終行に貼り付け Sheets("Sheet3").Select Range("B18").Select Selection.Copy Sheets("Sheet1").Select Range("C65536").End(xlUp).Offset(1).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False End Sub 最終行をコピーして値貼り付け Dim 最終行 As Integer 最終行 = Range("C65536").End(xlUp).Row Range("A6:C" & 最終行).Select Selection.Copy Sheets("Sheet1").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False End Sub このマクロだと、A6からC列の最終行まで全てコピーされてしまうので、C列の最終行のAからC列まで1行だけコピーできないでしょうか?

  • vbaで最終行に張り付け

    Excelマクロについて教えてください。 sheet2にsheet1から選択した範囲を貼り付けております sheet2のC列が連続した値になっておりそれを軸に貼り付けをしたいのです。 sheet1のA1:g40の範囲をcutしたものを sheet2のC列の最終入力行の一段下の行に A列から貼り付けしたいのです。 よろしくお願いします

  • コピー後に値のみ貼り付け エクセル、VBAの記述について

    マクロ初心者です。 エクセルで選択範囲を指定後コピーし、 自動的に別のシートの末尾に貼り付けられるようにしたのですが、 この内容のまま「貼り付け」を「値のみ貼り付け」に訂正する場合 どのように変更すればいいのか、教えてくださると嬉しいです。 宜しくお願いいたします。 Sub 選択範囲をコピー後、指定シートの末尾に貼り付け Worksheets("sheet1").Activate Range("b11:I17").Copy Workbooks("book2.xls").Worksheets("Sheet1").Activate 行 = Range("B1").CurrentRegion.Rows.Count + 1 ActiveSheet.Paste _ Destination:=Workbooks("book2.xls").Worksheets("Sheet1").Range("B" & 行) End Sub

  • エクセルのコピー、そして貼り付け

    エクセルで表を作っていますが、一つのセルに複数行入力(AIT + Enter)していますがこの表をコピーして他のシートに貼り付けると、行の長さがコピー元の行の長さにならず途中の行幅でコピーされてしまうため、いちいち行の長さを伸ばして使っています。きちんとした行の長さで貼り付けできる方法を教えてください。よろしくお願いします。

  • エクセル 貼り付け

    初心者的質問で申し訳ないのですが・・ Aシート 日付 7/1  7/2  7/3  7/4  7/5 ... Aさん100  50   70  60   50 ... Bさん80  100   60  70   80 ... Cさん50   70  80   90  100 ... COUNTIFを使い範囲>50    2   2   3   3   2  ... Bシート 日付 生徒数 クラス ノルマ ... 7/1  10    A   2  ... 7/2  10    A   2  ... 7/3  15    A   3  ... ノルマのところにコピー貼り付けでやりたいのですが・・手で修正をかけている状態です。 簡単なやり方ありましたらお願いします。 形式を選択して貼り付けで行列を入れ替えるはしましたが・・数字のみの貼り付けはできるのですが・・ AシートB5 AシートC5 AシートD5 となってほしいのですが・・ 宜しくお願いします。。

専門家に質問してみよう