Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Сохранить файл в "CSV" - Страница 3 - Мир MS Excel

Старая форма входа
  • Страница 3 из 3
  • «
  • 1
  • 2
  • 3
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Сохранить файл в "CSV"
Сохранить файл в "CSV"
ikki Дата: Пятница, 09.11.2012, 22:19 | Сообщение № 41
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
Jam, предыдущий мой пост - не вам.

помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki
 
Ответить
СообщениеJam, предыдущий мой пост - не вам.
Автор - ikki
Дата добавления - 09.11.2012 в 22:19
Jam Дата: Пятница, 09.11.2012, 22:20 | Сообщение № 42
Группа: Пользователи
Ранг: Новичок
Сообщений: 42
Репутация: 0 ±
Замечаний: 0% ±

smile да уже понял )
 
Ответить
Сообщениеsmile да уже понял )
Автор - Jam
Дата добавления - 09.11.2012 в 22:20
nerv Дата: Пятница, 09.11.2012, 22:25 | Сообщение № 43
Группа: Редакторы
Ранг: Обитатель
Сообщений: 431
Репутация: 193 ±
Замечаний: 0% ±

Quote (ikki)
имхо, слишком много вариантов.

факт

не понял что подразумевалось под базой. Если _2.xls, можно попробовать так
Code
[\d+]+(?=")

Чебурашка стал символом олимпийских игр. А чего достиг ты?
Тишина - самый громкий звук

YM 41001156540584 / WM WMR R21924176233

https://github.com/nervgh/vba
 
Ответить
Сообщение
Quote (ikki)
имхо, слишком много вариантов.

факт

не понял что подразумевалось под базой. Если _2.xls, можно попробовать так
Code
[\d+]+(?=")
Автор - nerv
Дата добавления - 09.11.2012 в 22:25
Jam Дата: Пятница, 09.11.2012, 22:38 | Сообщение № 44
Группа: Пользователи
Ранг: Новичок
Сообщений: 42
Репутация: 0 ±
Замечаний: 0% ±

Quote (nerv)
Формула:
[\d+]+(?=")

Извините, а это вместо чего подставлять? в какой отрезок кода?
 
Ответить
Сообщение
Quote (nerv)
Формула:
[\d+]+(?=")

Извините, а это вместо чего подставлять? в какой отрезок кода?
Автор - Jam
Дата добавления - 09.11.2012 в 22:38
Jam Дата: Пятница, 09.11.2012, 23:40 | Сообщение № 45
Группа: Пользователи
Ранг: Новичок
Сообщений: 42
Репутация: 0 ±
Замечаний: 0% ±

а где в коде нужно поменять, чтобы заменял все "+7" в одинадцатизначных числах на "8"
 
Ответить
Сообщениеа где в коде нужно поменять, чтобы заменял все "+7" в одинадцатизначных числах на "8"
Автор - Jam
Дата добавления - 09.11.2012 в 23:40
ikki Дата: Суббота, 10.11.2012, 00:00 | Сообщение № 46
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
это немного другой код
[vba]
Code
Sub yyy()
     Dim c As Range
     With CreateObject("vbscript.regexp")
         .Pattern = "\+7(?=\d{10}"")"
         .Global = True
         For Each c In Range("a2", [a65536].End(xlUp)).Cells
             c.Value = .Replace(c.Text, "8")
         Next
     End With
End Sub
[/vba]

помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki
 
Ответить
Сообщениеэто немного другой код
[vba]
Code
Sub yyy()
     Dim c As Range
     With CreateObject("vbscript.regexp")
         .Pattern = "\+7(?=\d{10}"")"
         .Global = True
         For Each c In Range("a2", [a65536].End(xlUp)).Cells
             c.Value = .Replace(c.Text, "8")
         Next
     End With
End Sub
[/vba]
Автор - ikki
Дата добавления - 10.11.2012 в 00:00
Jam Дата: Суббота, 10.11.2012, 02:35 | Сообщение № 47
Группа: Пользователи
Ранг: Новичок
Сообщений: 42
Репутация: 0 ±
Замечаний: 0% ±

Всем огромное спасибо, индивидуальное спасибо Александру.
Тему можно закрывать!
 
Ответить
СообщениеВсем огромное спасибо, индивидуальное спасибо Александру.
Тему можно закрывать!
Автор - Jam
Дата добавления - 10.11.2012 в 02:35
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Сохранить файл в "CSV"
  • Страница 3 из 3
  • «
  • 1
  • 2
  • 3
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!