当方プログラミング初心者です。こちらのカテゴリならお分かりになる方がいらっしゃると思い質問させていただきました。
それぞれに入力できなおかつ一方の値が変化すると他方の値が変化するものを作りたいのです。
具体的には、ある年度の総売上を100%としてその内訳の売上、例えば、生鮮食品6500円で65%として、左のセルに6500右のセルに65と値あった場合、左のセルを7500にすると右が75になり、右のセルを55とすると左が5500になるようなものです。
つまり、売上のシミュレーションができるものを考えているのですが、そのようなことが可能かどうかできるならば具体的なコードでできなければ何か別の方法をご提示いただきたいのです。
No.2ベストアンサー
- 回答日時:
とりあえず、VBAで実現する為のサンプルコードを提示します。
対象シートモジュールに入れてください。A1とB1の間で相互に連動しています。
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Address = "$A$1" Then
Range("B1") = Range("A1") * 100
ElseIf Target.Address = "$B$1" Then
Range("A1") = Range("B1") / 100
End If
Application.EnableEvents = True
End Sub
途中のApplication.EnableEvents = False/Trueは、無くても良いんですが念のため……。
No.1
- 回答日時:
>売上のシミュレーションができるものを考えているのですが
やりたいことはわからないでもないですが
>左のセルを7500にすると右が75になり、右のセルを55とすると左が5500になるようなものです。
売上を増やすと合計の売り上げも増えるので 75%ではなくなります。
構成比を55%と変更したら、ほかの構成比も変わります。
入力する度に、合計の金額(比率も)が変わりますよね。
売上の目標などを設定されていると思いますが、一例として
A B C D
1目標売上 10000 決定総売上
2
3 品目 設定金額 設定比率 決定金額
4生鮮食品 6500
5 衣類 2000
6 家具 0.1
・・・
と準備したとして
D4セルに =IF(B4="",B$1*C4,B4)
といれて下へコピーしておいて
B列、或いは C列のいずれかに 数値を入れます。
金額を決定するのに、比率を優先したのか、金額を優先したのかわかります。
D1セルに =SUM(D4:D100)とか入れておいて目標金額に合わせる為に
どれかの金額、或いは比率を合わせる必要があるかどうか
など判断されては如何でしょうか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセル バーコード作成で他のシートを参照するには? 2 2023/05/03 16:57
- Excel(エクセル) エクセル 関数について 4 2022/08/05 11:03
- Excel(エクセル) シート参照を含む数式を連続コピー 3 2022/12/10 11:42
- Excel(エクセル) エクセルで計算結果が0でないときのみセルを更新したい 4 2022/07/30 11:58
- Excel(エクセル) エクセルで値ではなく関数を参照する方法 6 2023/03/19 00:50
- 宇宙科学・天文学・天気 銀河のハビタブルゾーンを確率的セルオートマトンという数値的にシミュレーションした結果、「群島」の様な 2 2023/06/06 23:10
- Excel(エクセル) 指定値をマクロで検索&シート移動 2 2022/04/27 23:29
- その他(Microsoft Office) googleスプレットシートで左右の数値を比較して色判別させたい 2 2022/06/06 18:33
- Visual Basic(VBA) エクセルマクロでアニメを作る方法を教えてください。 1 2023/02/07 14:27
- Excel(エクセル) 条件に合った数値の合計を表示させたい関数と条件指定の方法 3 2023/05/13 16:07
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
Excelマクロでセルの値を他のセルに表示する方法
その他(Microsoft Office)
-
Rangeメソッドは失敗しました。globalオブジェクトについて
Excel(エクセル)
-
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
-
4
エクセル イベントマクロ Changeイベントを複数作りたい
Access(アクセス)
-
5
Excel VBAでのWorksheet_Changeが動作しない原因
Excel(エクセル)
-
6
他のシートの特定のセルが変わると、自動実行されるマクロについて
Excel(エクセル)
-
7
Worksheet.Change イベントを他のシートにも反映させる方法?
Visual Basic(VBA)
-
8
エクセルで脚注
Excel(エクセル)
-
9
VBAを使って検索したセルをコピーして別の場所に貼り付ける。
Visual Basic(VBA)
-
10
エクセルVBA オプションボタンのチェックを外したい
Excel(エクセル)
-
11
同じ作業を複数のシートに実行させるにはどうしたらいいのでしょうか
Visual Basic(VBA)
-
12
値を入力後、自動的にアクティブセルが移動するマクロ
Excel(エクセル)
-
13
VBA(エクセル)で自動的にボタンをクリックさせるには
その他(プログラミング・Web制作)
-
14
excelマクロで複数シート間のデータ同期方法
Excel(エクセル)
-
15
セルの値が変ると自動でマクロが実行される。
その他(Microsoft Office)
-
16
指定したシート名以外を非表示にするには?VBA
Excel(エクセル)
-
17
セルをクリック⇒そのセルに入力された文字を○で囲む
Excel(エクセル)
-
18
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
19
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
-
20
エクセル マクロで セルの範囲を指定する方法
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
プログラミング
-
エクセルVBAコードで教えて下さ...
-
Excelのマクロについて教えてく...
-
VBA 別ブックからコピペしたい...
-
VBAコードについて教えてくださ...
-
vba アクティブシートの名前変...
-
Excelのマクロについて教えてく...
-
Outlookの「受信日時」「件名」...
-
ユーザーフォームに別シートか...
-
Excelのマクロについて教えてく...
-
VBAで各列の"+"と"o"の合計数を...
-
Excelのマクロについて教えてく...
-
久しぶりのプログラミング
-
エクセルVBA
-
Excelのマクロについて教えてく...
-
Vba 実数および実数タイプの変...
-
エクセルVBAについて
-
VBAの計算で@が出てしまう件
-
ExcelVBA シート名を複数セルか...
-
VBA UserFormからの転記で
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAで大量のファイルをシート名...
-
VBA レジストリの値の読み方に...
-
Excelのマクロについて教えてく...
-
ユーザーフォームに別シートか...
-
VBAの計算で@が出てしまう件
-
エクセルVBAについて
-
Vba 実数および実数タイプの変...
-
【ExcelVBA】値を変更しながら...
-
VBA一覧取得 再投稿
-
VBA指定行削除
-
エクセルVBAについて
-
VBA ユーザーフォーム ボタンク...
-
VBA 何かしら文字が入っていたら
-
エクセルについて
-
2つのマクロでチェックボックス...
-
【マクロ】1つのマクロの中に...
-
ExcelのVBAコードについて教え...
-
VB.net(VB)で、フォームにExcel...
-
Vba SelStart、SelLen教えてく...
-
Excel-VBAのmsgBox()の不思議
おすすめ情報