Builder+Excel - C/C++ - Ответ 4111520

@Simply me · Регистрация: 05.05.2012

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

Здравствуйте! Вот моя программа, которая считывает из excel данные, делает рассчет, записывает данные в новый лист, потом на еще одном листе строит диаграмму. Она правильно работает.

C++

Variant  Application,Books,Book,Book1,Sheets,Sheet,Cells,Cell,Chart;
  Application=CreateOleObject("Excel.Application");
  Application.OlePropertySet("Visible",true);
  Books = Application.OlePropertyGet("Workbooks");
  WideString path1 = GetCurrentDir()+"\\Data.xls" ;
  Book=Books.OleFunction("Open",path1);
  Application.OlePropertySet("Visible", true);
  StringGrid2->Cells[0][0] = Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 1, "A").OlePropertyGet("Value");
  StringGrid2->Cells[0][1]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 2, "A").OlePropertyGet("Value");
  StringGrid2->Cells[0][2]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 3, "A").OlePropertyGet("Value");
  StringGrid2->Cells[0][3]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 4, "A").OlePropertyGet("Value");
  StringGrid2->Cells[0][4]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 5, "A").OlePropertyGet("Value");
  StringGrid2->Cells[0][5]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 6, "A").OlePropertyGet("Value");
  StringGrid2->Cells[1][0]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 1, "B").OlePropertyGet("Value");
  StringGrid2->Cells[1][1]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 2, "B").OlePropertyGet("Value");
  StringGrid2->Cells[1][2]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 3, "B").OlePropertyGet("Value");
  StringGrid2->Cells[1][3]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 4, "B").OlePropertyGet("Value");
  StringGrid2->Cells[1][4]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 5, "B").OlePropertyGet("Value");
  StringGrid2->Cells[1][5]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 6, "B").OlePropertyGet("Value");
  StringGrid2->Cells[2][0]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 1, "C").OlePropertyGet("Value");
  StringGrid2->Cells[2][1]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 2, "C").OlePropertyGet("Value");
  StringGrid2->Cells[2][2]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 3, "C").OlePropertyGet("Value");
  StringGrid2->Cells[2][3]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 4, "C").OlePropertyGet("Value");
  StringGrid2->Cells[2][4]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 5, "C").OlePropertyGet("Value");
  StringGrid2->Cells[2][5]=Application.OlePropertyGet("ActiveSheet").OlePropertyGet
  ("Cells", 6, "C").OlePropertyGet("Value");
  Sheets = Book.OlePropertyGet("Worksheets");
  Sheet=Sheets.OleFunction("Add");
  Cell=Sheet.OlePropertyGet("Cells").OlePropertyGet("Item",2,1);
  Cell.OlePropertySet("Value", WideString(StringGrid2->Cells[3][1]));
  Cell=Sheet.OlePropertyGet("Range","E2:E11");
  Cell.OleProcedure("Select");
  Chart=Application.OlePropertyGet("Charts").OleFunction("Add");

Я открыла файл Excel, поставила кнопку, которая запускает эту програму. Когда нажимаю на кнопку, появляется ошибка is not a valid floating point value. Скажите, пожалуйста, как это исправить!

Вернуться к обсуждению:
Builder+Excel C/C++

Следующий ответ

Другие темы раздела
C/C++ Не могу найти Народ, ищу книгу Дэвид Чеппел. Технологии ActiveX и OLE. Microsoft Press (ISBN 5-7502-0029-9, 1997г). Нигде не могу найти. Упоминания о ней есть, а найти не могу. Помогите кто чем сможет. Или назовите другие книги, на эту тему. https://www.cyberforum.ru/ c-cpp/ thread779108.html	OLE автоматизация C/C++ Добрый день! Помогите пожалуйста новичку. Объясните на пальцах как подключиться к OLE. Есть устройство подключенное через COM порт, управление устройством осуществляется через OLE. В руководстве описано как подключиться из Delphi, но мне нужно из с++. Нашел простые примеры но они работают только в c++ builder а я использую MinGW и Geany. Нашел еще такую инфу. Но для меня сложновато, мне нужно...
C/C++ Word фотографии и програмирование https://www.cyberforum.ru/ c-cpp/ thread772523.html Добрый вечер! Как можно включить в документ Word фотографии: на один лист по шесть фотографий. Приходится по роду деятельности составлять фотообзор и при этом количество фотографий формируемых в документе может достигать 100 шт. При этом на эту механическую работу приходится тратить много времени и составлять таблицы и включать каждую фотографию по отдельности. Как можно автоматизировать или...	C/C++ Работа с Excel У программы есть файл. Нужно чтобы можно было записать из файла excel данные в этот файл и наоборот из этого файла в файл excel. Как и то и другое делается? какие библиотеки подключать? https://www.cyberforum.ru/ c-cpp/ thread767394.html
запуск js C/C++ мне сказали, что для того чтобы запустить джаву в хтмл страницы нужен оли. код страницы "находится" в переменной *cBuffer как мне догрузить страницу скриптами?	C/C++ Фокус окна MS Word Среда MS Visual C++ 6.0, автоматизирую MS Word 2007. Есть задача: определить из моей программы, открыт ли в данный момент вордовский файл с именем DocName. Эту задачу я решил. В результате я получил IMoniker для этого документа и соответствующий IDispatch. Вопрос: как поставить фокус на окно, в котором открыт этот документ? (Напомню, имеется IMoniker и IDispatch)? Еще вариант: по IDispatch я... https://www.cyberforum.ru/ c-cpp/ thread764146.html
C/C++ Как сделать кнопку для печати таблиц из экселя https://www.cyberforum.ru/ c-cpp/ thread759987.html Всем доброго времени! Помогите пожалуйста с очень простой задачей. Как через С++ сделать несколько кнопок для печатей на принтере нескольких таблиц, которые находятся в формате EXCEL. Т.е. есть на одном листе в формате EXCEL 10 страниц с таблицами (на 1 странице-1 таблица), вот чтобы 1 кнопка в С++ распечатала 1 страницу с таблицей один в один, 2 кнопка 2 страницу с таблицей и т.д. Просто в...	Sapi, синтез русской речи C/C++ Использую sapi sdk 5.1 По умолчанию в системе установлен только английский голос. Код: HRESULT hr = CoCreateInstance(CLSID_SpVoice, NULL, CLSCTX_ALL, IID_ISpVoice, (void **)&pVoice); if( SUCCEEDED( hr ) ) {
C/C++ Два компа соединить через USB Собственно, хочу выяснить, возможно ли сделать так, чтобы соединить два компа одним простым USB-шнуром, написать программу для работы с USB как с COM-портом (CDC - Serial Device Class) Будет ли работать такая система? Не сгорят ли USB-порты от такого соединения? Просьба сообщения типа "зачем так извращаться, ведь есть LAN, Wi-Fi, USB Smart Link" не писать. Интересно узнать о возможности... https://www.cyberforum.ru/ c-cpp/ thread743082.html	C/C++ Надстройка для Microsoft Office "Склонение слов" Объясню ситуацию: дали задание на диплом написать надстройку в пакет офиса "склонения слов". Язык должен быть с++ Никогда не создавала надстройки, управлять из моего приложения другими - получается. А так чтобы наоборот:cry: Информации в интернете почти нет, или есть, но запутанная. Вопрос в чем: можно создать надстройку в с++ биледе? или только в вижуале??? https://www.cyberforum.ru/ c-cpp/ thread739126.html
C/C++ SKYPE4COMLib привет всем, я хотел скопировать эту строку в мой проект, //skype.Attach(7, false); skype.MessageStatus += new _ISkypeEvents_MessageStatusEventHandler(skype_MessageStatus); но я не имею члена класса MessageStatus, как перехватывать пришедшие сообщения?..и где можно посмотреть примеров на с++?	C/C++ На зачете спросили по ATL COM С помощью мастера ATL COM в Visual Studio на языке C++ создаем проект LB3_AutoSvr в качестве заготовки проекта для формирования внутрипроцессного сервера с использованием ATL. Добавляем методы в интерфейс IMyMath компонента: В файл Lb3_AutoSvr.idl было добавлено описание методов в транскрипции IDL: interface IMyMath : IDispatch{ HRESULT Add( LONG op1, LONG op2, LONG* pResult); ... https://www.cyberforum.ru/ c-cpp/ thread709190.html

	09.02.2013, 08:42