[Excel] Расчет формул

@Пётр Нефедов · Регистрация: 04.10.2010

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

Доброго времени суток, камрады!
Оперирую большим массивом данных в Excel, который записываю вначале в StringGrid, а затем дальше в Базу Данных.

Вопрос в следующем: появились ячейки не с данными, а формулами типа "=E100/'Лист1'!E1*100".
Вначале такие ячейки выдавали ошибки "Convert Dispatch to String", изменил участок кода, написав везде:

Delphi

1	Grid1.Cells[i,j]:= sheet.cells[j,i].formula;

Теперь и числа, и формулы пишутся в StringGrid нормально, но формулы так и пишутся как набор операций, а не результат значений. Можно это исправить?
К примеру, можно как-то воспользоваться перерасчетом?

Delphi

    //Запоминаем действующую настройку по пересчёту формул.
    Calculation := exApp.Calculation;
    //Отключаем автоматический пересчёт формул.
    exApp.Calculation := xlCalculationManual;

https://www.cyberforum.ru/post4633294.html

@Mawrat · 24.09.2015, 13:02

Свойства Excel.Range.Formula, Excel.Range.FormulaR1C1 - предназначены для чтения и записи формул. Чтобы прочитать значение ячейки, надо использовать свойство Value (чтение и запись, тип Variant) или Text (только чтение, типы: String, UnicodeString, WideStrinmg, AnsiString). Например, читая свойство Text:

Delphi

1	Grid1.Cells[i,j] := Sheet.Cells[j,i].Text;

@Пётр Нефедов · 24.09.2015, 13:39 **[ТС]**

Mawrat, оказывается все так просто)
Вместо

Delphi

1	sheet.cells[j,i].formula;

написал как вы и рекомендуете

Delphi

1	Sheet.Cells[j,i].Text;

и все заработало, спасибо!!!

Новые блоги и статьи
[Golang] 121. Best Time to Buy and Sell Stock alhaos 28.01.2025 В этой задаче мы получаем слайс целых чисел, которые означают цену акции в разные моменты времени, и должны вернуть максимально возможную прибыль от купли продажи акции. / / . . .	Проектирование и моделирование hw_wired 28.01.2025 Введение в моделирование Моделирование представляет собой один из фундаментальных методов научного познания, который позволяет изучать объекты и явления через создание их упрощенных аналогов. В. . .	Алгоритмы и исполнители hw_wired 28.01.2025 Введение в алгоритмы В современном мире информационных технологий алгоритмы играют основополагающую роль в решении различных задач и автоматизации процессов. Алгоритм представляет собой точную. . .	Хранение информации hw_wired 28.01.2025 Введение: Роль систем хранения информации в современном мире В современную эпоху цифровых технологий эффективное хранение информации становится одним из ключевых факторов успешного развития любой. . .	Обработка числовой информации hw_wired 28.01.2025 Введение в обработку числовой информации В современном мире обработка числовой информации стала неотъемлемой частью как профессиональной деятельности, так и повседневной жизни. Электронные таблицы. . .	Мультимедиа hw_wired 28.01.2025 Введение в мультимедийные технологии В современном мире мультимедийные технологии стали неотъемлемой частью нашей жизни, проникнув во все сферы человеческой деятельности. Термин "мультимедиа". . .
Обработка текстовой информации hw_wired 28.01.2025 Введение в обработку текстовой информации В современном мире обработка текстовой информации играет фундаментальную роль в различных сферах человеческой деятельности. Текстовые редакторы стали. . .	Обработка графической информации hw_wired 28.01.2025 Введение в компьютерную графику Компьютерная графика стала неотъемлемой частью современного цифрового мира, пройдя впечатляющий путь развития от простейших черно-белых изображений до сложных. . .	Python в Алгоритмике: Решение задач hw_wired 28.01.2025 Введение в Python и Алгоритмику В современном мире программирование стало неотъемлемой частью образования и профессионального развития. Python зарекомендовал себя как один из самых популярных и. . .	Компьютер как универсальное устройство для работы с информацией hw_wired 28.01.2025 Введение в устройство компьютера Компьютер представляет собой универсальное электронное устройство, предназначенное для автоматической обработки информации. В современном мире компьютер стал. . .	Информация и информационные процессы hw_wired 28.01.2025 Понятие информации и ее виды В современном мире информация является одним из фундаментальных понятий, пронизывающих все сферы человеческой деятельности. Под информацией понимают любые сведения об. . .	Алгоритмика hw_wired 28.01.2025 Введение: Основы алгоритмики и её роль в информатике В современном мире программирование и алгоритмическое мышление стали неотъемлемой частью образования и профессиональной деятельности. . . .

	24.09.2015, 13:39