- ベストアンサー
エクセルのマクロについて教えてください
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
- ベストアンサー
Cells(Selection.Row+1,Selection.Column).Select かな？
その他の回答 (1)
- sumjji
- ベストアンサー率66% (10/15)
セルをひとつダウンさせるとは、現在のアクティブセルから一つ下のセルをアクティブセルに変更するという意味で、大丈夫でしょうか？ でしたら、 ActiveCell.Offset(1, 0).Select で出来ると思います。 もし私の勘違いでしたら、ごめんなさい。 参考までに、エクセルの使い方が載っているサイトを紹介します。 http://na5.blog101.fc2.com/
お礼
ありがとうございます！！！ できました！！！ サイトもチェックしますね！ 本当に助かりました。ありがとうございました。
関連するQ&A
- Excelマクロ
Excelマクロで1行が選ばれたかを判定したいのですが セルであらわすとCells（0,1）と（0があるのかわかりませんが）なるところがセレクトされているかを知りたいです 誰か教えていただけるとうれしいです
- ベストアンサー
- その他（プログラミング・開発）
- エクセル・マクロの悩み 助けて下さい！
便利なのでマクロをいろいろと活用していますが、 今、行き詰っている部分があります。 エキスパートの方、お助けくださいませんか。 【困りごと：JPEG 請求管理の画面とマクロ 参照】 毎日、1行の請求書を作成・印刷します。(左上） その1行を、毎日、日計表にコピーするのですが、 次に日、1行下にコピーするマクロで、行き詰っています。 一つ下の行に移行するために、見出し(i4 商品名）のセルに行き、end+downで 最終行（i13)に行き、もう一度、downを押して、1行下(i14)に行きコピーします。 これを、「マクロの記録」で、登録しますが、実際のマクロの 登録内容は、end+downの次が、今止まっているセル(i13)を選んだ状態になります。 つまり、(例)10日の新しい記録を1行下(14の行）に入れたいのに、 9日の行(13の行)に、上書きしてしまいます。 Selection.downとなってほしいのですが、 downの記録が、Range("i13").Select となってしまします。 ※ 下矢印で、Selection.downというマクロはないようです。 別のやり方があればと考えたのですが、うまくいきません。 どなたか、良いアイディアをお聞かせいただけませんでしょうか？ どうか、よろしくお願い申し上げます。
- ベストアンサー
- Excel（エクセル）
- エクセルマクロのコードを隠す
とあるExcel2003で開けるxlsファイルを貰いました。 セルに値を入力すると、セルの背景の色が変わります。 そういうマクロを組んでいるんだと思ったのですが、 シートに対して「コードを表示する」で見ても何も書かれていません。 プロジェクト欄にはこのシートと[ThisWorkbook]しかなく、 [ThisWorkbook]にも何も書かれていません。 組んだマクロのコードを何かして隠しているのでしょうか？ それともエクセルの設定でそのようなことが可能なのでしょうか。
- ベストアンサー
- オフィス系ソフト
- エクセルマクロ 「１０１」 ボタンをおして 「１０２」となるマクロ？
エクセルです。 一つのセル（Ａ４）に「１０１」と書いてあります。それをVlookup関数で他のシートから一致する情報を取り出しています。次に同じセルに「１０２」とうつと、同じように一致する情報を取り出しています。 そこで、一回、一回、セルに１０２や１０３と打つのではなく、ボタンを押すと次の番号にうつるようなマクロを組みたいと思ってます。 ただ、１０１～１３０ 次は、２０１～２３１みたいになってます。 一つのマクロでなくても良いので、よろしくお願いします。 最初は、 Range("A4").select セルＡ４を選択 だと思うのですが、この次から分かりません。
- ベストアンサー
- その他（プログラミング・開発）
- エクセル2000マクロで行を削除したいのですが
エクセル2000で、社員台帳から特定の人物だけ削除しようと思いマクロを 組んだのですが、どうもうまくいきません。 社員には全員00から99の2桁のコードがついています。（列Ａにあります） 2桁のコードが00の人物だけ削除したいのですが。 次のようなマクロを組んだのですが、どこがおかしいのでしょうか？ とりあえず、20行程度処理しようと思います。 Range("A2").Select For Each セル In Range("A2:A20") If セル = "00" Then Selection.EntireRow.Delete Next
- ベストアンサー
- オフィス系ソフト
- EXCEL マクロ
エクセルマクロ初心者です。 エクセル2007で、複数選択したセルの合計値・平均値をコピーできないか悩んでいます。作業によって、選択するセルが変わりますので、セル番地の指定をせずにマクロの書くことができますでしょうか。 イメージとしては、複数のセルを選択をしたときに、ステータスバーにオートカルクで表示される合計値・平均値をクリップボードにコピーし、別のセルに結果をペーストする感じ（ペーストする際に合計値・平均値のどちらを貼り付けるか選択できれば尚、良）です。 個人用マクロブックに登録して、不特定ブックで使用したいマクロです。よい方法があれば教えて下さい。
- 締切済み
- その他MS Office製品
- エクセルマクロで教えてください
エクセル2003です。 自動マクロで下記のようなマクロを造ったんですが Selection.End(xlDown).Select Range("A29:D29").Select ■A29を止まったセルの番号にしたいのです。（Ａ**からＤ**まで） With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With Selection.Merge Range("A30").Select ■A30を止まったセルの番号にしたいのです 以上2箇所の指定を教えていただけますでしょうか。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセルのマクロで
エクセルのマクロで自動で記録させることしかできないド素人です。マクロで置換をしたいのですが、普通の置換ではなく例えば一枚目のシートのあるセルに花子さん、２枚目シートのあるセルに太郎さん、そのとなりのセルに次郎さんというようになっていたとします。これをマクロで花子さんを置換して太郎さんとその隣に次郎さんもくるようにしたいのですが可能でしょうか。または置換だと1つのセルに対して２つのセルは無理かもしれないので、ある条件の時に（太郎さんの時に）隣に次郎さんが貼り付けられるようにする方法はありますか。今までは手動で花子さんのところに太郎、次郎の両方のセルをコピーで貼り付けていました。これを多数の置換を登録してマクロにすればとても便利なのですがこのようなことは可能でしょうか。
- ベストアンサー
- オフィス系ソフト
- エクセルで線の太さと色を変えるマクロ
マクロ初心者です。ご教示願います。 エクセルのマクロで選択した任意のセルに●→を引くマクロを組みましたが、 線の太さと、色を変えるコードをどこにどう入れたらいのか教えてください。 Sub 線を引く() Dim TP, LF, WD TP = Selection.Top + (Selection.Height / 2) LF = Selection.Left WD = Selection.Width ActiveSheet.Shapes.AddShape(msoShapeOval, LF, TP - 3, 6, 6).Select ActiveSheet.Shapes.AddLine(LF + 6, TP, LF + WD, TP).Select
- 締切済み
- オフィス系ソフト
- Excel マクロについて
Excelで、セルを選択して、マクロを実行すると、その選択したセルに赤マル（オートシェイプの）がはいるようなマクロをつくりたいのですが・・・。まだ、マクロは使ったことが無いもので・・・。詳しくお願いします。
- ベストアンサー
- その他MS Office製品
お礼
ありがとうございます！！！ すぐに使えました！！！ 本当に困っていて本当に助かりました！ 感謝いたします。 ありがとうございました！