Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Определение формата ячеек / 6 сообщений из 6, страница 1 из 1
06.11.2008, 16:55
    #35638218
SonaTech
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определение формата ячеек
Добрый вечер.

Связываюсь с excel через COM
Есть задачка: определить формат ячейки.
В excel-е не силен. Прошу помощи.

_____________________________________________________________________________________
Создание и продвижение сайтов | веб-студия "Sona", г. Ковров
...
Рейтинг: 0 / 0
06.11.2008, 18:21
    #35638494
SonaTech
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определение формата ячеек
про NumberFormat знаю
не подходит
Хотелось бы просто получить формат - что-то вроде xlDate или xlNumber
____________________________________________________________________________________
Создание и продвижение сайтов | веб-студия "Sona", г. Ковров
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
09.12.2009, 11:47
    #36356106
DizeLyaka
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определение формата ячеек
Приветствую всех! Не хочу создавать новую тему. У меня вопрос такой же - как определить формат ячейки и заменить его на другой? Типа так:

Код: plaintext
1.
2.
3.
    If Selection.NumberFormat = "#,##0.00" Then
     Selection.NumberFormat = "0.00"
    End If

Но мне надо изменить формат не на выделенном диапазоне, а только на ячейках с числовым значением
пробую так:

Код: plaintext
ActiveSheet.UsedRange.Selection.Replace What:=NumberFormat("#,##0.00"), Replacement:=NumberFormat("0.00")
...
Рейтинг: 0 / 0
09.12.2009, 11:52
    #36356125
Djon Player
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определение формата ячеек
DizeLyaka,

Попробуйте такой вариант, я сам не проверял:

Код: plaintext
1.
2.
3.
    Application.FindFormat.NumberFormat = "#,##0.00"
    Application.ReplaceFormat.NumberFormat = "0.00"
    Selection.Replace What:="", Replacement:="", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, ReplaceFormat:=True
...
Рейтинг: 0 / 0
09.12.2009, 11:53
    #36356130
Djon Player
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определение формата ячеек
DizeLyaka,

Перед этим наверно надо ещё выполнить код
Код: plaintext
1.
ActiveSheet.UsedRange.Select
...
Рейтинг: 0 / 0
09.12.2009, 12:05
    #36356173
DizeLyaka
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Определение формата ячеек
Djon Player,

Спасибо! Жму руку!
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Определение формата ячеек / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]