Excelシートのセルを変数で指定したいのですけれど

    Dim xlCells As Excel.Range

    Try
        xlCells = xlWorksheet.Cells
        Dim xlCell1 As Excel.Range

        Try
            xlCell1 = xlCells(1, 1)
            Dim xlCell2 As Excel.Range

            Try
                xlCell2 = xlCells(5, 5)
                Dim xlRange As Excel.Range

                Try
                    xlRange = xlCells.Range(xlCell1, xlCell2)
                    xlRange.Select()
                Finally
                    If Not xlRange Is Nothing Then
                        System.Runtime.InteropServices.Marshal.ReleaseComObject(xlRange)
                    End If
                End Try
            Finally
                If Not xlCell2 Is Nothing Then
                    System.Runtime.InteropServices.Marshal.ReleaseComObject(xlCell2)
                End If
            End Try
        Finally
            If Not xlCell1 Is Nothing Then
                System.Runtime.InteropServices.Marshal.ReleaseComObject(xlCell1)
            End If
        End Try
    Finally
        If Not xlCells Is Nothing Then
            System.Runtime.InteropServices.Marshal.ReleaseComObject(xlCells)
        End If
    End Try