спасибо. Получается - это никак не исправить?

Добрый день, коллеги.
прошу помочь с решением одной проблемы.
Написал макрос с обработки отчета с включением и выключение обновления экрана (screenUpdating)

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

Добрый день прошу помочь с такой проблемой:
Я создал на нескольких листах кнопки для запуска макросов, разместил их в удобном видном месте на листе.
В свойствах всех кнопок установлен флажок "не перемещать и не изменять размеры"

Через какое то время, по непонятной причине я не нахожу кнопок на тех местах где я их располагал.
они уменьшаются в размерах до практически не различимых и сдвигаются в угол листа или еще куда нибудь, иногда совсем исчезают,
по крайней мере я не могу найти.
Помогите кто сталкивался с такой проблемой и как то решил её.

Добрый день, коллеги!
Прошу подсказать как решить данный вопрос.
На листе есть рисунок (вставляется из другого листа) и нужно определить его границы по адресам ячеек
и затем растянуть его так? чтобы он ровно вписывался в лист, который потом планируется распечатывать.

Заранее спасибо тем кто поможет.

Добрый день, коллеги
Подскажите, как сделать так, чтобы при вводе части слова, например его середины, в поле со списком,
эксель автоматически подставлял подходящее значение, как в случае поиска по первым буквам
Спасибо

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

Не получилось) выдал что ссылки имена и массивы нельзя использовать в формулах сводных таблиц
я уже сделал правда не в сводной, а в исходнике, добавлением доп столбцов с формулами массива))

Добрый день, коллеги.
Кто может помочь в таком вопросе:

На складе два кладовщика принимают товар поштучно, Сканируют штрихкод товара и время сканирования заносится в таблицу, а также ФИО
Я сделал сводную из этой таблицы, в которой вычислил начало и конец приёмки для каждого кладовщика (МАКС и МИН дата соответственно)
Вопрос: как посчитать общее время приёмки в часах для каждого кладовщика, прямо в Сводной, не создавая дополнительных столбцов вручную
рядом с ней, как в примере

Пробовал через вычисляемое поле, не получается, т.к поле дата одна и та же
Может как то через формулу массива с добавлением столбца в исходник для сводной?
Буду благодарен если кто подскажет ответ.  

Спасибо за ответы всем, попробую.

Добрый день, коллеги, подскажите кто знает, просто ради интереса. При сохранении книги эксель выскакивает окошко с сообщением
"Рисунок слишком велик и будет усечен".
сам файл достаточно маленький, никаких рисунков там нет только таблицы
кто знает почему это сообщение выскакивает?

Johny, а нужно ли тут Set xlAp = ... прописывать?? и что по идее после = ставить??

Да-да - вот это что то похоже на правду - надо только встроить как то

мне кажется вся хрень в том, что код запускается и выполняется из Акцесс - а системное сообщение получается от Эксель - может это не решаемая задача - вообще бывает такое что не удается помочь?

