InstantForum.NET v4.1.4Релибhttp://relib.com/forums/robot@relib.comSat, 22 Nov 2008 19:08:33 GMT20http://relib.com/forums/Topic909426-15-1.aspx[code]<br>Sub asfdaf()<br>Dim ww As Workbook<br>Dim sh As Worksheet<br> For Each ww In Application.Workbooks<br> For Each sh In ww.Worksheets<br> Debug.Print "Sheet:" & sh.Name & " at workbook:" & ww.Name<br> Next<br> Next<br>End Sub<br>[/code]<br>Думаю дальше сам сможешьSat, 06 Jan 2007 11:06:32 GMTsnovhttp://relib.com/forums/Topic909426-15-1.aspxПрограммка простенькая, но не могу никак к ней подойти, может кто чем поможет...Надо среди всех открытых книг найти те, на листах которых есть ячейка со словом итог, и записать имена этих книг в активный лист...Может кто знает.буду очень благодарна...Fri, 05 Jan 2007 20:34:06 GMTgav4ik