Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Программирование, связанное с MS Office > формат ячейки должен быть только числовым!

Автор: Ved 5.10.2007, 16:14

хочу сделать (ложь или истина) ну там если допустим водится целое число то истина, если чтота другое то ложь!
Не знаю как код написать всмысле как екселю обьяснить что ввелось число и что ввелось не число!
есть какаято функция на проверку ячейки на формат ввода чтоли!
Думаю понятно объяснил!

Код


if Range("B1")  цыфра then true
не цыфра  false

примерно так тока не знаю как обозвать цыфру!
smile

Автор: Genyaa 5.10.2007, 16:17

См. Меню-Данные-Проверка.

Автор: kapbepucm 8.10.2007, 08:23

Код

Public Function IsNumber1(a As Range)
On Error GoTo ErrLabel
Dim DV As Double
  DV = CDbl(a)
  IsNumber1 = True
Exit Function
ErrLabel:
    IsNumber1 = False
  If Err.Number <> 13 Then
    MsgBox "Unknown error!", vbCritical
  End If
End Function

Автор: RockClimber 8.10.2007, 17:42

Не очень понятно, что проверять - введено именно целое число или просто любое число? Во втором случае есть функция IsNumber.

Код


If IsNumber(Range("A1")) then
...

Автор: Ved 11.10.2007, 07:47

RockClimber,
Всё спасибо просто не знал какую функцию искать !
Помог !
Тему решенной считаю лови ПЛЮС