{quote}{login=Ксана}{date=01.07.2011 03:25}{thema=Re: }{post}А можно поподробнее про метод, который сработал?  
 
По описанному реализовать не получается - когда много пользователей, идут глюки с выделением{/post}{/quote}  
 
Нашла решение

Добрый день!  
Возникла следующая проблема при отправке автоматических писем из Excel : появляется уведомление об автоматической отправке писем, и при этом иногда активируется приложение Outlook.    
Как сделать так, чтобы это уведомление всегда появлялось на фоне Excel-файла, из которого оно вызвано?  
 
Сейчас функция выглядит так:  
 
Function ReOpenMailFD()  
   Dim OutApp As Object  
   Dim OutMail As Object  
   Dim cell As Range  
   Dim letsh As Worksheet  
     
   With Application  
       .ScreenUpdating = False  
       .EnableEvents = False  
   End With  
     
   Set letsh = ThisWorkbook.Worksheets("Letters")  
 
   Set OutApp = CreateObject("Outlook.Application")  
   On Error GoTo cleanup  
   Set OutMail = OutApp.CreateItem(0)  
   On Error Resume Next  
               
   With OutMail  
       .To = letsh.Range("е5").Value  
       .Subject = letsh.Range("е2").Value & rNum  
       .body = letsh.Range("е3").Value & " " & rNum & ", компания " & rComp & ", " & letsh.Range("е4").Value  
       .send  
   End With  
   
   On Error GoTo 0  
   Set OutMail = Nothing  
   
cleanup:  
   Set OutApp = Nothing  
     
   With Application  
       .ScreenUpdating = True  
       .EnableEvents = True  
   End With  
End Function

Добрый день!  
 
Возникла такая проболема - есть файл, пока не включена опция Share, макросы в файле работают корректно.    
Как только начинается совместная работа, файл выдает ошибку - 1004. При этом пока файл зашарен, невозможно открыть дебагер. Как только файл расшарен, ошибки нет.  
 
Как можно посмотреть, что не так? и с этим "нетак" побороться?  
сам файл тяжелый, выкладывать его не получится(

{quote}{login=Казанский}{date=30.05.2011 01:05}{thema=}{post}Лучше так, вместо ActiveSheet можете указать лист. содержащий диапазон LastRow:  
 
ActiveSheet.Hyperlinks.Add Anchor:=LastRow.Cells(1, 6), Address:=LinkBox.Value{/post}{/quote}  
 
Спасибо!  
 
Ваш вариант заработал, предыдущая версия выдавала ошибку)

то есть необходимо писать адрес в ячейку для промежуточного хранения? и никак иначе?

Это combobox на пользовательской форме, который содержит адрес документа, из которого нужно сделать гиперссылку  
 
то есть вот такое выражение    
LastRow.Cells(1, 6)=LinkBox.Value работает корректно,    
а такое    
LastRow.Cells(1, 6).Hyperlinks.Add Address:=LinkBox.Value  
нет

Не работает выражение    
LastRow.Cells(1, 6).Hyperlinks.Add Address:=LinkBox.Value  
 
Подскажите пожалуйста, почему и как исправить?

Файл уменьшен, вопрос актуален для кнопки close

очень нужен совет!  
Есть следующее ТЗ  
пользователь заполняет таблицу Excel через форму. При этом на форме необходимо расположить кнопку, при нажатии на которую открывается окно проводника и можно выбрать файл, причем в соседнем combobox при этом образуется гиперссылка на выбранный файл (и в дальнейшем эта гиперссылка как значение из combobox пишется в определенную ячейку)  
 
 
Необходимо привязать к кнопке Link на CloseComplaint и NewComplaint2 (соответствующие combobox original doc, reply)  
<EM><STRONG>Файл удален</STRONG> - велик размер - [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>

С мобильными кнопками)  
их много, в разных файлах  
я привела самый простой кусок, потому что с работы что-либо грузить проблематично.  
 
Сейчас буду потихоньку выгонять людей из файлов, менять настройки кнопок и ждать.    
 
