Как сделать работоспособным макрос в OOo 2.3.0 Инфра:Sub AddNew (Name, FileName, ProjectName)Set newBook = Workbooks.Add With newBook .Title = Name '.VBProject.Name = ProjectName .Worksheets(3).Delete .Worksheets(2).Delete .Worksheets(1).Name = Name .SaveAs FileName:=FileName, FileFormat:=xlExcel9795 End WithEnd Subпеременные Name, FileName, ProjectName присваиваются в следующей процедуре, которая ссылается на эту.
| 
Линейный вид
