Добавить новые строки между имеющимися

[And589]

Есть лист, где 500-1000 строк, какой командой можно добавить пустые строки (ячейки) между текущими в выделении. Добавить одним разом. Команда после которой например все имеющиеся строки-ячейки становятся нечетными, все новые добавленные становятся четными, общее количество строк увеличивается в два раза.

Есть ли такая команда в calc?

[economist]

Такой команды нет. Даже если отфильтровать нечетные строки - команда Лист - Вставить строки (будет неактивна).
Значит только макрос или хитрость...

Скажем, можно "схитрить", вставив Промежуточные итоги при каждой смене № в столбце, заполненном 1,2,3 итд (см. вложение).     

[bigor]

Можно макросом типа такого

Код Выделить Развернуть

Sub InsRows
Dim oSheet As Variant, i As Long
Dim oSelection As Variant, oActiveCell As Variant, oRow As Variant

oSelection = ThisComponent.getCurrentSelection()
oSpreadsheet = oSelection.getSpreadsheet()
k=1
For i =oSelection.RangeAddress.StartRow To oSelection.RangeAddress.EndRow
'msgbox i & "  " & i+k
oSpreadsheet.Rows.insertByIndex(i+k,1)
k=k+1
Next i

End Sub

Выделяем нужный диапазон и запускаем
если условия четности нечетности обязательны, то нужно чуть подшаманить

[JohnSUN]

Можно по-всякому...
Можно перенумеровать имеющиеся строки, повторить нумерацию нужное количество раз (сколько пустых строк нужно вставить - столько раз и повторить), отсортировать по этой колонке и тут же её удалить

[And589]

Спасибо за ответы и особенно за макрос, то что нужно.