• ベストアンサー

エクセルVBA　指定したセルの行を指定したい

エクセルVBAで、指定したセルの行をコピーして、コピーしたセルの挿入をしたいです。 どのような文章で、書けばいいでしょうか；； よろしくお願いいたします

  • nanny
  • お礼率55% (72/129)

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

  • ベストアンサー
  • 7_7_7
  • ベストアンサー率24% (115/469)
回答No.1

たとえば１０行目をコピーして１７行目にコピーしたセルの挿入をする場合は Rows("10:10").Copy Rows("17:17").Insert Shift:=xlDown です。

  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. その他(ソフトウェア)

関連するQ&A

  • EXCEL VBAでのセル高の範囲指定コピーについて

    いつも活用させて頂いております。 ExcelのVBAで、範囲指定したセルのコピーを行い、コピー先のセルに コピー元のセルの高さをコピーさせるロジックを組みました。 始めは、範囲指定してセル高もコピーしようとしたのですが、 上手く行かなかったので、現在は、ループさせて1行ずつ行っています。 できれば、範囲指定して一括で行いたいのですが、 そのような事は可能なのでしょうか？ ご教授願います。

  • Excel で位置が変動するセルの指定をVBAで作りたいのですが・・・？

    　ExcelのVBAはほとんど初心者なのです。 　申し訳ございませんが教えていただきたいのです。 　ひとつのシートに表が３種類あるのですが、それぞれ違うデータを 　貼り付けようとしています。 　元の表の形は同じです。３行の表でデータの数によって行が挿入 　するようになっています。 　1つ目の表は、開始のセルは決まっているので指定は出来るのですが 　2つ目・3つ目の表の開始セルがその時々で変わってきます。 　その時の、開始セルのマクロを作成したいのですが分からなくて 　教えて下さい。 　よろしくお願いします。 　説明が下手ですみません。 　 　

  • エクセルの一つのセルに複数行の文字を入れる方法

    エクセルの一つのセルに複数行の文字を入れる方法を教えてください。 メモ帳などで入力したこのような文章をエクセルに挿入したいのです。 １．あいうえお 　　あいうえお 　　あいうえお そのままコピーしてエクセルに貼り付けたら 一つのセルには入らず3行分にまたがってはいりました。 セルの結合をするのかしら？と思って結合したら1行目の「１．あいうえお」が真ん中に残って ２，３行目の文字が消えてしまいました。 このような文章をこのままの状態で一つの列の一つの行（Ａ列1行目など）に入れるには どのようにすればできるのでしょうか？

  • 1行テキストをエクセルの複数行にまたがってペースト

    テキスト・エディタで書いた1行の文章を、エクセルの複数行にまたがってコピー＆ペースとしたいのですが、どうしたらいいでしょうか？ エクセル側の書式が定められていて、そこに文章を書く必要があるのですが、長文なのでエディタで執筆しました。そのままコピペすると1セル内に入ってしまいます。エクセルになったときの改行箇所が分からないので、そこにタブやコンマを挿入することもできません。セルを結合すると指定の書式と変わってしまうので、それもできません。 何か良い方法はないでしょうか？

  • VBAでのセル範囲指定について

    お世話になります。 私が分からないのは、ＶＢＡでのセル範囲指定なのですが、 例えば、シートにデータが有、そのデータの１行目は見出しなので ２行目からデータが入っているセルまでの範囲を指定、コピーして 隣のシートに貼付したいのですが、そのデータの入力される範囲が 毎回違います。「CurrentRegion.Select」としてしまうと、１行目 の見出しまでも範囲指定されてしますので、どうやったら良いのか どなたかお教え頂きたく宜しくお願い申し上げます。

  • エクセルVBAでコピーすると行の高さが低くなる

    いつもお世話になってます。 エクセル２００３のVBAで、セルの範囲を指定してコピーすると行の高さが低くなってしまいます。その他の書式は、変化せずうまくコピーできています。以下がプログラムです。 Sub copy_hyou() Worksheets("sheet1").Activate Range("A1:K24").Copy 'セルA1からK24をコピーします。 Range("A25").Select 'A25からペイストします。 ActiveSheet.Paste End Sub どう直せば、行の高さもコピーできるでしょうか？ お休み中すみませんがよろしくお願いいたします。

  • Excelでコピーした行の挿入を繰り返すには

    Excelで行をコピーして、別の行で右クリックして コピーしたセルの挿入 を行うと、コピーした行を挿入できます。 しかし、一度　コピーした行を挿入すると、 もう右クリックしても 「コピーしたセルの挿入」はありません。 コピーした行の挿入を繰り返すには、どうすればよいですか。 Excel2000です。

  • コピペして元のセルに戻るVBAについて

    VBAのことで質問させていただきます。 エクセルのバージョンは2010です。 ３行目から１００行目までの間にカーソルがあった場合、その行のA列に異動し、 その値をコピーし、A２のセルに貼りつけ、コピーしたセルに戻る、というVBAを 作れたらと思っているですが、可能でしょうか？ VBAは本を読んでかじったりはしているのですが、自分では組めないんです。 狩野であれば、どなたかよろしくお願いいたします。

  • EXCEL（VBA）で1行おきに行を選択する方法

    こんにちは。VBAは苦手なので教えてください。 EXCELのsheet1にあるリストに、下記マクロで1行おきに 空白行を挿入しました。 Sub test1() '隔行で空白行を挿入 Dim rw As Long 'セル For rw = Range("A1").End(xlDown).Row To 2 Step -1 Rows(rw).Insert Next End Sub 同じファイルのSheet2の1行目<Rows("1:1")>に、計算式が入力されています。 マクロで挿入した空白行全てを選択し、そこへSheet2の1行目のコピーを 貼り付けたいです。 ぜひ、良い方法を教えてください。

  • Excel VBAでの関数の使い方を教えてください

    いつもお世話になっております Excelシートのあるセルに、 =COUNTIF(K321:K336,"○") のような関数を挿入してあります。 行挿入する毎に、K321:K336の範囲指定部分を １つずつ増やしていきたい（k322:k337のように・・）のですが VBAでは、どのように記述すればよいのでしょうか よろしくお願いします

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

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

質問する