ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ошибка записи значения в ячейку Excel
13 сообщений из 38, страница 2 из 2
  2  все
Ошибка записи значения в ячейку Excel
    #36187324
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
White OwlУж сколько раз твердили миру: ЛИСТЫ НЕ БОЛТАЮТСЯ В ВОЗДУХЕ!
Если у тебя в макросе есть команда:
Код: plaintext
Sheets("1 сторона").Range("g22").Value = "НЕТ"
То при ее выполнении Эксель будет искать этот самый лист у объекта который имеет фокус в данную секунду. Кто там у тебя имеет фокус, какая кнопка на листе/форме/в меню - никто предсказать не может.
Хочешь жить без проблем указывай родителя:
Код: plaintext
Thisworkbook.Sheets("1 сторона").Range("g22").Value = "НЕТ"


Скопировал все на новый лист - и ничего!
Как была ошибка, так и есть...ХЗ даже не знаю что и делать.
Кстати - Thisworkbook или не Thisworkbook пофиг... не работает и все тут...
Кто еще чего имеет сказать?
...
Рейтинг: 0 / 0
09.09.2009, 20:48
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36187473
PlanB
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PlanB
Участник
madg,

врубай на всех девятую (меньшую, короче)...
и проверь, нет ли на какой из мавшин в References слова MISSING как приписки к активному компоненту. Типа он ссылается на dll-файл, но не может найти...
...
Рейтинг: 0 / 0
09.09.2009, 23:22
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36187478
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
White Owl
Участник
madgСкопировал все на новый лист - и ничего!
Как была ошибка, так и есть...ХЗ даже не знаю что и делать.
Кстати - Thisworkbook или не Thisworkbook пофиг... не работает и все тут...
Кто еще чего имеет сказать?И где ты это писал?
Стало любопытно, скачал твой "Шаблон путевки".... ой... Форматировать код тебя в школе не учили?
Кстати, а ты знаешь что из функции нельзя исправлять значения в листах?
...
Рейтинг: 0 / 0
09.09.2009, 23:32
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36189846
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
White OwlmadgСкопировал все на новый лист - и ничего!
Как была ошибка, так и есть...ХЗ даже не знаю что и делать.
Кстати - Thisworkbook или не Thisworkbook пофиг... не работает и все тут...
Кто еще чего имеет сказать?И где ты это писал?
Стало любопытно, скачал твой "Шаблон путевки".... ой... Форматировать код тебя в школе не учили?
Кстати, а ты знаешь что из функции нельзя исправлять значения в листах?

Про исправлять подробнее...
:) умной какой, форматирование ему не понравилось...сделай красиво и вылож...ежеле не
в лом...
Во! может быть после этого он у меня и заработает? :(
С тоски установил VS2008 буду стряпать exeшник...
НО! Если у кого есть мысли и действия - ОЧЕНЬ прошу отозваться!

Ok.MadG
...
Рейтинг: 0 / 0
10.09.2009, 21:43
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36190192
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
Ну а что там с References - пробовал идентично поставить?
...
Рейтинг: 0 / 0
11.09.2009, 09:18
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36196421
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Вот что еще заметил:
Обрабатываю событие:
Private Sub Worksheet_Calculate()
Все работает, НО!!! очень долго! Т.к., как и было замечено в модуле VLOOKUP2 это событие вызывает почти зацикливание.

Если обрабатываю:
Private Sub Worksheet_Change(ByVal Target As Range)
Зацикливания нет, все работает быстро, кроме описанной выше проблемы.
Итого:
Применение
Sheets("1 сторона").Range("g22").Value = "НЕТ"
т.е. присваивание значения ячейке при обработке события Worksheet_Change порождает ошибку 1004.
нихрена уже не понимаю! А почему на одном из офисов работает?...
...
Рейтинг: 0 / 0
15.09.2009, 12:54
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36196435
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MaximuS_G
Участник
Я бы на Вашем месте, если бы это было действительно важно, попробовал использовать другой алгоритм обработки каких либо операций... Так как известно, что любая проблема имеет множество решений...
...
Рейтинг: 0 / 0
15.09.2009, 12:59
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36196890
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
MaximuS_G, я был бы рад если бы кто нить подсказал как запустить макрос, ТОЛЬКО после обновления данных в определенной ячейке!
По обновлению есть только два метода - один зацикливается, второй глючит...
...
Рейтинг: 0 / 0
15.09.2009, 15:03
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36196923
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
Может это поможет:
/topic/689737
Если изменится значение, запустить
Application.Run "НужныйМакрос"
...
Рейтинг: 0 / 0
15.09.2009, 15:10
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36197272
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MaximuS_G
Участник
А кто может объяснить доходчиво на простых примерах функцию intersect и свойство Precedents из вышеуказанной ссылки ? Заранее благодарен!
...
Рейтинг: 0 / 0
15.09.2009, 16:54
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36414488
mallory
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
mallory
Участник
madg , вы обнаружили причину ошибки
Run-time error '1004': "Application-defined or object-defined error" ?

У меня она выскакивает на коде:
Код: plaintext
1.
2.
Sub CopyMyRange()
    ThisWorkbook.Worksheets("Лист1").Range("MyRange").Copy ("A20:F24")
End Sub

MS Office 2003, WinXP_sp2
...
Рейтинг: 0 / 0
17.01.2010, 14:08
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36416415
Djon Player
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Djon Player
Участник
MaximuS_GА кто может объяснить доходчиво на простых примерах функцию intersect и свойство Precedents из вышеуказанной ссылки ? Заранее благодарен!
Код из ссылки, чтобы понятно о чём был вопрос:
Код: plaintext
1.
2.
3.
4.
5.
'вариант №1
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not (Intersect(Target, Union(Me.Range("A1"), Me.Range("A1").Precedents)) Is Nothing) Then
        MsgBox "A1 изменилось"
    End If
End Sub

Intersect находит пересечение заданных диапазонов.
Precedents - выдаёт диапазон ячеек влияющих на значение формулы в указанной ячейке (ну или диапазоне).

Т.е. если в A1 формула =B1+D1, то Range("A1").Precedents это ячейки B1 и D1.

Так что Intersect(Target, Union(Me.Range("A1"), Me.Range("A1").Precedents)) в данном случае находит пересечение адреса изменённой ячейки и диапазона ячеек из объединения ячейки A1 и ячеек влияющих на A1. Если пересечения нет, то результат Nothing.
...
Рейтинг: 0 / 0
18.01.2010, 17:01
| Ответить | Цитировать | Написать  
Ошибка записи значения в ячейку Excel
    #36416436
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
авторmallory

У меня она выскакивает на коде:
А так?
Код: plaintext
1.
2.
Sub CopyMyRange()
    ThisWorkbook.Worksheets("Лист1").Range("MyRange").Copy [A20]
End Sub
...
Рейтинг: 0 / 0
18.01.2010, 17:10
| Ответить | Цитировать | Написать  
13 сообщений из 38, страница 2 из 2
  2  все
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Ошибка записи значения в ячейку Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=36196923&tid=2178595]:
 0ms
get settings:
 5ms
get forum list:
 12ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 37ms
get topic data:
 8ms
get forum data:
 1ms
get page messages:
 46ms
get tp. blocked users:
 1ms
others: 207ms
total:  321ms
созд. / загр.: 321ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]