- ベストアンサー
簡単なセルのコピー方法を教えて下さい。
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
◆こんな方法はいかがでしょうか？ A1=OFFSET(Sheet1!$A$1,(COLUMN(A1)-1)*7,) または、 A1=INDEX(Sheet1!$A:$A,(COLUMN(A1)-1)*7+1) ★右にコピー
その他の回答 (1)
- mu2011
- ベストアンサー率38% (1910/4994)
次の方法は如何でしょうか。 甲シートをシート１、乙のシートをシート２で表記しています。 シート１のA1に次のセルを設定して、必要分縦横コピーして下さい。 =INDEX(INDIRECT("sheet2!"&ROW()&":"&ROW()),1,COLUMN()*7-6)
お礼
大変すみません。 maron--5さんの回答で、解決したのですが、勉強の為 mn2011さんの方法もためしてみました。 教えて戴いた関数を、sheet2 のところだけ訂正して そのままコピーして入力したのですが、横にコピーすると ０になってしまうのですが・・・ すみません。素人なもので、何がいけなかったんでしょうか。
補足
すみません。勉強してそれでもむりであれば、 また質問します。 ありがとうございました。
関連するQ&A
- シート内の一部のセルを別シートにコピー
Excelのマクロ(VBA)の記載方法について お分かりになる箇所だけでも結構ですので、 どなたかご教授を願い致します。 シートX A B C 1 data1 data2 data3 2 x data7 data8 3 data4 data5 data6 4 data7 data8 data9 シート Y A B C D 1 length ３ (任意) (任意) 2 xxxx (任意) (任意) (任意) 3 zzz (任意) (任意) (任意) 4 (空白)(任意) (任意) (任意) 上記のような２つのシート(同一Excelファイル内)があって、 シートXの一部のセルを次の条件(１～４)でシートYにコピーしたい場合 １．コピー元の列の数は、シートYの "length"と書かれたセルの右となりの数字 とする(上記では３なので、A,B,C列をコピー対象） ２．コピー元の行の数は、シートXの１～４行目までとするが、 シートXのA列のセルが"x"だったら、その行は全てコピーしない。 ３．コピー先(Y)の列は、コピー元(X)の列と一つずれてコピー(BならCに、CならDに) ４．コピー先(Y)の行は、シートYのA列で１行からで始めて空白セルになった行からコピー開始。 (上記では、A列で空白セルのある４行目からコピー) 上記条件で、下記のシートYを作成したいのですが、 この場合どようなマクロ(VBA)で実現できますでしょうか。 コピー結果(シートY) A B C D 1 length ３ (任意) (任意) 2 xxxx (任意) (任意) (任意) 3 zzz (任意) (任意) (任意) 4 (空白) data1 data2 data3 5 (任意) data4 data5 data6 6 (任意) data7 data8 data9
- ベストアンサー
- オフィス系ソフト
- ExcelVBAで複数セルを別シートに貼り付けたい
Excel VBAでデータをコピーして、別シートに貼り付けるどうしたらいいのでしょうか。 Sheet1のセルA1からA4のデータをコピーして、Sheet2のC2からｃ5に貼り、次はSheet1のセルB1からB4のデータをコピーしてSheet2のC7からｃ10に貼りを500行ほど繰り返し（コピーするデータは、4行づつ横へ移動し、貼り付けるほうは4行づつ縦へ移動します。） それが終わったら、今度はB列、c列と100列ほど同じ操作を繰り返します。 いろいろな方法を試しましたが、なかなかうまくいきません。 どなたか教えていただけませんでしょうか。よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- Excelセルの参照
Excelにdataとnという２シートがあります。dataシートのA列３行目～２２行目にデータが縦入力されており、以降B列、C列とデータ入力が繰り返されます。 ｎシートでdataシートの入力値参照のため、あらかじめdataシートの参照リンクを貼っておきたいのですが、ｎシートのデータは横並びであるせいか、参照リンクをうまくコピーすることができません。 dataセルのA3セルの値をｎシートのD1に=data!A3と貼り付けて、W1（=data!A22）まで数式を自動コピーできないでしょうか。また、D2～W2まで＝data!B3～＝data!B22など参照リンクをコピーで作成できないでしょうか。 よろしくお願いいたします。 横並びに参照する必要があるのですが、
- ベストアンサー
- Excel（エクセル）
- エクセルVBA、数式の入ったセルのコピーについて質問です。よろしくお願
エクセルVBA、数式の入ったセルのコピーについて質問です。よろしくお願いします。 シートのA列は日付の入ったセルがあり、データを更新する度に行が追加されていきます。 数式(1)～(3)は、それぞれ異なる計算式が入っており、日付データを参照して計算を行っています。 A B C D 1 日付データ 数式(1) 数式(2) 数式(3) 2 日付データ 数式(1) 数式(2) 数式(3) 3 日付データ 4 日付データ 5 日付データ A列にデータが追加したときに、B～D列の数式をA列の最終行までコピーしたいのですが、 どのようなコードを書けばよいでしょうか？ ちなみに、１行目のB～D列には、データ更新の有無に関わらず、必ず数式が入っているものとします。 何かよいアドバイスがあればよろしくお願いします。 【補足】 単純に考えると、B1～D1をA列の最終行までAUTOFILLすれば良いのでしょうが、データ数がかなり多く、 この方法だと時間がかかってしまいます。A列のデータ追加前の数式セルの最終行から、追加後の最終行までとすると、処理は早くなるのでしょうか？
- ベストアンサー
- Visual Basic
- VBA 他シートを参照しているセルのコピー
お世話になります。 以下のシートがあります。 [sheet a] A B C D E 1 2004 2005 2006 2007 2008 2 =b!A2 =b!C2 =b!E2 =b!G2 =b!I2 3 10 15 16 4 11 4 12 30 20 9 2 5 =SUM(A3:A4) =SUM(B3:B4) =SUM(C3:C4) =SUM(D3:D4) =SUM(E3:E4) [sheet b] A B C D E F G H I J 2004 2005 2006 2007 2008 1 あ１ い１ う１ え１ お１ か１ き１ く１ け１ こ１ 2 あ２ い２ う２ え２ お２ か２ き２ く２ け２ こ２ ・・・・・・・・・ [sheet a]F列以降に入れるデータは、VBA（マクロ）を使って、別のブックから取り出しています。 (例) F1…=E1+1（E1の数式をコピー） F3,F4…任意の値（別のブックからコピー） F5…=SUM(F3:F4)（E5の数式をコピー） 1行目,5行目の場合は左のセルをコピーして数式を貼り付けると、列が自動的に列が変わりますが、2行目の場合は元のシートを1行おきに参照しているので、単純にコピーしただけでは正しい数式が入りません。 2行目の参照をVBAで作るには、どのようにしたらいいでしょうか。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- イベントマクロでコピー
ダブルクリックイベントでシート１のデータをシート２にコピーです。シート１には、A列とB列にデータが有ります。 シート２の C3,C5,C8,C10,・・・・と D2,D4,C7,D9,・・・・とコピー先が有ります。シート１のA列の任意の行をダブルクリックでC3にコピー、次、シート１のB列の任意の行をダブルクリックでD2にコピー。次、シート１のA列の任意の行をダブルクリックでC5にコピー、次、シート１のB列の任意の行をダブルクリックでD4にコピー、とするにはどのように記述したら良いでしょうか。よろしくお願いします。
- ベストアンサー
- Visual Basic
- エクセル セル参照コピー
エクセルでセル参照をしているセルを１行ずつ空けてコピーした場合の質問です。 例えば、A1に"=B1"と書いてあった場合に、そのA1をコピーしてC列のセルに１行ずつ空けて C1に"=B1" C3に"=B2" C5に"=B3" C7に"=B4" C9に"=B5" と、いうような感じで貼り付けをしたのですが、どのような操作をすればいいでしょうか？ 宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- 該当行の最終列にコピーする
すべて windows7 使用するPCによってoffice2007、2010とoffice xp Sheet1A１:D1000の表をSheeｔ2&3A1:BZ1000の表該当セルにコピー（書式、セルフォント色とも）します。 Sheet1 １行めはタイトル行です。 Sheet1A2の値（英数字）をSheet2&3A:Aから検索し、その行の最終列の次列からSheet1B2:D2の値（B2は文字列C2は日付D2は文字列）をコピー（書式、セルフォント色とも）します。
- 締切済み
- その他MS Office製品
- セルの選択、貼り付け
よろしくお願いします。 次のような処理をするプログラムを書きたいのですが、うまく書けません。教えてください。 （処理） 1つのExcelファイルの中で、sheet1A列のセルの値と同じ値を有するセルがsheet2A列にある場合、当該行のB列の値をsheet1のセルに貼り付ける。 （前） 〈sheet1〉 〈sheet2〉 A B … A B … 1 c1 1 c1 200 2 b2 2 a1 300 3 d5 3 b3 500 ： 4 b2 400 5 d5 500 ： （後） 〈sheet1〉 A B … 1 c1 200 2 b2 400 3 d5 500 ：
- ベストアンサー
- Visual Basic
お礼
やった～。できました～。 INDEXのほうで解決できました。 ありがとうございました。たすかりました。