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

Вход

Регистрация

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

 

= Мир MS Excel/поставить в любой значимой ячейке апостроф перед значением - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » поставить в любой значимой ячейке апостроф перед значением
поставить в любой значимой ячейке апостроф перед значением
Hugo Дата: Среда, 09.02.2011, 22:20 | Сообщение № 1
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация: 790 ±
Замечаний: 0% ±

365
Сюда перенесены сообщения из темы http://www.excelworld.ru/forum/2-253-1

webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеСюда перенесены сообщения из темы http://www.excelworld.ru/forum/2-253-1
Автор - Hugo
Дата добавления - 09.02.2011 в 22:20
Uralan Дата: Среда, 09.02.2011, 22:20 | Сообщение № 2
Группа: Пользователи
Ранг: Новичок
Сообщений: 36
Репутация: 0 ±
Замечаний: 0% ±

А еще вопрос офтопом. Есть такой файл, там первые ячейки текстового формата с зелеными засечками, остальные числового, я меняю формат на текстовый (это нужно для SQL'я) абсолютно у всех ячеек. Выделяю все ячейки, пишет, что текстовый, фактически он не меняется (это подтвердит SQL), а также нет этих зеленых засечек в углу каждой ячейки. Как только я редактирую ячейку, нажимая кнопку F2, и Enter. Тогда получается. Просто как это поставить на поток. Таких ячеек полмиллиона, как быть? Я чего-то не пойму, либо это Майкрософт...
К сообщению приложен файл: Bashkirenergo.xls (75.5 Kb)
 
Ответить
СообщениеА еще вопрос офтопом. Есть такой файл, там первые ячейки текстового формата с зелеными засечками, остальные числового, я меняю формат на текстовый (это нужно для SQL'я) абсолютно у всех ячеек. Выделяю все ячейки, пишет, что текстовый, фактически он не меняется (это подтвердит SQL), а также нет этих зеленых засечек в углу каждой ячейки. Как только я редактирую ячейку, нажимая кнопку F2, и Enter. Тогда получается. Просто как это поставить на поток. Таких ячеек полмиллиона, как быть? Я чего-то не пойму, либо это Майкрософт...
Автор - Uralan
Дата добавления - 09.02.2011 в 22:20
Uralan Дата: Среда, 09.02.2011, 22:20 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 36
Репутация: 0 ±
Замечаний: 0% ±

вопрос, как поставить в любой значимой ячейке апостроф перед значением?
 
Ответить
Сообщениевопрос, как поставить в любой значимой ячейке апостроф перед значением?
Автор - Uralan
Дата добавления - 09.02.2011 в 22:20
Hugo Дата: Среда, 09.02.2011, 22:20 | Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация: 790 ±
Замечаний: 0% ±

365
Лучше откройте новую тему с этим вопросом. И поясните, что нужно сделать в примере - там и так 2 столбца в текстовом формате, как я в XL2000 вижу. Но у меня тут нет зелёных треугольников... Вечером на 2007 посмотрю.

webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеЛучше откройте новую тему с этим вопросом. И поясните, что нужно сделать в примере - там и так 2 столбца в текстовом формате, как я в XL2000 вижу. Но у меня тут нет зелёных треугольников... Вечером на 2007 посмотрю.
Автор - Hugo
Дата добавления - 09.02.2011 в 22:20
Hugo Дата: Среда, 09.02.2011, 22:20 | Сообщение № 5
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация: 790 ±
Замечаний: 0% ±

365
Посмотрел в 2007 - да, не всюду зелёное.
Можно таким кодом исправить, поставив апостроф:[vba]
Код

Sub apostrof()
Dim cell As Range
Application.ScreenUpdating = False

For Each cell In Columns("A:B").SpecialCells(xlCellTypeConstants)
cell.Value = "'" & cell.Value
Next

Application.ScreenUpdating = True

End Sub
[/vba]
Сделано под Ваш пример - обрабатываются столбцы A и B.

webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD

Сообщение отредактировал Serge_007 - Среда, 29.03.2023, 16:41
 
Ответить
СообщениеПосмотрел в 2007 - да, не всюду зелёное.
Можно таким кодом исправить, поставив апостроф:[vba]
Код

Sub apostrof()
Dim cell As Range
Application.ScreenUpdating = False

For Each cell In Columns("A:B").SpecialCells(xlCellTypeConstants)
cell.Value = "'" & cell.Value
Next

Application.ScreenUpdating = True

End Sub
[/vba]
Сделано под Ваш пример - обрабатываются столбцы A и B.
Автор - Hugo
Дата добавления - 09.02.2011 в 22:20
Мир MS Excel » Вопросы и решения » Вопросы по Excel » поставить в любой значимой ячейке апостроф перед значением
  • Страница 1 из 1
  • 1
Поиск:

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