Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Кому не сложно помогите Добавлено: 01.03.06 17:49  

Автор вопроса:  Mr.Hunt | ICQ: 6822890 
Проблема такая: каждый месяц приносят файл сделаный в экселе с данными по номерам телефонов, т.е. какой номер на какой звонил, сколько проговорил, что потратил.

Нужно написать скрипт или ещё что-нибудь, может обработчик какой, чтобы он эти файлы перелопативал и сохранял тоже в экселевском виде.

Суть такая, там данные разбиты по столбцам, но неправельно, т.к. кто и куда звонил стоит в одном столбце, а должны в разных быть.

пример: 123456 to 654321
        ^кто звонил ^куда звонил
А должно быть в отдельных столбцах кто звонил и куда звонил.


Если не сложно то помогите с этим делом. Я просто не программер ниразу и не знаю как это сделать :-(

Ответить

  Ответы Всего ответов: 3  

Номер ответа: 1
Автор ответа:
 SHDZ



ICQ: 209382104 

Вопросов: 39
Ответов: 244
 Профиль | | #1 Добавлено: 01.03.06 18:04
Str = "123456 to 654321 "
i=instr(Str," to ";)
tel1 = mid(Str,1,i)
tel2 = mid (str,i+1,len(str))
Примерно так,
Ну а ексель вставлять э чтоб разобраться запиши макрос, а потом посмотри что он делал, и допиши свой код

Ответить

Номер ответа: 2
Автор ответа:
 Mr.Hunt



ICQ: 6822890 

Вопросов: 1
Ответов: 1
 Профиль | | #2 Добавлено: 01.03.06 18:19
Спасибо, попробую что-нить навоять....

Ответить

Номер ответа: 3
Автор ответа:
 mynog



Вопросов: 3
Ответов: 42
 Профиль | | #3 Добавлено: 01.03.06 23:42
Человек
просто не программер ниразу и не знаю как это сделать

а ты его таким куском кода и в модуль :)
Можно проще.
Если
123456 to 654321

лежит в сторбце "А", то в столбце "B" пишешь:
=ЛЕВСИМВ(A1;НАЙТИ(" to ";A1;1))

в столбце "C" пишешь:
=ПСТР(A1;ПОИСК(" to ";A1;1)+4;ДЛСТР(A1))


ps. Имена функции для русского Excel'я

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам