3つのボタンがあるユーザーフォームがあります。[OK]ボタンをクリックすると、次のコードを記述しました。
Private Sub CommandButton2_Click()
Call calculateCost
End Sub
Sheet1に書いたサブメソッドは次のとおりです。
Public Sub calculateCost()
Dim kilo As String
kilo = Worksheets("Sheet1").TextBox1.Text
MsgBox "value" & kilo
End Sub
コードを実行すると、エラーが発生します。呼び出しcalculateCostの近くで定義されていないサブまたは関数。なぜこうなった?これを解決する方法。ありがとうございました