Формула. Не пойму, почему не работает?

@Marina_33 · Регистрация: 15.09.2020

Студворк — интернет-сервис помощи студентам

Добрый день!
не пойму почему не работает,

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Sub Проверка_ГУ()
  Dim i As Long
  Dim k As Long
  Dim a As String
  Dim b As String
 
  k = 1
  a = ""
  b = ""
 
  For i = 3 To 12
    a = Cells(i, 8).Value
    b = Cells(i - k, 8).Value
 
    Cells(i, 6).Formula = "= (Cells(i, 8) - Cells(i - k, 8))*24"
  Next i
 
End Sub

@Marina_33 · 02.10.2020, 10:20 **[ТС]**

Во вложении файл

@Hugo121 · 02.10.2020, 10:36

По этому примеру:
я уже ранее говорил что далее всплывает переменная tip_sobstv. вот теперь с нею разбирайтесь.
Кстати, строка 54 с тем текстом сейчас и не срабатывает вообще, если запускать вот как есть файл.
Если запускать повторно - тогда уже конечно и срабатывает, но выдаёт ошибку потому что не может преобразовать дату в текстовом виде в дату в текстовом виде

@Marina_33 · 02.10.2020, 10:45 **[ТС]**

даже если удалить переменную tip_sobstv не срабатывает код

@Hugo121 · 02.10.2020, 10:49

Её не нужно удалять, у неё должно быть нужное значение!

Добавлено через 1 минуту
Ну и далее сразу naim_oper...

Добавлено через 53 секунды
Вот я отключил эту возню с ВПР, и код отработал без ошибок.

Добавлено через 41 секунду
Что сделал код я не анализировал.
Но после этого второй раз уже не работает, причину я указал выше.

Новые блоги и статьи Все статьи Все блоги /
Nekobox - outbounds[0].transport: unknown transport type: raw damix 01.10.2026 Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .

@Hugo121 6998 / 2896 / 555 Регистрация: 19.10.2012 Сообщений: 8,804
	02.10.2020, 10:36
	По этому примеру: я уже ранее говорил что далее всплывает переменная tip_sobstv. вот теперь с нею разбирайтесь. Кстати, строка 54 с тем текстом сейчас и не срабатывает вообще, если запускать вот как есть файл. Если запускать повторно - тогда уже конечно и срабатывает, но выдаёт ошибку потому что не может преобразовать дату в текстовом виде в дату в текстовом виде 0

@Marina_33 0 / 0 / 0 Регистрация: 15.09.2020 Сообщений: 47
	02.10.2020, 10:45 [ТС]
	даже если удалить переменную tip_sobstv не срабатывает код 0

@Hugo121 6998 / 2896 / 555 Регистрация: 19.10.2012 Сообщений: 8,804
	02.10.2020, 10:49
	Её не нужно удалять, у неё должно быть нужное значение! Добавлено через 1 минуту Ну и далее сразу naim_oper... Добавлено через 53 секунды Вот я отключил эту возню с ВПР, и код отработал без ошибок. Добавлено через 41 секунду Что сделал код я не анализировал. Но после этого второй раз уже не работает, причину я указал выше. 0