да - этот файл Эксель выгружается из малоизвестной ERP системы у нас на фирме - поэтому такая замена нужна, не могу объяснить - но все работает
как и надо - только не могу отключить эти системные сообщения от Экселя при замене данных(((

Код РАБОТАЕТ - все выполняется верно - так как я и хочу.
Единственно мне нужно - отключить как то системное сообщение - чтобы все работало без моего участия
я её убрал - она не помогает

может имеет значение Куда всталять команду отключения сообщения к примеру после

Скрытый текст

Dim KolStrok As Long Dim Progres As Long Dim ProgresObh As Long DoCmd.SetWarnings False 1 ' подготовка исходника    Me.Поле12.Value = Time & " - Подготовка исходного файла"        Me.ProgressBar7.Min = 0    ProgresObh = 20    Me.ProgressBar7.Max = ProgresObh    Me.ProgressBar7.Value = 0    Me.Repaint        Dim oWbk As Workbook    Dim oSheet As Worksheet    Set oWbk = Workbooks.Open("G:\users\Assistent-P\tmp.xls"    Set oSheet = oWbk.Worksheets("tmp"        KolStrok = oSheet.Cells(10, 1).End(xlDown).Row    If Nz(oSheet.Cells(1, 4).Value) <> "Подготовлен LeGo" Then    oSheet.Range("$A$10:$AD$" & KolStrok).Name = "Таблица1"    Me.ProgressBar7.Value = 1    oSheet.Range("$A$11:$B$" & KolStrok).NumberFormat = "0"    oSheet.Range("$F$11:$F$" & KolStrok).NumberFormat = "@"    oSheet.Range("$H$11:$H$" & KolStrok).NumberFormat = "@"    Me.ProgressBar7.Value = 2    oSheet.Range("$C$11:$C$" & KolStrok).Replace What:=".", Replacement:=".", LookAt:=xlPart, _  SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _  ReplaceFormat:=False    Me.ProgressBar7.Value = 3

Здесь сам код с начала до первой замены

может, но это DoCmd.SetWarnings False  не помогло

не помогло
[FILE ID=94089]

не помогает - это я сразу попробовал

Jack, On Error Resume Next - не пробовал - это же не ошибка, а просто системное сообщение.
а насчёт брутальной штуки - не знаю даже что это такое, попробую

Пиратская версия может - некорректно оттого работает))

Добрый день. Помогите пожалуйста решить проблему:
Из формы Access по Событию Загрузка Формы, програмно открывается книга Excel, в которой
заменяются некоторые данные, например:
при этом после каждой такой замены выскакивает сообщение:


При этом Фактически замены происходят, я проверял.
Как мне отключить это сообщение???
DisplayAlerts - не помогает - сообщение все равно выскакивает, видимо потому что макрос выполняется из Access
версия Excel 97-2003 (.xls)

уже научился кажись))

еще учиться и учиться. См. подправленные цитаты [МОДЕРАТОР]

Не знаю - может баг какой, может перезагрузка помогла - хотя предже, чем написать тему я пробовал перезагружать
завтра ради интереса снова попробую старую формулу поставить в макрос - щас уже надоело, целый день вчера с этим разобраться пытался....

Слишком большой файл - а урезать его довольно долго и чего то я уже запарился с одним этим вопросом)....
Если интересно - я уже справился с проблемой))) заменил эту "=IFERROR(RC[-2]/RC[-3]-100%,"""" " формулу
на "=IF(ISERROR(RC[-2]/RC[-3]-100%)=TRUE,"""",RC[-2]/RC[-3]-100%)"
и, О Чудо, всё заработало!!

Добрый день, прошу вас помочь с одним вопросом.
Я написал макрос, который открывает книгу и проставляет формулу в столбце таблицы
Selection.FormulaR1C1 = "=IFERROR(RC[-2]/RC[-3]-100%,""""") "
затем сохраняет и закрывает эту книгу
Первый раз, чтобы вставить формулу он отрабатывает нормально.
А при следующем запуске выдаёт ошибку "Method 'open' of object 'Workbooks' failed".
Я Вручную открываю книгу и возникает сообщение: "В книге обнаружено содержимое которое не удалось прочитать. Попробовать восстановить?"
Нажимаю "Да"
Возникает следующее сообщение:


Нажимаю закрыть - и все формулы, которые вставлены были макросом оказываются заменены на значения.
Пересохраняю восстановленную книгу.
Если снова запускаю этот макрос - он снова отрабатывает только один раз - затем вновь выдает ошибку!
Причем, что интересно - такая проблема возникает только с двумя книгами из 4-х, которые я планирую обрабатывать макросом
две другие - совершенно спокойно обновляются по некольку раз.
Очень прошу подскажите, если кто сталкивался с подобной ситуацией что нужно сделать???

Smiley, Нет, нужно чтоб само запускалось в опред время и закрывалось потом и никаких окон не выскакивало))
Типо полная автоматизация))

Abakumov, первое почему то не выходит
А второе - получилось - спасибо

Добрый день подскажите может кто помочь:

Есть Книга, которая при открытии выполняет определеную процедуру.
Я собираюсь добавить в конце процедуры Application.Quit, чтобы книга закрывалась после выполнения процедуры.
Но как потом открыть эту Книгу минуя Автозапуск,
если в будущем нужно будет изменить что либо в коде процедуры?
Удерживать кнопку shift как а в Access - не помогает...

Заранее спасибо за ответы