• ベストアンサー

選択されている複数のセルに値をプラス/マイナスする方法

「マクロ」で選択されている複数のセルに値をプラス/マイナスするにはどうしたらいいでしょうか? Excel2000です。 (たとえばA2が20だとして、ここに10を追加して30にしたり、10を減らして10にしたりしたいという意味です)

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

  • ベストアンサー
  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.1

質問の意味を明確に。 >選択されている複数のセル たとえば、A1,A2,A3とします。 >ここに10を追加して30にしたり、10を減らして10にしたりしたいという・・・ A1,A2,A3のどれにも、一律の10を加えたり、または10を減らしたりしたいのでしょうか そういう話なら Sub test01() Dim cl As Range For Each cl In Selection cl = cl + 10 Next End Sub を標準モジュールに貼り付け、範囲指定して、実行すればよい。 しかしVBAでやらなくても、形式を選択して貼り付け、加算などで できてしまうことです。

関連するQ&A

  • エクセル マイナスの値を同一セルにプラスに表示させる方法

    エクセルについての質問です。 マイナスの値を同一セルにプラスに表示させる方法がわからないです。 例えば、A1に-2、B1に-3、C1に-4とあるとします。 これをA1に2、B1に3、C1に4としたのですが、どのようにすればよろしいでしょうか? お願いします。

  • VBAにて複数選択したセルの値に選択した値の追加

    いつもこちらではお世話になっております。 現在VBAにて機能実現において、つまずいております。 複数選択したセルの値の後ろに、プルダウンから選択した値を追加したいと考えております。 値は追加できるのですが、選択を開始したセルの値が他のセルにも反映されてしまうという状況です。 それぞれのセルの値にプルダウンから選んだ値を追加しようと思えば、どのような方法で行えばよいでしょうか? よろしければご教授お願いいたします。 Private Sub Worksheet_Change(ByVal Target As Range) Dim a As Integer If Target.Address = "$B$1" Then Application.EnableEvents = False a = Cells(1, 2).Value Selection.Value = Selection.Value & a Cells(1, 2).Value = "" Application.EnableEvents = True End If End Sub 以下の画像は、実現したい画面のイメージと現在の状態です。

  • エクセル2003・プラスをマイナスにしたい

    エクセルで、セルにプラスの値を入力するとマイナスになり、それは表示だけでなく実際に数値としてマイナスにしたいのです。つまり、そのセルを計算したり関数を使用した場合、マイナス扱いとなるようにしたいのです。 できれば、セルの書式設定でできないでしょうか?よろしくお願いします。

  • 指定の値をもつセルにジャンプ(選択)

    指定の値をもつセルにジャンプ(選択) いつもお世話になっております。 Excelを使っていまして、ふと疑問になり質問しました。 Excelのジャンプ機能の中で【空白セル】を指定できますよね。 この場合、選択領域内の空白セルが全て選択された状態で結果が返されるのですが、 これと同じような結果を【空白セル以外で】受けることはできないのかと思いました。 ?選択領域内の【指定の値をもつセル】にジャンプし、該当するセルを全て選択した状態にできないのか? 特に【=0】ぐらいは指定できてもよいのではないかとむしろ疑問になったのです。 愚考するに、[全て置換]で空白セルに書き換え、[ジャンプ]で選択する方法があるでしょう。 しかし、この方法の欠点として、選択後にはセルの数式が消去されてしまうことが挙げられます。 マクロを用いず、Excelに備わっている方法で上記のような複数セルの選択は実行可能なのでしょうか? 宜しくお願いします。

  • excelで1つのセルに複数の値を返す方法はありますか?

    おせわになっております。 excelで質問です。 excel関数でもVBAでもいいのですが、1つのセルに複数の値を返す方法はありますでしょうか?? たとえばVLOOKUP関数だと1つのセルに1つしか返せませんよね?? a=りんご b=バナナ c=すいか d=いちご e=キウイ と設定したしたとして、 a,c,dと入力すると→りんご,すいか,いちご とすべて1つのセルに出るようにしたいのです。りんご,すいか,いちごという値にしたいので、それぞれを別々のセルに入れることはしたくありません。可能でしょうか?? よろしくお願いいたします。

  • 複数セルの入力内容で異なる値を返すマクロ

    次のようなマクロってどのように組めばいいのでしょうか。 例えば,A1のセルに「あ」B1に「1」C1に「2」が入力されているときにはD1に500を返す。A1に「い」B1に「2」C1がブランクのときにはD1に250を返す,のように複数のセルの入力内容によって異なる値を返したいのですが,このようなマクロってどのようにすれば組めますか。 マクロの初心者です。

  • 1つのオブジェクトに複数のセルの値を表示させるのはどうやったらいいので

    1つのオブジェクトに複数のセルの値を表示させるのはどうやったらいいのでしょうか? やりたい事: 添付ファイルの選択されているオブジェクトの式に 『=A1:C1』と書かれていてA1~C1の値『2 3 4』が表示されています。 (コピーして作成した為作り方が分かりません) やってみた事: オートシェイプの四角形を作成し式に『=A1:C1』を入れて見た所A1の値の『2』のみが表示されてしまいます。 (選択されていないオブジェクト) 上記の様に一つのオブジェクトに複数のセルの値を表示させるにはどうしたらいいのでしょうか?

  • 特定の値のセルに罫線を引くマクロ

    Excelのマクロの質問です。 セルの値が特定の値の時に太枠の罫線でそのセルのみを囲むマクロを作りたいのですが、どのように記述したらよいのでしょうか? 10×30ぐらいの範囲に複数個該当セルがあります。 値は「休」、「土」などの漢字です。

  • セルの数値を、まとめてプラスマイナス反転させる方法ないでしょうか?

    ある計算表を作ったのですが、出来上がったあとにプラスとマイナスを逆に計算していたことに気付きました。 現在プラスの数値をマイナスに、マイナスの数値をプラスに一括して変換する方法はないでしょうか? すべてのセルにマイナス1をかければと思ったのですが、やり方がわかりませんでした。 計算表には計算式などは残っておらず、セルには数値のみが記入されています。 何か良い方法をご存知の方がいらっしゃいましたらよろしくお願いいたします。

  • 複数のセルの選択ができない

    エクセル初心者で本当に初歩的な質問です。 エクセルを起動させ、セルを複数選択しようと思いドラッグをしたのですができません。何かロックがかかっているのでしょうか? 教えてくださいお願いします。

専門家に質問してみよう