Jak sprawdzić, czy użytkownik nie wcisnął "Cancel" gdy program poprosił zaznaczyć macierz, i jeżeli tak, to program to wyprowadza.
Public Sub Sub1()
Dim matrix() As Double
Dim M As Range, i As Integer, j As Integer
Set M = Application.InputBox("Wybierz macierz nxn ", , , , , , , 8)
liczbawierszy = M.Rows.Count
liczbaslupkow = M.Columns.Count
ReDim matrix(1 To eil, 1 To stulp) As Double
For i = 1 To liczbawierszy
For j = 1 To liczbaslupkow
matrix(i, j) = M.Cells(i, j).Value
Next j
Next i