#4 28.11.09 22:33
Re: Требуется совет по работе в MS Excel (подр. внутри)
в экселе включаешь запись макроса, назначаешь ему сочетание клавиш и имя, затем тут же останавливаешь запись, вызываешь окно с макросами и жмёшь редактировать.
в тело макроса вставляешь код типа
Код::
Sub Макрос()
'
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
Selection.Offset(-1).Select
'
End Subдалее переходишь в таблицу, встаёшь на последней строке и нажимаешь заветное сочетание клавиш, назначенное макросу, держишь до тех пор пока к началу не придёшь.
Offline