На самом деле такие глюки Excel (залоченый файл и гуляющие кнопки) встречаются на еженедельной основе. Т.е. пару раз в неделю обязательно прибегают паникующие люди.    
 
И что с этим делать, не понятно совершенно :(  
 
Кнопки - надеюсь - сейчас победю, а вот второе пока даже мыслей нет, как разобраться.

не-не-не, ты не понял)  
 
Книга в совместном режиме работы оказывается вдруг залочена одним из пользователей!  
 
Бывает редко и в формате глюка  
 
В режиме read-only разумеется не открывала

Угу, попробую  
А таки почему исчезает? Криворукость кого-то из пользователей исключается - кнопки нельзя перемещать в формате Share Workbook  
 
И как бороться вот с таким:  
WorkBookName Shared [Read only] locked by username
 
ЗЫ  
Спасибо за подсказку)

Происходит в разных файлах,в которых идет совместная работа((  
 
Макрос, прикрепленной к одной из мигрирующих кнопок, выглядит так:  
Sub UnhideSL()  
   Columns("E:H").EntireColumn.Hidden = False  
End Sub

Первый вариант, совместная работа.  
Share Workbook

Добрый день!  
Возникли проблемы при работе с зашареными файлами.    
1. Стали исчезать кнопки. Причем с макросами, к которым эти кнопки привязаны, ничего не происходит. После перезагрузки Excel кнопки могут вернуться на место. А могут и не вернуться - "плавают". Такое происходит нечасто и только с зашареными файлами. С файлами, в которых не ведется совместная работа, ничего подобного не происходит.    
2. Периодически зашареный файл оказывается залочен каким-то пользователем %)  
 
Подскажите пожалуйста, чем это может быть вызвано и как с этим бороться?  
 
Очень нужно

Спасибо огромное!  
 
точно, в дебагере сразу перестал ругаться

Ой, извините, недооценила размер  
 
Но пожалуйста, почитайте внимательнее вопрос.  
То, что вы описываете - ошибка в коде,  т.е.не может быть пользователей, у которых он бы работал корректно.  
 
Кроме того, причем здесь лист total в этой рабочей книге и лист total data (существующий, все названия правильные) в другой книге, которую макрос открывает?  
<EM><STRONG>Файл удален</STRONG> - велик размер - [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>

{quote}{login=The_Prist}{date=03.03.2011 02:22}{thema=}{post}Какие общие признаки на компах с ошибкой? Может версия Excel?  
И не мешало бы написать на какой именно строке ошибка. Уж очень не хочется ковырять весь код скрупулезно для отлова строки с ошибкой(которую Вы можете указать нам) и уж тем более не хочется искать того, у кого данный код не заработает. {/post}{/quote}  
 
 
На всех компах - Excel 2003, windows xp, настройки стандартные - разделитель точка.  
 
Глючная строка в коде выделена комментариями, это - Application.Workbooks("KO").Worksheets("total data").Activate

{quote}{login=The_Prist}{date=03.03.2011 02:22}{thema=}{post}Какие общие признаки на компах с ошибкой? Может версия Excel?  
И не мешало бы написать на какой именно строке ошибка. Уж очень не хочется ковырять весь код скрупулезно для отлова строки с ошибкой(которую Вы можете указать нам) и уж тем более не хочется искать того, у кого данный код не заработает. {/post}{/quote}

Добрый день!  
 
Возникла следующая проблема - у части пользователей при использовании файла с макросом выскакивает ошибка subscript out of range. У большей части все работает нормально. Проблема: надо не переписать файл (он написан старшим коллегой и исправлению не подлежит, хотя написан жутко криво), а устранить ошибку в настройках компьютера (или самого Excel?) у пользователей, у которых код глючит.  
 
Код с ошибкой - в приложенном файле. Ругается на строку Application (хотя массивом там и не пахнет и все файлы, на которых ссылается код, написаны корректно и доступны)  
 
Подскажите, что это может быть и куда копать?  
 
<EM><STRONG>Файл удален</STRONG> - велик размер - [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>