Добрый день. Пользователи пожаловались что в 2007 офисе макрос работает не корректно, то есть картинка вставляется не вниз страницы , а в верх.


код макроса If Worksheets.Count = 1 Then GoTo 1
Next i
1:



If Range("123") = "23213»" Then
Range("Ïå÷àòü").Select
ActiveSheet.Pictures.Insert("C:\cbs\xlt\222.bmp").Select
Range("A1").Select
Range("G30") = ""
Else
Range("123").Select
ActiveSheet.Pictures.Insert("C:\cbs\xlt\111.gif").Select
Range("A1").Select
End If

End Sub