Экспорт/Импорт диапазона ячеек в текст и обратно на лист

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Экспорт/Импорт диапазона ячеек в текст и обратно на лист (Макросы Sub)

Gauradas

Дата: Понедельник, 15.07.2013, 14:19 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 16

Репутация: 0 ±

Замечаний: 0% ±

Excel 2003

Доброго времени суток всем!
Столкнулся с задачей сохранения данных.
Есть необходимость регулярной выгрузки данных определенных ячеек в C:\MIDI\dadra_*.txt.
где * - всякий раз новое имя
Затем когда возникает необходимость - то импортировать данные снова на лист из C:\MIDI\dadra_*.txt
Желательно все реализовать с помощью 2-х кнопок: 1. Экспорт и 2. Импорт (см. файл)
Предполагается что лист будет защищен, но как я понял это не мешает отправке данных в файл.
Диапазоны ячеек для сохранения:
Range ("B1:P21")
К примеру "Экспорт" можно так:
[vba]

Код

Private Sub CommandButton2_Click()
                 Open "C:\MIDI\dadra_i.txt" For Output As #1
                      Range("B1:P21").Copy
                      With New DataObject
                           .GetFromClipboard
                           Print #1, Replace(.GetText(1), vbTab, "&")
                      End With
                      Application.CutCopyMode = False
                 Close #1
End Sub

[/vba]
Как создать диалоговое окошко и выполнить обратную операцию "Импорт" также с диалговым окном?
Хотелось бы при импорте проверку на соответствие по первой строчке dadra_*.txt

Помогите люди добрые!
Хотя кому-то эта операция покажется простой wink

но мне сложно реализовать эту операцию на практике

Код

но мне сложно реализовать эту операцию на практикеGauradas

К сообщению приложен файл: dadratal.rar (35.1 Kb)

Сообщение отредактировал Gauradas - Понедельник, 15.07.2013, 14:33

Ответить

СообщениеДоброго времени суток всем!
Столкнулся с задачей сохранения данных.
Есть необходимость регулярной выгрузки данных определенных ячеек в C:\MIDI\dadra_*.txt.
где * - всякий раз новое имя
Затем когда возникает необходимость - то импортировать данные снова на лист из C:\MIDI\dadra_*.txt
Желательно все реализовать с помощью 2-х кнопок: 1. Экспорт и 2. Импорт (см. файл)
Предполагается что лист будет защищен, но как я понял это не мешает отправке данных в файл.
Диапазоны ячеек для сохранения:
Range ("B1:P21")
К примеру "Экспорт" можно так:
[vba]

Код

но мне сложно реализовать эту операцию на практике

Автор - Gauradas
Дата добавления - 15.07.2013 в 14:19

AndreTM

Дата: Среда, 17.07.2013, 12:02 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 1762

Репутация: 501 ±

Замечаний: 0% ±

2003 & 2010

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

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

)

Skype: andre.tm.007
Donate: Qiwi: 9517375010

Ответить

Экспорт/Импорт диапазона ячеек в текст и обратно на лист (Макросы Sub)

Страница 1 из 1
1