|
|
|
|
|
| gorin |
 Понедельник, 03 Мая 2010, 23:04
|
Участник
Профиль
Группа: Участник
Сообщений: 122
Регистрация: 10.04.2002
Из: Тамбов
Пользователь №: 1874
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Давненько тут не появлялся... Вот возникла задачка: необходимо преобразовать документ excel в txt, с разделителем "#" (решетка).В табличке цифры. Как сие действо сделать? Желательно быстро и просто.
Пример:
123#454#54#35#33#12#65#98#
325#12#44#32#65#476#885#64#
--------------------
my ICQ
178275523
дерзайте...
|
|
|
|
|
|
| Helen |
Вторник, 04 Мая 2010, 21:44
|
Участник
Профиль
Группа: Участник
Сообщений: 375
Регистрация: 01.07.2008
Из: Another World
Пользователь №: 27505
Конфигурация
Корпус: Front T-80 350 W Процессор: Другой Материнская плата: Foxconn 945G7AD/Series чипсет Intel Lakeport i945P. DualCore Intel Pentium E2160 1800 Mhz (9x200) Оперативная память: DIMM1: Hyundai HYMP125U64CP8-S5 2 Гб DDR2-800 Видеокарта: NVidia 512 MB GF 9600 GT. Жесткий диск (винчестер): Seagate ST3160815AS (системный) (160 Гб, 7200.10 RPM, SATA-II). Seagate ST3320620AS (320 Гб, 7200.10 RPM, SATA-II). Seagate ST31000528AS (1 Tb 7200.12 SATA-II) Дисковод: 3.5" CD/DVD: Optiarc DVD RW Ad-7190A Модем: Внешний D-Link 2540U Сетевой адаптер: Realtek RTL8168/8111 PCI-E Gigabit Ethernet Adapter (PHY: Realtek RTL8211/8212) Звуковая плата: Realtek ALC861 @ Intel 82801GB ICH7 - High Definition Audio Controller [A-1] Монитор: LG L192WS (19-LCD) Операционная система: Windows XP-Professional SP2 Прочее: ИБП Ippon-400
|
Открыть excel-документ, нажать файл - сохранить как - в поле "Тип файла" выбрать "Текстовые файлы (с разделителями табуляции). На все выскакивающие предупреждения нажать ОК.
Сообщение отредактировал Helen - Вторник, 04 Мая 2010, 21:45
--------------------
С уважением!
Helen
|
|
|
|
|
|
| gorin |
 Среда, 05 Мая 2010, 12:29
|
Участник
Профиль
Группа: Участник
Сообщений: 122
Регистрация: 10.04.2002
Из: Тамбов
Пользователь №: 1874
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
А как разделитель "решетку" поставить?
--------------------
my ICQ
178275523
дерзайте...
|
|
|
|
|
|
| zeroku |
Среда, 05 Мая 2010, 13:47
|
Добрый монстр
Профиль
Группа: WinCity Team
Сообщений: 1076
Регистрация: 06.06.2002
Из: г. Москва
Пользователь №: 2365
Конфигурация
Корпус: -- Процессор: Другой Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: Нет дисковода CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Цитата(gorin @ Среда, 05 Мая 2010, 9:29) А как разделитель "решетку" поставить? Ну, наверное, если цифры в разных столбцах, то вставить прямо в экселе эту решетку, и потом сохранить в *.txt
--------------------
С уважением,
Сергей
|
|
|
|
|
|
| pashulka |
Пятница, 07 Мая 2010, 4:18
|
Участник
Профиль
Группа: Участник
Сообщений: 216
Регистрация: 13.07.2003
Пользователь №: 5551
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Если у Вас установлен Microsoft Excel 2000 или более старшая версия, то в таком случае, можно воспользоваться следующим макросом (перед выполнением убедитесь, что в списке ссылок Tools - References установлена ссылка Microsoft Forms x.0 Object Library, как правило, она подключается автоматически при создании самой первой пользовательской формы) Код Private Sub Test()
Open "C:\Archive.txt" For Output As #1
Range("A1:H10").Copy
With New DataObject
.GetFromClipboard
Print #1, Replace(.GetText(1), vbTab, "#")
End With
Application.CutCopyMode = False
Close #1
End Sub |
|
|
|
|
|
| grh1 |
Четверг, 20 Мая 2010, 14:10
|
Участник
Профиль
Группа: Гость форума
Сообщений: 3
Регистрация: 20.05.2010
Пользователь №: 33794
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Здравствуйте pashulka! Подскажите пожалуйста, к кому можно обратиться за помощью в написании простейшего макроса - есть список из 107 фамилий с именем - надо перенести на другой лист, но в определенные ячейки с определенным шрифтом. Посмотрите файлик пожалуйста посмотретьИз листа "ФИО" раскидать в лист "бейдж" фамилию и отчество Спасибо. Сообщение отредактировал grh1 - Четверг, 20 Мая 2010, 14:13 |
|
|
|
|
|
| pashulka |
Пятница, 21 Мая 2010, 0:19
|
Участник
Профиль
Группа: Участник
Сообщений: 216
Регистрация: 13.07.2003
Пользователь №: 5551
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Если не вдаваться в детали, то можно использовать что-то вроде этого варианта. |
|
|
|
|
|
| grh1 |
Пятница, 21 Мая 2010, 13:28
|
Участник
Профиль
Группа: Гость форума
Сообщений: 3
Регистрация: 20.05.2010
Пользователь №: 33794
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
pashulka Вы супер!!!
Огромное спасибо за помощь.
Сообщение отредактировал grh1 - Пятница, 21 Мая 2010, 14:46
|
|
|
|
|
|
| chinaboyz |
Пятница, 08 Апреля 2011, 19:03
|
Участник
Профиль
Группа: Гость форума
Сообщений: 2
Регистрация: 22.03.2011
Пользователь №: 34481
Конфигурация
Корпус: -- Процессор: -- Материнская плата: -- Оперативная память: -- Видеокарта: -- Жесткий диск (винчестер): -- Дисковод: -- CD/DVD: -- Модем: -- Сетевой адаптер: -- Звуковая плата: -- Монитор: -- Операционная система: -- Прочее: --
|
Да-да, спасибо за помощь огромное! -------------- эффективное продвижение сайта |
|
|
|
|
|
|
|
|
1 чел. читают эту тему (1 Гостей и 0 Скрытых Пользователей)
|
|
0 Пользователей:
|
|
© Copyright by WinCity.Ru 2001 - 2008 | Обратная связьУслуги веб-хостинга предоставлены компанией MTW.RU
|
|
