False <> 0 ????? - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » False <> 0 ????? (Макросы/Sub)

False <> 0 ?????

RAN

Дата: Воскресенье, 30.08.2015, 11:16 | Сообщение № 1

Группа: Друзья

Ранг: Экселист

Сообщений: 5660

Репутация: 1163 ±

Замечаний: 0% ±

2010

Мяв!
Играюсь с настройками печати.
Пишу
[vba]

Код

.FitToPagesTall = 0

[/vba]
прибегает коза.

Пишу
[vba]

Код

.FitToPagesTall = False

[/vba]
коза убегает
????????

К сообщению приложен файл: 6899844.jpg (10.0 Kb)

Быть или не быть, вот в чем загвоздка!

Ответить

AndreTM

Дата: Воскресенье, 30.08.2015, 11:59 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 1762

Репутация: 500 ±

Замечаний: 0% ±

2003 & 2010

.FitToPagesTall и .FitToPagesWide - это количество страниц, на которых размещается документ (в высоту или ширину), может быть либо положительным числом, либо False (тогда идет обработка связанного параметра). Соответственно, данные параметры не могут принимать значения <=0, а значит, и True ( = -1 после приведения).
В общем, надо отвыкать от "0 - это False, не 0 - это True". Вернее, данные эквиваленты допустимо использовать с операторами языка, или для битовой логики, - но никак не со свойствами/методами объектов (подразумевающими обработку процедурой property)

Skype: andre.tm.007
Donate: Qiwi: 9517375010

Сообщение отредактировал AndreTM - Воскресенье, 30.08.2015, 12:22

Ответить

RAN

Дата: Воскресенье, 30.08.2015, 12:48 | Сообщение № 3

Группа: Друзья

Ранг: Экселист

Сообщений: 5660

Репутация: 1163 ±

Замечаний: 0% ±

2010

По количеству страниц все понятно, но чему тогда равно значение False в этом случае?

The False keyword has a value equal to 0.

Быть или не быть, вот в чем загвоздка!

Ответить

AndreTM

Дата: Воскресенье, 30.08.2015, 15:27 | Сообщение № 4

Группа: Друзья

Ранг: Старожил

Сообщений: 1762

Репутация: 500 ±

Замечаний: 0% ±

2003 & 2010

False в этом случае - это false.

Свойство FitToPagesTall объекта PageSetup описано как Variant.
Описание класса может содержать что-то вроде
[vba]

Код

Dim PagesToTall as Long

Public Property Let FitToPagesTall(propertyValue)
If propertyValue = False Then
' проверяем .FitToPagesWide
Else
     If propertyValue >= 1 Then
         PagesToTall = Round(propertyValue, 0)
     Else
         Err.Raise 1004
     End If
End If
End Property

[/vba]

Цитата RAN, 30.08.2015 в 12:48, в сообщении № 3

has a value equal to 0

как раз и означает, что эквивалентное, но не равное

Skype: andre.tm.007
Donate: Qiwi: 9517375010

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » False <> 0 ????? (Макросы/Sub)

Страница 1 из 1
1