Sub Sub()
With ThisWorkbook
.Sheets("Лист1").Range("A1:V33").Copy
.Sheets("Лист3").Range("A1").Select
.Sheets("Лист3").Paste
.Sheets("Лист3").Range("B6:M6").Value = .Sheets("Лист1").Range("B19:M19").Value
End With
End sub
Sanja написал: ...на событие активации Load/Unload форму
Цитата
The_Prist написал: процедуры вызывать методом application.run
Про ети решения знаю, только проблема в том что в Книгу1 нельзя изменять (в части кода) Я думал, что раз можно управлять Книгой1 из Книги2, то и по аналогии можно и Userform.
проблема исчезла и так что изменял: 1.Помолился; 2.Создал другой контрол на форме, сохранил и снова открыл файл и удалил созданый контрол; 3.Обновил адоб ридер..... правда не знаю чем он мог повлиять.
Добрый вечер, В чем может бить проблема при исполнении кода
Код
UserForm.Label1.Visible=true
выскакивает ошыбка: Имя события проблемы: APPCRASH Имя приложения: EXCEL.EXE Версия приложения: 14.0.7132.5000 Отметка времени приложения: 53ec9d06 Имя модуля с ошибкой: unknown Версия модуля с ошибкой: 0.0.0.0 Отметка времени модуля с ошибкой: 00000000 Код исключения: c0000005 Смещение исключения: 00000000 Версия ОС: 6.1.7601.2.1.0.256.4 Код языка: 1058
Дополнительные сведения об этой проблеме: LCID: 1049 skulcid: 1049
Lilo_255 написал: Sub x()If Intersect(Target, Range("F:F")) Is Nothing Then Exit SubIf [A4] = "$$$" Then Exit SubRange("A5").SelectEnd Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range)Call xEnd Sub
откуда процедура х знает об вашем Target, вы же кодом
есть динамическая страница интернет dhtml, в ней функции javascript которые отображают результат если статическая (html), то там все понятно как скопировать нужный текст, но если dhtml возникают проблемы в зупуске кода функции javascript Вопрос: Как скопировать с страницы текст(виден в браузере), который есть результатом выполнения функции javascript?
Я бы удалил проблемный КомбоБокс и нарисовал/скопировал новый. Была такая беда с кнопкой - менялся сам шрифт: не хотел сохранять Times New Roman и всё время сбрасывался на Tahoma. Только хирургическое вмешательство помогло))
у меня примерно тоже самое, талько с размером шрифта. ето уже реальное решение проблемы, а в чем ее корень, непонятно?
в настройках стоит 8, а отражается 10, в чем проблема? На форме есть другие кобмбобоксы так там все нормально. то есть контрол ставит шрифт формы, а не свой
Hugo, Юрий М, Думаю что так я и попробую решить ету задачу... создам несколько процессов, а при завешении задачи закрою.... так думаю будет мудро и понят для меня
есть проблема при вводе данных в ячейку, код перестает работать.... ето типа оно но чего то не хвататет.... нужно чтоб он приостановился(при вводе даных в ячейку), а потом дальше начал работать
vikttur, это большой проект.... резать нет смисла..... суть в чем.... идет распаковка.... и пользователь перед открытием ждет 30-60 сек.... я хотел распаковку сделать уже в процессе работы.... но тогда ексель стопорит..... мне нужно что бы пользователь незаметил выполненния... распаковка может идти и 1-5 мин.... мне неважно
vikttur, Ваш код дает возможность последовательного исполнения Юрий М, Ок, тогда как сделать так что бы пользователь мог проводить свою работу, при етом выполнялся последовательно код(время исполнения для меня не имет значения)