Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вопрос по импорту Excel / 9 сообщений из 9, страница 1 из 1
23.04.2011, 14:11
    #37230145
guzel09
guzel09
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по импорту Excel
Привет всем. Можно ли в Excel написать макрос для импотра данных из другого файла Excel. Почему то у меня переносятся не все данные. Например на листе несколько столбцов чисел и первые три строки заголовки столбцов. так вот числа импортируются, а заголовки нет. Переносится только заголовок первого столбца. Из текстового файла все переносится без проблем. В чем причина не подскажите?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.04.2011, 23:19
    #37230468
R Dmitry
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по импорту Excel
Если структура данных разная, то забудьте про обычный импорт.
Придется открывать файл, брать что надо и закрывать


код привожу надеюсь пристроите для себя

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Sub file_open_value()
Dim a, fh$
Application.ScreenUpdating =  0 
fh = "C:\файл.xls"
With GetObject(fgh)
        With .Sheets( 1 )
        a = .Range("a1:b20").Value
        End With
    .Close  0 
End With
Range("a1:b20") = a
Application.ScreenUpdating =  1 
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.04.2011, 10:36
    #37231506
R Dmitry
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по импорту Excel
Код: plaintext
With GetObject(fh)


тут (fgh) буква лишняя затесалась :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.04.2011, 12:53
    #37231790
NullUzer
NullUzer
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по импорту Excel
guzel09,

А примерчик можно?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2011, 16:05
    #37234099
guzel09
guzel09
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по импорту Excel
NullUzer,
Примерчик:
Нужно открыть файл сравнение.xls , дважды щелкнуть на листе. Появится форма в которой нужно указать путь к файлу Для сопоставления данных 25.04.2011.xls (для работы указать в двух местах) и нажать кнопку импорт. В результате не все данные перекинуться на листы импорт1 и импорт2 (нет первых двух строк).
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2011, 16:14
    #37234120
guzel09
guzel09
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по импорту Excel
R Dmitry,

Спасибо за помощь!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2011, 16:15
    #37234125
NullUzer
NullUzer
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по импорту Excel
guzel09,

Это показания АСКУЭ? :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.04.2011, 10:18
    #37235240
guzel09
guzel09
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по импорту Excel
NullUzer,

Да. "Системы и технологии" Пирамида2000. Ты этим занимался?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.04.2011, 12:32
    #37235542
NullUzer
NullUzer
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по импорту Excel
guzel09,

Да у нас какой-то Энфорс :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Вопрос по импорту Excel / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 387ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2176931]:
 0ms
get settings:
 4ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 149ms
get topic data:
 5ms
get forum data:
 1ms
get page messages:
 22ms
get tp. blocked users:
 1ms
others: 192ms
total:  387ms
x
x
Закрыть


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