C++ работает с Word & Excel

@IceSqueez · Регистрация: 09.08.2011

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

Дело в том что мне на завтра надо написать программку которая записывает 2-мерный массив чисел в Word и Excel. Количество элементов читаются с текст-боксов, а числа заполняются рандомом. При нажатии на 1 кнопку создается таблица n*m в Word, и заполняется значениями с массива, при нажатии на кнопку 2, тоже самое только в Excel.
Нашел пример работы на С#. Как переделать под свою тему и под С++ понятия не имею, подскажите пожалуйста.

Пример на C#

C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using Excel = Microsoft.Office.Interop.Excel;
using Word = Microsoft.Office.Interop.Word;
 
 
namespace lr_5_os_222
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }
 
        private void button1_Click(object sender, EventArgs e)
        {
            Word.Application word = new Word.Application();
            word.Visible = true;
            Object template = Type.Missing;
            Object newTemplate = false;
            Object documentType = Word.WdNewDocumentType.wdNewBlankDocument;
            Object visible = true;
            Word.Document doc = word.Documents.Add(ref template, ref newTemplate, ref documentType, ref visible);
            doc.Select();
            word.Selection.PageSetup.Orientation = Word.WdOrientation.wdOrientLandscape;
            word.Selection.Font.Size = 14;
            word.Selection.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;
            word.Selection.TypeText("Розклад групи на тиждень");
            object oMissing = System.Reflection.Missing.Value;
            Word.Paragraph par = doc.Paragraphs.Add(ref oMissing);
            Object missing = Type.Missing;
            Word.Range rng = doc.Range(ref missing, ref missing);
            rng.Tables.Add(doc.Paragraphs[doc.Paragraphs.Count].Range, 6, 6, ref missing, ref missing);
            Word.Table tbl = doc.Tables[doc.Tables.Count];
            rng.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;
            Word.Border[] borders = new Word.Border[6];
            borders[0] = tbl.Borders[Word.WdBorderType.wdBorderLeft];
            borders[1] = tbl.Borders[Word.WdBorderType.wdBorderRight];
            borders[2] = tbl.Borders[Word.WdBorderType.wdBorderTop];
            borders[3] = tbl.Borders[Word.WdBorderType.wdBorderBottom];
            borders[4] = tbl.Borders[Word.WdBorderType.wdBorderHorizontal];
            borders[5] = tbl.Borders[Word.WdBorderType.wdBorderVertical];
            
 
   foreach (Word.Border border in borders)
            {
                border.LineStyle = Word.WdLineStyle.wdLineStyleSingle;
                border.Color     = Word.WdColor.wdColorBlack;
            }
            //row_header
            tbl.Cell(1, 2).Range.Text = "Понеділок";
            tbl.Cell(1, 3).Range.Text = "Вівторок";
            tbl.Cell(1, 4).Range.Text = "Середа";
            tbl.Cell(1, 5).Range.Text = "Четвер";
            tbl.Cell(1, 6).Range.Text = "П'ятниця";
            //col_header
            tbl.Cell(2, 1).Range.Text = "1";
            tbl.Cell(3, 1).Range.Text = "2";
            tbl.Cell(4, 1).Range.Text = "3";
            tbl.Cell(5, 1).Range.Text = "4";
            tbl.Cell(6, 1).Range.Text = "5";
            //понеділок
            tbl.Cell(2, 2).Range.Text = "Англ. мова";
            tbl.Cell(3, 2).Range.Text = "Ділова англ. мова";
            tbl.Cell(4, 2).Range.Text = "Мат. методи";
            tbl.Cell(5, 2).Range.Text = "-------";
            tbl.Cell(6, 2).Range.Text = "-------";
            //вівторок
            tbl.Cell(2, 3).Range.Text = "Укр. мова";
            tbl.Cell(3, 3).Range.Text = "ООП";
            tbl.Cell(4, 3).Range.Text = "БД";
            tbl.Cell(5, 3).Range.Text = "ОПІ";
            tbl.Cell(6, 3).Range.Text = "-------";
            //середа
            tbl.Cell(2, 4).Range.Text = "-------";
            tbl.Cell(3, 4).Range.Text = "Мат. методи";
            tbl.Cell(4, 4).Range.Text = "КМ";
            tbl.Cell(5, 4).Range.Text = "ВИХОВНА";
            tbl.Cell(6, 4).Range.Text = "-------";
            //четверг
            tbl.Cell(2, 5).Range.Text = "ОС";
            tbl.Cell(3, 5).Range.Text = "Фіз-ра";
            tbl.Cell(4, 5).Range.Text = "КМ";
            tbl.Cell(5, 5).Range.Text = "-------";
            tbl.Cell(6, 5).Range.Text = "-------";
            //пятниця
            tbl.Cell(2, 6).Range.Text = "ОПІ";
            tbl.Cell(3, 6).Range.Text = "ОС";
            tbl.Cell(4, 6).Range.Text = "ООП";
            tbl.Cell(5, 6).Range.Text = "БД";
            tbl.Cell(6, 6).Range.Text = "-------";
        }
 
        private void button2_Click(object sender, EventArgs e)
        {
            //
            Word.Application word = new Word.Application();
            word.Visible = true;
            Object template = Type.Missing;
            Object newTemplate = false;
            Object documentType = Word.WdNewDocumentType.wdNewBlankDocument;
            Object visible = true;
            Word.Document doc = word.Documents.Add(ref template, ref newTemplate, ref documentType, ref visible);
            doc.Select();
            //
            word.Selection.Font.Size = 16;
            word.Selection.BoldRun();
            word.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter;
            word.Selection.TypeText(textBox1.Text);
            word.Selection.TypeParagraph();
            word.Selection.Font.Size = 14;
            word.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphJustify;
            word.Selection.BoldRun();
            //string Str = new TextRange(richTextBox1.Document.ContentStart, richTextBox1.Document.ContentEnd).Text;
            //word.Selection.TypeText(Str);
            word.Selection.TypeText(richTextBox1.Text);
            word.Selection.TypeParagraph();
            word.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight;
            word.Selection.ItalicRun();
            word.Selection.Font.Size = 12;
            word.Selection.TypeText(textBox2.Text);
            word.Selection.TypeParagraph();
            word.Selection.ItalicRun();
            word.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphLeft;
 
 
        }
 
        private void button3_Click(object sender, EventArgs e)
        {
            Random random_mark = new Random();
            Excel.Application excel = new Excel.Application();
            excel.Visible = true;
            excel.SheetsInNewWorkbook = 1;
            excel.Workbooks.Add(Type.Missing);
            Excel.Workbook workbook = excel.Workbooks[1];
            //Excel.Worksheet sheet = workbook.Worksheets.get_Item(1);
            Excel.Worksheet sheet = (Excel.Worksheet)workbook.ActiveSheet;
            sheet.Cells[1, 1] = "Прізвища";
            for (int i = 2; i < 5; i++)
            {
                sheet.Cells[1, i] = "Оцінка " + (i - 1);
            }
            sheet.Cells[1, 7] = "Середній бал";
            for (int i = 1; i <= 3; i++)
            {
                sheet.Cells[i + 1, 1] = "Студент " + (i);
                for (int j = 2; j <= 4; j++)
                {
                    sheet.Cells[i + 1, j] = random_mark.Next(2, 5);
                }
                sheet.Cells[i + 1, 7] = "=СРЗНАЧ(B" + (i + 1) + ":D" + (i + 1) + ")";
            }
        }
    }
}

Добавлено через 3 часа 18 минут
На правах UP'а

))

Новые блоги и статьи Все статьи Все блоги /
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Рецензия / Мнение Это мой обзор планшета X220 с точки зрения школьника. Недавно я решила попытаться уменьшить свой. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .