Код |
---|
Sub ibh() Dim b, n As Long b = 1 Application.ReferenceStyle = xlR1C1 For n = 1 To n = 5 Columns(n).ColumnWidth = 10 b = b + n Next Application.ReferenceStyle = xlA1 End Sub |
Синтаксис оператора цикла For/Next
21.01.2020 15:15:00
|
|||
|
|
21.01.2020 15:18:41
|
|||
|
|
21.01.2020 15:37:05
Спасибо, давно не пользовался VBA, забывать уже начал что знал)
|
||||
|
|
|||