- ベストアンサー
マクロで行の別シートから追加をする
jpk1001の回答
- jpk1001
- ベストアンサー率42% (3/7)
すみません。まず別件ですが前記のだと１行余計に挿入されていたかも。 InsertRow = Range("A4").Value + StartRowのところ InsertRow = Range("A4").Value + StartRow - 1にしたほうがよいかもです で、エラーの件ですがちょっとよく分かりません。 マクロ実行とボタンからの実行が違くなるのが理解できません・・ 上記修正前だと両方２ということは挿入行が0行が指定されていることに なるのですがそれでもエラーにはならない気がしますし。 回答できずすみません。
関連するQ&A
- 任意の１行を選択していないと実行できないマクロ
教えてください。 任意の行番号をクリックしてまるまる１行選択してから、「切り取る」「別のシートに挿入、貼付ける」というマクロを実行しています。 1行選択していないとそのマクロを実行できないという風にするにはどのようなコードを書けばよいでしょうか？ 選択する行番号はその都度違います。 欲を言えば、間違った選択でマクロを実行した時にエラー表示が出ると大変ありがたいのですが… どうかよろしくお願いします。 使用するエクセルは97です。
- ベストアンサー
- オフィス系ソフト
- 選択中の行に「行」を挿入するマクロ
エクセルのいちばん左（1から数字が縦に並んでいるところ）の任意の 数字を選択してその行を全選択しておいた状態でマクロを実行すると、そこに1行挿入するプログラムを教えてください。
- 締切済み
- Visual Basic
- 非表示行のあるシートにexcel マクロで罫線
任意に非表示行が含まれているワークシートがあります。 これに罫線を引くのですが、表示行で５行ごとに太い横線にしたいと思います。 含まれる非表示行数によって太線の入る位置が変わってきます。 これをマクロで行うにはどのようにしたらよいのでしょうか。
- ベストアンサー
- Visual Basic
- エクセル マクロ 行
エクセル マクロについて Sheet１にはボタンがあり そのボタンをクリックすると フォームが表示してそのテキストに記入して、記録ボタンを押すと Sheet１最終行のフォームからシートにコピーするボタン方法は出来るのですが・・それだと最終行が新しい記載になってしまいます。 Range("a65536").End(xlUp).Offset(1).Select Selection = Selection.Row - 1 例えば A１ タイトル A2 小項目 A3 挿入させたい！ A列の3行目から挿入して、その後も常にA３から挿入したいです。 新しい記載は常にA3にさせたいのですが、どうすれば良いのでしょうか？記述を教えて下さい。
- ベストアンサー
- オフィス系ソフト
- EXCEL2010 マクロにつきまして
excel vbaでマクロが作りたいのですが、まったくの初心者で 試行錯誤していますが、なかなか出来ずに困っています。 どなたか、教えていただけませんでしょうか。 ○sheet１ --日付---|A-B-C -------------------- 2013/1/20|1 2 3 2013/1/21|4 5 6 2013/1/22|7 8 9 2013/1/23|5 4 3 2013/1/24|4 5 6 2013/1/25|4 4 4 2013/1/26 ・ ・ ・ ○sheet２ 実行ボタンを作成 日付を入力して実行ボタンをクリックすると指定した日付のデータが抽出される 例 2013/1/22 → 実行 A B C ------- 7 8 9 このようなマクロを組みたいのです。 わかりづらくて申し訳ありません。 また、初心者向けのおすすめの参考書や、ホームページがありましたら 教えて頂けると助かります。
- 締切済み
- その他MS Office製品
- EXCELで切り取った行を別シートに挿入
EXCELである行を選択して切り取り、同一シート内の任意の場所に挿入すると 元の行は自動的に削除されます。 しかし、別シートに挿入した時は、元の行は削除されず、わざわざ その行を削除する、という操作が必要となります。 そこで質問なのですが、別シートへの挿入を一つの操作で行う方法はないでしょうか？ また、その方法がない場合、それはEXCELの何らかの仕様を反映しているのだと 思いますが、それはどのようなものでしょうか？ よろしくお願いします。
- 締切済み
- オフィス系ソフト
- excelでシート：何行あるのか
excelでシート内行数が数千のデータを扱うとき、ぱっと何行あるのか、 或いはぱっと最終行に移動できるとかどちらでもいいが、そのような方法あれば教えて。 マクロを使っても、式を使っても可です。
- ベストアンサー
- オフィス系ソフト
- Excelのマクロで別のシートに追加する方法
入力するためのシート1からデータをためるためのシート2に入力するものをマクロのボタンでできるようにしたいのですがどのようにマクロのVBA打てばいいのか分からないので教えて下さい。 したいことは、データ４列でシート1の1行目は項目の行にして、 2行目にデータを入力する。 入力したデータを切り取って、シート２の２行目に張り付けて 次のデータをシート１の２行目に入力して 同じように切り取って次は３行目、４行目…というマクロ作りたいんです。 どなたかお願いします
- ベストアンサー
- その他(データベース)
- [エクセル]行の挿入、シート間で連携できますか？
こんにちわ。 販売管理をエクセルで行っております。 その際にちょっと出来ないかな？？と思うことが出てきましたので書き込みました。 たとえば、新規作成のＢｏｏｋでＳｈｅｅｔ１～３があります。 やりたいことは、 Ｓｈｅｅｔ１の４行目と５行目の間に２行を挿入した場合、連携してＳｈｅｅｔ２やＳｈｅｅｔ３の４行目と５行目のように同じ箇所に同じ追加した行数分、挿入されて欲しいわけです。 ちょっと説明が難しいな・・・、言いたいこと伝わってますかね？？ これが出来たらすっごい効率Ｕｐなんですが・・・出来ませんか？？
- ベストアンサー
- オフィス系ソフト
- 保護をかけているシートでマクロが実行できない
行挿入マクロを使用した製品管理表を作成しましたが、シートの保護をかけて行挿入マクロを実行すると「RangeクラスのInsertメソッドが失敗しました」と出ます、シートの保護を外すと実行されます。保護をかけたシートはマクロを実行できないのか、マクロ文が間違っているのかわかりません。ご教授下さい。 表は抜粋ですが以下のとおりで、１５行目に行挿入マクロを実行する表作成のマクロです。 E15にはIF文が含まれています。 A B C D E F 14 空白 納入日 使用日 納入数量 使用数量 使用m 15 マクロ文は、以下のとおりです Sub 行挿入() ' 行挿入 Macro m = Cells(15,5).Formula Range("A14:G15").Insert copyorigin:=xlFormatFromRightOrBelow Cells(15,5) = m End Sub
- ベストアンサー
- その他（ITシステム運用・管理）
お礼
何度も回答ありがとうございます。 おかげさまでできました。 本当にありがとうございました。