Using CATALINA_BASE:   /Users/francisveilleux-gaboury/Tomcat/apache-tomcat-8.0.18
Using CATALINA_HOME:   /Users/francisveilleux-gaboury/Tomcat/apache-tomcat-8.0.18
Using CATALINA_TMPDIR: /Users/francisveilleux-gaboury/Tomcat/apache-tomcat-8.0.18/temp
Using JRE_HOME:        /Library/Java/JavaVirtualMachines/jdk1.8.0_20.jdk/Contents/Home
Using CLASSPATH:       /Users/francisveilleux-gaboury/Tomcat/apache-tomcat-8.0.18/bin/bootstrap.jar:/Users/francisveilleux-gaboury/Tomcat/apache-tomcat-8.0.18/bin/tomcat-juli.jar

private bool IsSelectedReference(QualifiedSelection selection, Declaration declaration)
{
    return declaration.References.Any(r =>
        r.QualifiedModuleName.Project == selection.QualifiedName.Project
        && r.QualifiedModuleName.ComponentName == selection.QualifiedName.ComponentName
        && r.Selection.ContainsFirstCharacter(selection.Selection));
}

private bool IsSelectedReference(QualifiedSelection selection, Declaration declaration)
{
    return declaration.References.Any(r =>
        r.QualifiedModuleName == selection.QualifiedName &&
        r.Selection.ContainsFirstCharacter(selection.Selection));
}

var result = other.Project == Project
    && other.ProjectName == ProjectName
    && other.ComponentName == ComponentName
    && other._contentHashCode == _contentHashCode;
return result;

        if (localScope.IdentifierName == identifierName
            && _returningMemberTypes.Contains(localScope.DeclarationType))
        {
            return FindFunctionOrPropertyGetter(identifierName, localScope);
        }

var target = Declarations.Items
    .Where(item => !item.IsBuiltIn)
    .FirstOrDefault(item => IsSelectedDeclaration(selection, item)
                         || IsSelectedReference(selection, item));

item.IsSelected(selection)

return declaration.References.Any(r =>
    r.QualifiedModuleName == selection.QualifiedName &&
    r.Selection.ContainsFirstCharacter(selection.Selection));

.FirstOrDefault(item => item.IsSelected(selection)
                     || item.Rerefences.Any(r => r.IsSelected(selection, item);

newrng.Value2(i, 1) = myrng.Value2(i, 1) + 1

myrng.Cells(i,1).Value = myrng.Cells(i,1).Value + 1

myrng.Value2(i,1) vs. myrng(i,1).Value2

newrng.Cells(i, 1).Value2 = myrng.Cells(i, 1).Value2 + 1

Sub Foo()
    Dim Foo As New Foo
    With Foo
        With .Foo
            .Foo = 42
        End With
        Bar .Foo.Foo
    End With
End Sub

Function Foo()
    With New Foo
        With .Foo
            .Foo = 42
        End With
        Set Foo = .Foo
    End With
End Function

Function Foo() As Integer
    With New Foo
        With .Foo
            .Foo = 42
        End With
        Foo = .Foo.Foo
    End With
End Function