linkedin-skill-assessments-quizzes

Visual Basic for Applications (VBA)

Q1. Which two sets of values are printed by this function and sub?

Function GetVitals(ID As Long, Age As Long, Optional Weight As Long) As String
    GetVitals="ID=" & ID &"Age=" & Age & "Weight=" & Weight
End Function
Sub ShowVitals()
    Dim ID As Long, Age As Long,Weight as Long
    Debug.Print GetVitals(ID:=5,Age:=20)
    Debug.Print GetVitals(ID:=6,Age:=25,Weight:=130)
End Sub
ID=5 Age = 20 Weight=
ID=6 Age = 25 Weight=130
ID=5 Age = 20 Weight=0
ID=6 Age = 25 Weight=130
ID=5 Age = 20 Weight=Null
ID=6 Age = 25 Weight=130
ID=5 Age = 20
ID=6 Age = 25 Weight=130

Q2. This code shows the first statement of CalledSub. Which calling statement will work properly?

Sub CalledSub(Surname, Age)

Q3. What is the principal difference between a class and an object?

Q4. What value does the MsgBox statement display?

Sub MySub(VarA As Long, ParamArray VarB() As Variant)
MsgBox VarB(0)
End Sub
Sub ShowValue()
Call MySub(10, "First arg", 2, 3.1416)
End Sub

Q5. What object is needed to put a userform module in a VBA project?

Q6. What is the output?

Sub UseSum()
Dim TestArray() As Integer, Total As Integer
ReDim TestArray(1)
TestArray(1) = 6
ReDim TestArray(2)
TestArray(2) = 3
Total = WorksheetFunction.Sum(TestArray)
End Sub

Q7. The Driver subroutine is declared by Sub Driver (Y). Which statement results in a compile error?

Q8. You have several variables to display on a user form, and there are too many variables to display at once. Which control best enables the user to see all the variables?

Q9. Below is a function named SquareIt. Which version of the subroutine named Area results in a compile error?

Function SquareIt(ByRef Basis As Integer) As Long
SquareIt = Basis ^ 2
End Function
Dim Result As Long, Side As Integer
Side = 5
Result = Squarelt(Side)
End Sub
Dim Result As Long, Side
Side = 5
Result = SquareIt(Cint(Side))
End Sub

Q10. EmailAddress() is an array. It is declared by Dim EmailAddress(10) As String, and option Base 1 is in effect. How many rows and columns are in EmailAddress()?

Q11. Which cell is selected if you run this code?

Range("E3:312").Range("B3").Select

Q12. Which variable name is valid in VBA?

Reference link

Use the following rules when you name procedures, constants, variables, and arguments in a Visual Basic module: You must use a letter as the first character. You can't use a space, period (.), exclamation mark (!), or the characters @, &, $, # in the name. Name can't exceed 255 characters in length.

Q13. Which is a valid definition of a user-defined data type?

Type CBC Name As String Next As String End Type

Type CBC Name As String _Next As String End Type

Type CBC Name As String @Option As String End Type

Type CBC Name As String %For As String End Type

Q14. What is one way to duplicate a user form from one project into a different project?

  1. Save and close the project with the existing user form.
  2. Click Insert > File.
  3. Browse to the location of the existing project.
  4. Right-click it and select the user-form you want to duplicate.
  1. Open the existing user form in Desing Mode.
  2. Right-click the form and select Copy.
  3. Switch to the other project.
  4. Right-click Module and select Paste.
  1. In the Project Explorer, right-click the user form and select Copy.
  2. Switch to the new project.
  3. Right-click UserForms and select Paste.
  1. Open the existing user form in Design Mode.
  2. Click File > Export File.
  3. Switch to the other project.
  4. Click File > Import File.

Q15. The recording of a macro in Word is likely to be an incomplete record of the user’s actions. Why?

Q16. Which statement should precede a subroutuine’s error handler?

Q17. How many values can MyArray hold?

Option Base 0
Sub BuildArray()
Dim MyArray(5) As Integer

Q18. Which statement is true?

Q19. A declaration has scope, which has three levels. What are they?

Q20. There are two references that must be selected in the Visual Basic Editor in order for any Visual Basic code to run in Excel. What are these two references?

Q21. Which action will cause your project to reset its variables?

Q22. Which keyboard shortcut causes VBE to locate the declaration of a procedure?

Q23. When you define a new class of object, where do you assign a name to it?

Q24. How does a class module indicate that it uses a particular interface?

Q25. What is needed for the contents of Module1 to be availble to other modules in a VBA project, but not to any other VBA project?

Q26. When used with an array named MyArray, what is the preerred way to set beginning and ending values of a loop control variable?

Q27. What is the value of Test3?

Enum TestEnum
    Test1
    Test2
    Test3
End Enum

Q28. Which statement declares an array?

Q29. To use VBA code to maintain a different VBA project, you can make use of VBA’s extensibility. What is needed to enable extensibility?

Q30. How do you add a user form to a VBA project?

  1. Select the project in the Project window of the Visual Basic Editor
  2. Click the Design Mode button and select Insert Mode
  1. Select the project in the Project window of the Visual Basic Editor
  2. Click the Toolbox button and select UserForm
  1. Select the project in the Project window of the Visual Basic Editor
  2. Right-click the Run menu and select Customize
  1. Select the project in the Project window of the Visual Basic Editor
  2. Click Insert > UserForm

Q31. Explicit variable declaration is required. MyVar is declared at both the module and the procedure level. What is the value of MyVar after first AAA() and then BBB() are run?

Dim MyVar As String
Sub AAA()
Dim MyVar As String
MyVar = "Procedure AAA Scope"
End Sub
Sub BBB()
MyVar = "Procedure BBB Scope"
End Sub

Q32. Which code block from class modules returns a compile error?

Public Property Get HDL() As Double
HDL = pHDL
End Property
Public Property Let HDL(Value As Double)
pHDL = Value
End Property
Property Get HDL() As Double
HDL = Value
End Property
Property Let HDL(Value As Double)
pHDL = Value
End Property
Public Property Get HDL() As Double
HDL = Value
End Property
Public Property Let HDL(Value As Double)
pHDL = Value
End Property
Public Property Get HDL() As Single
HDL = pHDL
End Property
Public Property Let HDL(Value As Double)
pHDL = Value
End Property

Q33. If VBA code declares FileCount as a constant rather than a variable, the code tends to run faster. Why is this?

Q34. A VBA project must declare four classes. How many class modules are needed?

Q35. What does this code display?

Sub MakeErrors()
Dim Y As Variant, Z As Variant
On Error Resume Next
Y = 1 / 0
MsgBox "Y = " & Y
On Error GoTo 0
Z - (0 - 3) ^ 0.5
MsgBox "Z = " & Z
End Sub

Q36. The VBA code block shown in the following four options runs when UserForm1’s CommandButton1 button is clicked. Which block of code leaves UserFrom1 loaded but not visible until the FoundErrors function has checked it, and then enables processing to continue if no errors are found?

Private Sub CommandButton1_Click()
If FoundErrors(Me) Then _
Me.Show
End Sub
Private Sub CommandButton1_Click()
If Not FoundErrors(UserForm1) Then _
Unload UserForm1
End Sub
Private Sub CommandButton1_Click()
Me.Hide
Do While FoundErrors(Me)
Me.Show
Loop
End Sub
Private Sub CommandButton1_Click()
Do While FoundErrors(UserForm1)
UserForm1.show
Loop
End Sub

The first requirement is to make UserForm1 loaded but not visible, therefore we need Me.Hide, Me in here referring to UserForm1