G5からI23に数値が入っています。
ここの範囲に一気に(-2)をかけたいのですが、
Workbooks(fileA).Worksheets(sheet1).Range("G5:I23")*(-2)
としてもダメでした。
セル1つ1つにかけるならforなどの方法は重いつきますが、範囲に一気に
かけるにはどうすればよいでしょうか?
よろしくお願い致します。
気になる質問をクリップする
クリップした質問は、後からいつでもMYページで確認できます。
またクリップした質問に回答があった際、通知やメールを受け取ることができます。
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
回答7件
0
ベストアンサー
Evaluateを使えばどうでしょうか。
vba
1With Workbooks(fileA).Worksheets(sheet1) 2 .Range("G5:I23").Value = .Evaluate("G5:I23*-2") 3End With
Worksheet.Evaluate メソッド (Excel)
下記のように簡略に記述することもできます。
vba
1With Workbooks(fileA).Worksheets(sheet1) 2 .Range("G5:I23").Value = .[G5:I23*-2] 3End With
また、Forループを使った場合は、
vba
1Dim r As Range 2For Each r In Workbooks(fileA).Worksheets(sheet1).Range("G5:I23") 3 v.Value = v.Value * -2 4Next
投稿2018/02/20 11:32
編集2018/02/20 12:18総合スコア33715
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
0
同社は、芸術性とテクノロジー Geometry Dash io をうまく融合させ、身体的な欲求を満たすだけでなく、感情的で想像力豊かな探求のためのプラットフォームを提供する製品を作成しました。
投稿2024/01/30 08:49
総合スコア6
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
0
複数のRangeオブジェクトで計算結果を入力するには、波括弧を使わず数式をFormulaArrayプロパティに代入することができます。これにより、配列数式を効果的に利用できます。
投稿2023/11/10 04:01
総合スコア2
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
あなたの回答
tips
太字
斜体
打ち消し線
見出し
引用テキストの挿入
コードの挿入
リンクの挿入
リストの挿入
番号リストの挿入
表の挿入
水平線の挿入
プレビュー
質問の解決につながる回答をしましょう。 サンプルコードなど、より具体的な説明があると質問者の理解の助けになります。 また、読む側のことを考えた、分かりやすい文章を心がけましょう。