This page has 0 threads | Add post

Exercises

Finding our exercises useful? Please consider helping us to share more!

Software ==>	Advanced VBA (28 exercises)
Topic ==>	Class modules (2 exercises)
Level ==>	Relatively easy
Subject ==>	VBA training

Create a class to allow users to run a mortgage model (properties are things like house price and deposit)

This exercise is provided to allow potential course delegates to choose the correct Wise Owl Microsoft training course, and may not be reproduced in whole or in part in any format without the prior written consent of Wise Owl.

Before you can do this exercise, you'll need to download and unzip this file .

The eventual aim of this exercise is to be able to type in and run the following code:

Sub CalculateMortgage()

'create a new instance of your class

Dim App As New MortgageApplication

'set the various mortgage parameters

App.HousePrice = InputBox("Enter mortgage")

App.Deposit = InputBox("Enter deposit")

App.Term = InputBox("Enter term of mortgage")

App.InterestRate = InputBox("Enter rate")

'display the result!

MsgBox "Mortgage would be " & _

Format(App.Mortgage, "£#,##0.00")

End Sub

To get this code to work, cCreate a class called MortgageApplication, to contain public variables for the house price, deposit, term and interest rate as above. When you initialise the class, make sure that you give these public variables sensible values.

Add a read-only property called Mortgage to your class. Reading this property should:

Transfer all of the values from the public variables into named ranges on your worksheet (for example, set the value of the range called HousePrice equal to the value of the public variable in your class called HousePrice)