Rubberduck - SetAssignmentWithIncompatibleObjectType

Inspection type: CodeQualityIssues

Default severity: Warning

Reasoning

The VBA compiler does not check whether different object types are compatible. Instead there is a runtime error whenever the types are incompatible

Quick-Fixes

The following quick-fixes are available for this inspection:

IgnoreOnce: Adds an '@Ignore annotation to ignore a specific inspection result. Applicable to all inspections whose results can be annotated in a module.
IgnoreInModule: Adds an '@IgnoreModule annotation to ignore a inspection results for a specific inspection inside a whole module. Applicable to all inspections whose results can be annotated in a module.

Examples

Each example is a self-contained MCVE showing the feature in a single specific scenario.

Standard Module

Named Module1 by default, these are general-purpose standard procedural modules.

Class Module

Named Class1 by default, these modules define the default interface for an object of that type.

Predeclared Class

A class module with its VB_PredeclaredId attribute set to True (with or without a @PredeclaredId annotation).

Interface Module

Abstract interfaces are class modules (with or without an @Interface annotation) whose default interface is not a class type intended to be instantiated.

UserForm Module

A predeclared class with a design-time visual designer using the MSForms UI framework.

Document Module

Owned by the host application, these class modules belong to the host document and may handle various events fired by the host application.

The following code should trigger this inspection:

IInterface

Public Sub DoSomething()
End Sub

Class1

'No Implements IInterface
Public Sub DoSomething()
End Sub

Module1

Public Sub DoIt()
    Dim cls As Class1
    Dim intrfc As IInterface
    Set cls = New Class1
    Set intrfc = cls
End Sub