14>Done building project "Rubberduck.Core_euklfd3d_wpftmp.csproj" -- FAILED.
14>Done building project "Rubberduck.Core.csproj" -- FAILED.

1>------ Build started: Project: Rubberduck.Resources, Configuration: Debug Any CPU ------
2>------ Build started: Project: Rubberduck.JunkDrawer, Configuration: Debug Any CPU ------
1>C:\Users\IvenBach\Source\Repos\Rubberduck\RubberduckBaseProject.csproj : warning MSB4011: "C:\Users\IvenBach\.nuget\packages\sunburst.net.sdk.wpf\1.0.47\Sdk\Sdk.props" cannot be imported again. It was already imported at "C:\Users\IvenBach\Source\Repos\Rubberduck\Rubberduck.Resources\Rubberduck.Resources.csproj". This is most likely a build authoring error. This subsequent import will be ignored.

14>UI\UnitTesting\TestExplorerViewModel.cs(379,96,379,130): error CS0234: The type or namespace name 'AnnotationType' does not exist in the namespace 'Rubberduck.Parsing.Annotations' (are you missing an assembly reference?)
14>Navigation\CodeExplorer\CodeExplorerMemberViewModel.cs(54,55,54,87): warning CS0184: The given expression is never of the provided ('ObsoleteAnnotation') type
14>UI\Command\ComCommands\NoIndentAnnotationCommand.cs(37,56,37,79): warning CS0184: The given expression is never of the provided ('NoIndentAnnotation') type

Public Enum RecipientTypes
    [To]
    CC
    BCC
End Enum

public QualifiedSelection(QualifiedModuleName qualifiedName, Selection selection)
{
    QualifiedName = qualifiedName;
    Selection = selection;
    _componentType = qualifiedName.ComponentType;
}

public QualifiedModuleName QualifiedName { get; }

//TODO: Convert to resource string
private ComponentType _componentType { get; }
public string QualifiedNameWithLocation => $"{QualifiedName} - {_componentType}";

Private Sub WriteTableData(ByVal inputCell As Range, ByVal data As Variant, ByVal columnSpan As Long, ByVal DELIMITER As String)
    Dim destination As Range
    Set destination = inputCell.Resize(data.Count, columnSpan)
    With destination.Columns(1)
        .Value2 = Excel.WorksheetFunction.Transpose(data.ToArray)
        .TextToColumns DataType:=xlDelimited, Other:=True, OtherChar:=DELIMITER
    End With
End Sub

Public Sub x()
    Dim r As Excel.Range

    Set r = Sheet1.Range("A:D")

    Debug.Print TypeName(r.Columns(1).Value)
    Debug.Print TypeName(r.Columns.Value)
End Sub

?r.Columns(1).Address
$A:$A
?r.[_Default](1).Address
$A$1

?r.[_Default](1, 1).Address
$A$1
?r.Columns(1, 1).Address

? typename(r.Columns.[_Default](1))
Range

? r.Columns.[_Default](1).Address
$A:$A