2016-12-05 19 views
-2

申し訳ありませんが、これはかなり基本的なものです.VBAではそれほど熟達していません。 私は、クリックすると整数を格納し、別の値から値を減算するボタンを持つことをお勧めします。たとえば、value1が100の場合、ボックスをクリックして数字を入力すると、100からその数字が減算されます。つまり、30を入力すると70が数字になり、もう一度40を入力すると40になります。 100がなくなると、msgboxを表示します。それは私が苦労しているプロジェクトの一部です。値を更新してそれから減算する

+0

「整数を格納する」 - 格納する*正確にどこに? VBAパブリック変数?スプレッドシートのセルですか?ブック名? 「価値1」はどこから来たと思われますか?何か試しましたか?そうであれば、コードを表示して、どのような問題が発生しているのかを説明する必要があります。 –

+0

はい、パブリック変数です。私は両方のセルに格納し、変数に格納しようとしました。それは単に動作しなかったので、私はコードを共有しませんでした。ボタンをクリックするたびにすべてがリセットされます。多分ループが必要でしょうか? – Ricky

+1

コードを投稿してもうまくいかなくても、既に試した内容 – ballsy26

答えて

1

これはあなたにいくつかのアイデアを与えるかもしれません。標準コードモジュールでは、次のように入力します。

Public balance As Long 

Sub Deposit() 
    'adds to the current amount 
    balance = balance + InputBox("Please enter a value") 
End Sub 

Sub Withdraw() 
    Dim v As Long 

    v = InputBox("Enter a value, maximum of " & balance) 

    If balance < v Then 

     MsgBox "Sorry, that value is too big" 
    Else 
     balance = balance - v 
    End If 

    If balance = 0 Then MsgBox "Amount is exhausted" 
End Sub 

これらの2つのサブをボタンに付けて、どのように動作するかを確認します。

パブリック変数に関する警告 - プロジェクトによってリセットが発生した場合、データが失われます。セルに値を格納するのにも同じ問題はありません(ただし、ワークシートを乱雑にすることなく、どこに配置するかを決める必要があります)。

関連する問題