- ベストアンサー
エクセルのマクロですが
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
標準モジュールに下記を貼りつけ、実行するはどうですか。 Sub Macro1() r = Selection.Row c = Selection.Column Range(Cells(r, c), Cells(r + 10, c)).Select End Sub
関連するQ&A
- Excel 2000で
それを実行すると、現在選択しているセルから99行下のセルまで を選択状態にするマクロを教えて頂きたいのですが。 A1を選択している時は、A1からA100までが選択状態になります。 また、そのマクロをボタンにしてツールバーに貼り付けることは可 能でしょう。可能でしたら方法を教えて下さい。 お願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルで連番をマクロで
こんにちは いつもお世話になっています。 Windows7、エクセル2010で教えてください。 B3から仮にB100まで文字列があるとします、空白セルはありません。 この状態でA3からA100まで１から始まる連番をマクロで実行したいのです。 実際はB列のデータの最終行は不定です。つまり、B列にデータがなくなるまで（空白セルになるまで）A列に連番をつけたいのです。現在はA3,A4に１，２と入力し、オートフィルで該当セルを選択し「予測」で連番をつけています。 マクロ記録ではB列にデータがなくなる判断ができなくて作れません。 この作業が頻繁にあるものですからマクロができれば助かります。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセル/マクロ/セルの選択について（初心者です）
最近マクロ機能を使い始めた初心者です。 マクロの記録を使い、ちょっとだけVBEで触っています。 以下のような場合、なんと記述すればよいでしょうか？ 詳しい方にはとても簡単だと思われ、お恥ずかしいですが、 教えていただけましたら幸いです。 【実現したい内容】 あるセル範囲を指定している時に、実行すると、 指定していた範囲の行の、A列のみが選択される ※例えばB1:B3、またはC1:C3、またはD1:E3 のをセル範囲を選択している時に、マクロを実行すると いずれの場合もA1:A3を選択する。 表現が分かりにくいでしょうか…？
- ベストアンサー
- オフィス系ソフト
- コピーのマクロ（エクセル）
同一行で、データが入力されている連続した複数のセルの一部のセル(複数の時も有り)を選択状態にして実行した時に、選択状態になっているセルが含まれる連続したセルをコピーして指定位置に貼り付けるマクロとして以下を試してみましたが、うまくいきません。 どこが間違っているのでしょうか？ a = ActiveCell.CurrentRegion.Column ActiveCell.CurrentRegion.Copy Destination:=Cells(30, a)
- ベストアンサー
- オフィス系ソフト
- 【再】エクセル2013 マクロをご教示ください
Sheet1で選択しているセルの行をSheet2に転写したいです。 Sheet1とSheet2の4行目に見出し。 Shet1にはA～U列までデータがあります。(途中空白セルの場合もあり) Sheet1の5行目以降の、あるセルを選択してマクロを実行すると Sheet1のC～S列までをSheet2のA～Q列へコピペしたいです。 Sheet1は H列に必ずデータがあるので それらを最終行の判断基準とします。 Sheet1での選択セルは複数の場合もあります。 ただし、同じ行のセルを複数選択しても Sheet2への貼り付けは1行とします。 マクロを実行する度に、Sheet1での選択セルの該当行が Sheet2へ追加されるようにしたいです。 (Sheet2へコピペされたデータは残します) また、Sheet2への貼り付け内容が同じだった場合は 注意喚起のため メッセージで 「重複データが存在します」を表示したいです。 重複の判断基準はSheet2の B、D、F列とします。 宜しくお願い致します。
- ベストアンサー
- Excel（エクセル）
- Excelマクロ：選択したセルに通し番号を入れたい
任意のセルを選択している状態で、マクロの実行をすると左上から下へ、一番したへ来たら次の行の一番上から通し番号を入れるというマクロを作りたいのですが、どのようなコードを書けば良いのでしょうか？
- ベストアンサー
- Excel（エクセル）
- 「新しいマクロの記録」機能を使っての行挿入
「新しいマクロの記録」機能を使って１行と２行の間に10行の空白行を挿入後、A13のセルを選択というマクロを作りました（マクロ１とします）。このマクロを実行すると１行と２行の間に10行の空白行が挿入された後、A13が選択されます。ここでもう一度、マクロ１を実行すると１行と１２行の間にさらに空白行が10行挿入されA13が選択されます。このようになるのは当たり前と言えば当たり前なのですが、２回目にマクロを実行したときに12行と13行の間に10行の空白行が挿入された後、A24が選択されるようにするには、どのようにマクロを記録すればよいのでしょうか？ ようは、１０行の空白行を挿入した後、セルを１１行下に移動させるというマクロを作りたいのです。ＶＢＡの記述方法はほとんど分からないので「新しいマクロの記録」機能を使うことを前提にご教授ください。
- ベストアンサー
- オフィス系ソフト
- Excel マクロについて
Excelで、セルを選択して、マクロを実行すると、その選択したセルに赤マル（オートシェイプの）がはいるようなマクロをつくりたいのですが・・・。まだ、マクロは使ったことが無いもので・・・。詳しくお願いします。
- ベストアンサー
- その他MS Office製品
- エクセルのマクロについて
エクセルのマクロ実行についてですが、 例えば、 E1セルの値が1ならばこうする（マクロ名 E1セル1） E2セルの値が2ならばこうする（マクロ名 E1セル2） E3セルの値が3ならばこうする（マクロ名 E1セル3） というマクロを別々に作りました。 これをボタンで実行する時に、 If Range("E1").Value = 1 Then ElseIf Range("E1").Value = 2 Then 2行目には作ったマクロを全部貼り付けないといけないのでしょうか？ それとも簡単にこの場合は、マクロ名E1セル1を実行するという命令することができるのでしょうか？ できるのであれば、入力方法を教えてください。 質問が分かりにくいと思いますが、よろしくお願いします。
- ベストアンサー
- Windows XP
お礼
ありがとうございました。