ExcelMemberMayReturnNothing

Locates instances of member calls made against the result of a Range.Find/FindNext/FindPrevious method, without prior validation.


Inspection type: CodeQualityIssues

Default severity: Warning

Reasoning

Range.Find methods return a Range object reference that refers to the cell containing the search string; this object reference will be Nothing if the search didn't turn up any results, and a member call against Nothing will raise run-time error 91.

This inspection will only run if the Excel library is referenced.

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:

MyModule

Private Sub Example()
    Dim foo As Range
    Set foo = Sheet1.Range("A:A").Find("Test") ' foo is Nothing if there are no results
    MsgBox foo.Address ' Range.Address member call should be flagged.
    Dim rowIndex As Range
    rowIndex = Sheet1.Range("A:A").Find("Test").Row ' Range.Row member call should be flagged.
End Sub

Back to list

The content of this page was generated from xml/comments in the source code compiled into Rubberduck.CodeAnalysis.xml. Edit this page