Excel 2010 VBA Ошибка 1004 с формулой
9710 просмотра
1 ответ
У меня есть этот код:
Dim fStrecke As String
fStrecke = "=A" & z & "*B" & z & "*C" & z
wks.Cells(z, "L").Formula = fStrecke
Dim fZeit As String
fZeit = "=IF(ISBLANK(H" & z & ");((A" & z & "*B" & z & "*I" & z & ")-I" & z & ")+(A" & z & "*B" & z & "*J" & z & ");(A" & z & "*B" & z & "*H" & z & "))"
wks.Cells(z, "K").Formula = fZeit
Первая формула работает, а для второй я получаю ошибку времени выполнения 1004. Любая идея? я отформатировал столбец K как пользователь, определенный с «m: ss».
Автор: bumblebeeman Источник Размещён: 12.11.2019 09:12Ответы (1)
8 плюса
Решение
Для вас есть два варианта:
- использовать
.FormulaLocal
свойство:wks.Cells(z, "K").FormulaLocal = fZeit
- используйте запятую в
,
качестве разделителя вместо точки с запятой;
(даже если ваши локальные настройки требуют в;
качестве стандартного разделителя):
fZeit = "=IF(ISBLANK(H" & z & "),((A" & z & "*B" & z & "*I" & z & ")-I" & z & ")+(A" & z & "*B" & z & "*J" & z & "),(A" & z & "*B" & z & "*H" & z & "))"
wks.Cells(z, "K").Formula = fZeit
Автор: Dmitry Pavliv
Размещён: 20.02.2014 12:00
Вопросы из категории :
- excel-vba Обновить результаты функции Excel VBA
- excel-vba Как найти последнюю строку, содержащую данные на листе Excel с макросом?
- excel-vba Получение Excel для обновления данных на листе из VBA
- excel-vba Относительные вместо абсолютных путей в Excel VBA
- excel-formula Как создать строки, содержащие двойные кавычки в формулах Excel?
- excel-formula Формула Excel для ссылки «CELL TO THE LEFT»
- excel-formula Excel условный подсчет
- excel-formula Создание подсписка на основе второго столбца в Excel
- excel-2010 Excel: невероятное сокращение и расширение элементов управления
- excel-2010 Разрывы строк в сгенерированном CSV-файле сводят меня с ума
- excel-2010 Блокировка определенных ячеек в диапазоне
- excel-2010 Найти текущий язык пользователя
- vba Функция сортировки массива VBA?
- excel Чтение файлов Excel из C #
- excel Лучший способ выполнения контроля версий для MS Excel