|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
25.03.2010, 11:59 | #11 |
Форумчанин
Регистрация: 25.03.2010
Сообщений: 417
|
все понял, просто вместо Workbooks(n), я каждый раз пытался написать что то другое...
|
25.03.2010, 12:05 | #12 |
Форумчанин
Регистрация: 25.03.2010
Сообщений: 417
|
именно то что я и хотел. большой спасибо
|
29.07.2010, 13:58 | #13 |
Форумчанин
Регистрация: 06.01.2010
Сообщений: 292
|
|
29.07.2010, 14:43 | #14 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
If Not x Is Nothing Then [A2] = x.Row & ", " & x.Column 'x.Address
Остальное допишите через & или переменными задайте.
webmoney: E265281470651 Z422237915069 R418926282008
|
29.07.2010, 16:46 | #15 |
Форумчанин
Регистрация: 06.01.2010
Сообщений: 292
|
что означает Sheets(1) и Sheets(2)
|
29.07.2010, 16:53 | #16 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Лист первый и лист второй, по порядку, считать от начала. Вместо цифр можно ставить переменные.
webmoney: E265281470651 Z422237915069 R418926282008
|
05.08.2010, 12:04 | #17 |
Форумчанин
Регистрация: 06.01.2010
Сообщений: 292
|
Ребята помогите плиз.
В книге Job написан макрос на поиск в другой вложеной книге. Если 2-ю книгу не открывать то ничего не находит(((( Посмотрите пожалуйста в чём проблема |
05.08.2010, 12:31 | #18 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Проверил.все переменные считывает правильно.
вы неудачно выбрали код продукта.В файле с данными-ячейки пустые.По другим кодам работает
Анализ,обработка данных Недорого
|
05.08.2010, 12:36 | #19 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
'на этом этапе не находит продукта
.Formula = "='" & iPath & "\[" & iFile & "]Продукти'!$B$1:$B$1000" А Вы смотрели, какая формула получается? Лишний слэш: ='C:\Documents and Settings\balabko\Рабочий стол\тест пош\\[Rate_by_product.xls]Продукти'!$B$1:$B$1000
webmoney: E265281470651 Z422237915069 R418926282008
|
05.08.2010, 12:44 | #20 | |
Форумчанин
Регистрация: 06.01.2010
Сообщений: 292
|
Цитата:
мне кажется что проблема вот в этой части Dim x As Range Application.ScreenUpdating = False: Sheets(1).Activate With Sheets(2).Range("B1:B1000") .ClearContents .Formula = "='" & iPath & "\[" & iFile & "]Ïðîäóêòè'!$B$1:$B$1000" .Value = .Value Не могу разобраться с Sheets(1).Activate и Sheets(2).Range("B1:B1000") Может в них проблема?? |
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Поиск одного изображения в другом | czuryk | Мультимедиа в Delphi | 12 | 29.04.2013 18:13 |
Получить в другом файле тот же текст, записанный заглавными буквами. | Nightt | Помощь студентам | 5 | 21.06.2009 00:01 |
Как в одном файле взять цифру из ячейки другого файла? | Hallo | Microsoft Office Excel | 3 | 26.05.2009 01:25 |
Поиск в файле | hen | Общие вопросы C/C++ | 0 | 11.04.2009 22:34 |
может ли программма выполнять действия описаные в другом файле? | Iceman | Общие вопросы Delphi | 9 | 14.03.2009 21:22 |