Обнуляется переменная в макросе

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

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

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Обнуляется переменная в макросе (Макросы/Sub)

Wasilich

Дата: Четверг, 15.12.2016, 13:40 | Сообщение № 1

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

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

Сообщений: 1232

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

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

2003

Всем доброго времени суток! Столкнулся со странностью. Определяется № строки в переменную и тут же, в следующей строке макроса эта переменная обнуляется. Чё это?

Где собаку зарыл? Подскажите плиз.
Собака в примере.

К сообщению приложен файл: 9748879.xls (24.5 Kb)

Ответить

sboy

Дата: Четверг, 15.12.2016, 13:56 | Сообщение № 2

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

Ранг: Участник клуба

Сообщений: 2566

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

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

Excel 2010

Добрый день.
У Вас было две переменных R. В окне Locals видно, что одна R=12, а вторая R= 0
Пользуйтесь Option Explicit, такие ошибки не пройдут.

К сообщению приложен файл: 8307911.xls (33.5 Kb)

Яндекс: 410016850021169

Ответить

krosav4ig

Дата: Четверг, 15.12.2016, 13:57 | Сообщение № 3

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

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

Сообщений: 2347

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

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

Excel 2007,2010,2013

Добрый день.
У вас неразрывные пробелы перед [vba]

Код

R =

[/vba]
и из-за этого VBE считает ее другой переменной (в Locals видно, там одна лишняя строчка)

email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Ответить

K-SerJC

Дата: Четверг, 15.12.2016, 14:00 | Сообщение № 4

Группа: Проверенные

Ранг: Обитатель

Сообщений: 487

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

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

Excel 2013

Цитата Wasilich, 15.12.2016 в 13:40, в сообщении № 1 ()

Собака в примере.

так работает

[vba]

Код

Sub www()
Dim R&, RR&
  With Sheets("искомый")
    isk = "eee"
    If isk <> "" Then R = .Cells.Find(What:=isk, LookAt:=xlPart).Row: RR = R: MsgBox R & "  Обнулилась переменная R"
    End With
End Sub

[/vba]

Благими намерениями выстелена дорога в АД.

Ответить

Wasilich

Дата: Четверг, 15.12.2016, 14:03 | Сообщение № 5

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

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

Сообщений: 1232

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

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

2003

Цитата sboy, 15.12.2016 в 13:56, в сообщении № 2 ()

В окне Locals видно

А где это окно. В 2003-м оно есть?

Ответить

_Boroda_

Дата: Четверг, 15.12.2016, 14:04 | Сообщение № 6

Группа: Модераторы

Ранг: Местный житель

Сообщений: 16675

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

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

2003; 2007; 2010; 2013 RUS

Виев - Локалс

В 2003 есть

К сообщению приложен файл: 0898920.png (31.2 Kb) · 4526295.png (37.4 Kb)

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995