- ベストアンサー
Excelのマクロで1個右のセルをセレクト
セルa1をセレクトしてますが、そのマクロを使えばb1をセレクト、そこからマクロでc1をセレクト…とマクロを使うごとに1個右をセレクトするようにするには、マクロにどう入力したら良いでしょうか？ キーボードの「→」で記録すると今セレクトしてるセルにしか移動できません。 どなたか知恵をお貸し下さい。
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
関連するQ&A
- エクセル VBAマクロ セルの単純移動
基本的な質問ですが、よろしくお願いします。 エクセルのVBAで、Selectセルを１つだけ上下左右に移動させることを ”汎用的に書く”としたらどのようにすれば良いでしょうか？ 例えば、Selectセルを一番上や、一番下、へというのであれば、 Selection.End(xlUp).Select Selection.End(xlDown).Select 一番右や、一番左なら、 Selection.End(xlToRight).Select Selection.End(xlToLeft).Select のように書いて、実行できます。 それでは、今いる所のすぐ隣りのセルへ移動させるということを 同じように表現するには、どのようにしたら良いでしょうか。 事の発端は、 マクロの自動記録を使って、セルを移動していっても、 Range("A1").Select Range("B1").Select Range("B2").Select Range("C2").Select Range("C3").Select : のように、絶対セル位置で記録されてしまうため、 同じような処理を順に隣りや後の行・列に向かって繰り返すような処理を 書こうとしたときに、汎用的には動いてくれないところからです。 参考になるページを自力では見つけられませんでした。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセル マクロ 見つけてセレクトする！
超初心者です。よろしくお願いします。 セルA1～A100の間の最小値を見つけて、その最小値のすぐ右側のB列のセルをセレクトするまでのマクロを作成したいです。 どのように記述したらよいでしょうか。
- ベストアンサー
- その他MS Office製品
- ＥＸＣＥＬでセルを飛ばせる？
ある作成済みの表で、定数などを入力するセルだけにセルを移動（ＴＡＢキーを押すと、そのセルだけを移動するような）させることができますか？特定のセルをロックする方法は知っているのですが、それだと、書式の変更などもできなくなるものですから・・マクロでは、できるかなーと思いますが、マクロのことは、さっぱりわかりません。ご存知の方、宜しくお願いします。 Ａ Ｂ Ｃ １ 数 数 式 ２ 数 数 式 この場合、セルがＡ１、Ｂ１入力後は、Ａ２、Ｂ２とセルが移動するという感じです。
- ベストアンサー
- オフィス系ソフト
- Excel2007 セルの移動
セルに数値を入力しています。 A1 B1 A2 B2 と2行2列のセルに数字を拾い入力します。 セル移動は右と指定してあります。 B1入力後A2へ移動する際方向キーやマウスを使わず 左下移動するショートカットキーはないでしょうか？ マクロも記録程度ならできますので ご教授いただきたいです。
- ベストアンサー
- オフィス系ソフト
- エクセルの「新しいマクロの記録」で相対的にセルを指定するには？
基本的にマクロの知識はなく、「新しいマクロの記録」で記録したものを使うことしかできないレベルです。 現在カーソルがあるところをＡ１のセルとします。 マクロの記録を開始して、Ｂ１を指定し、計算式等を 入力します。で、マクロの記録を終了します。 希望としては、現在Ａ２にカーソルがある状態で マクロを実行すると、Ｂ２に同様の計算式が入力されて 欲しいのですが、そのままやってしまうと、再度Ｂ１に データが入力されてしまいます。 どこかに相対的にセルを指定できるようなオプションが あったと記憶しているのですが、探し出せません。 ご存じの方教えてください。
- ベストアンサー
- オフィス系ソフト
- Excelでマクロを使いセルの内容をコピー貼り付け
A1セルに111と入力してあるとします。 この時B1にaaa111aaaと入力するマクロを作りたいです。 A1に222があるとB1はaaa222aaaと入力したいです。 これをマクロで作ったのですが、次のようになり、A1の内容にかかわらず常にaaa111aaaとなってしまいます。 Sub Macro1() Range("A1").Select ActiveCell.FormulaR1C1 = "111" Range("B1").Select ActiveCell.FormulaR1C1 = "aaa111aaa" Range("B2").Select Application.Goto Reference:="Macro2" End Sub これのいらない行を削除し、コピーはA1の内容となるように修正して次のようにしました。 Sub Macro1() ActiveCell.FormulaR1C1 = Range("A1") Range("B1").Select ActiveCell.FormulaR1C1 = "aaa111aaa" Application.Goto Reference:="Macro2" End Sub まだペーストするときにA1の内容とならず直接入力となっています。 これをどう変更すればいいでしょうか？
- ベストアンサー
- オフィス系ソフト
- Excelで渦巻状にセルを移動するマクロを作りたいのです
マクロで渦身状＆時計回りにアクティブセルを移動させるにはどのように 記述したらよいでしょうか。 例えば、E16を選択しているときにマクロを実行したら E16→D16→D15→D14→E14→F14→F15→F16→F17→E17→D17→C17→… と移動していく感じです。 キーボード記録マクロで[↑][↓][←][→]キーで移動してみても何も記録 されなかったので、移動→黄色に塗りつぶし、という繰り返しを記録 してみると、文末のようにはなりました。が、渦巻き状に移動という アルゴリズムがさっぱり思いつきません。 無限でなく、例えば１０周くらいまわれば十分です。 最終的には、移動するごとに、踏んだセルの値を評価（1だったら赤に塗る、 のように）していきますが、まずは選択セルを基点に渦巻状にセルを移動 する方法が知りたいです。 よろしくお願いします。 Sub Macro1() With Selection.Interior .ColorIndex = 6 .Pattern = xlSolid End With Range("E16").Select With Selection.Interior .ColorIndex = 6 .Pattern = xlSolid End With Range("D16").Select With Selection.Interior .ColorIndex = 6 .Pattern = xlSolid End With ' ■中略■ Range("C17").Select With Selection.Interior End Sub .ColorIndex = 6 .Pattern = xlSolid End With （ちなみに） エクセル上に、日本地図が碁盤目状に描かれています。 セルには、平野＝１、山＝２、海＝３のように記述されています。 これを特定法則で塗り分けるのに利用します。
- ベストアンサー
- オフィス系ソフト
- エクセルでマクロの記録が出来ません。
エクセルでマクロの記録が出来ません。 エクセルのＡ列とＢ列に1,000行のデータがあります。 マクロの記録を起動します。 １．Ｂ１セルを選択 ２．右クリックで挿入を選択 ３．Ａ列とＣ列にデータが有り、Ｂ列は空白となる。 ４．Ｂ１セルを選択します。右クリックの貼り付けを選択。 マクロの起動前にクリップボードにあらかじめコピーしておいた 以下の式を貼り付けます。 =IF(A1="","",IF(ISERROR(FIND("-",ASC(A1))),IF(LEFT(ASC(A1),1)<>"9",MID(A1,1,3) &"-"&MID(A1,4,5)&"-"&MID(A1,9,2)&"-"&MID(A1,11,2)&"-"&MID(A1,13,2),IF(LEFT(ASC(A1),2)= "9X",MID(A1,1,3)&"-"&MID(A1,4,11),IF(LEFT(ASC(A1),1)="9",MID(A1,1,5)&"-"&MID(A1,6,5)& "-"&MID(A1,11,2)&"-"&MID(A1,13,2),""))),IF(FIND("-",ASC(A1))=6,A1,MID(A1,1,3)&"-"& MID(A1,4,11)))) ５．「Ctrl」＋「Ｃ」 ６．エクセルの左上の名前ボックスを B1 → B1:B1000に変更。Ｂ列が選択されます。 ７．「Ctrl」＋「Ｖ」 ８．Ｂ列に式で変換されたデータが入りました。Ｂ列が選択されたままです。 ９．「Ctrl」＋「Ｃ」 １０．右クリックで形式を選択して貼り付けで「値」を選んでＯＫをおす。 セルに入っていた式は全て消えました。Ｂ列が選択されたままです。 １１．マウスポインタをセルのＡ１におく。Ｂ列の選択が解除されました。 マクロの記録を終了 これでＮＯ．４の操作の時に「記録できません」と表示されます。 データを一旦削除し、再度、Ａ列とＢ列にデータを入れて マクロを実行してもデータＢ列がＣ列に移動しＢ列は空白です。 実際にマクロの記録中でもＮＯ．１からＮＯ．１１の操作は出来ています。 なぜ記録されないのでしょうか？ どうすれば記録できますか？ よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセル マクロ VBA について
以下はセルB2.C2.D2.E2.F2をアクティブセルから右方向へ入力しています。ここでの入力とは"=" + "セルB2" というものです。一つずつ入力している為マクロが長くなります。短くシンプルなものにしたいです。ご教示お願いします。 ActiveCell.FormulaR1C1 = "=R2C2" ActiveCell.Offset(0, 1).Select ActiveCell.FormulaR1C1 = "=R2C3" ActiveCell.Offset(0, 1).Select ActiveCell.FormulaR1C1 = "=R2C4" ActiveCell.Offset(0, 1).Select ActiveCell.FormulaR1C1 = "=R2C5" ActiveCell.Offset(0, 1).Select ActiveCell.FormulaR1C1 = "=R2C6"
- ベストアンサー
- オフィス系ソフト
お礼
できました。 早速Offsetプロパティ調べてみます。 ありがとうございました！！