@Святой НякаЛайк

Dim n As Byte, m As Byte, i As Integer, j As Integer - так менее наглядно объявлять переменные, но зато компактнее!
n = InputBox("Строки", , 6) - Visual Basic поддерживает Unicode, это значит, что хоть названия переменных, хоть названия функций/модулей, так и всевозможные значения их можно называть, используя кириллицу!
n = InputBox("Строки", , 6)
m = InputBox("Столбцы", , 7)
Обратите внимание, что когда пишете такое " Cells(i, j)", то здесь i - это номер строки, а j - это номер столбца. Здесь ОЧЕНЬ ЛЕГКО запутаться, так что этот момент надо проверять очень бдительно!
Едем дальше: когда у вас в редакторе кода написано что-то кириллицей, но после копирования и вставки на форум превращается в кракозябры типа "laba12 ГЊГ*êðîñ". Это потому, что во время копирования раскладка клавиатуры стояла на английском! Так что перед копированием с редактора (да и при копировании откуда-либо в редактор тоже) переключайте раскладку на "ru" и всё будет нормально выглядеть.
И последнее: при таком объявлении (Dim n As Byte, m As Byte, i As Integer, j As Integer) просто нужно после каждой переменной указать её тип, в противном случае, если написать (Dim n, m, i, j As Integer), то указанная переменная j получит указанный же тип - integer, а остальные получатся "variant". На самом деле иногда это очень хорошо и полезно, так как в одну переменную можно впоследствии вносить хоть текст, хоть при необходимости числа, но при большом количестве операций использование variant сильно замедлит работу всей программы.
Удачи!

Вернуться к обсуждению:
Преобразовать матрицу в ее симметричную по строке M/2 VBA

1