close

Вход

Забыли?

вход по аккаунту

?

MIOLE

код для вставкиСкачать
???????????? ??????????? ??
??????? ??????????????? ???????????
????????? ?????????? ? ?????????????? ???????
??????? ?????????? ? ????????????
?.?. ???????
????????????? ????????????? OLE-????????
??????? ??????? ??? ??????????
???????????? ????? ??? ?????????
????????????? 07.19.00 "?????????????? ??????? (?????????? ? ????????????????)"
?????????? "????????????? ???????????? ?????"
????????????? 07.19.00, IV ????, ??????? ?????????
????? 2003
?????????? ?? ??????? ???????????-????????????? ?????? ???????? ???????????????? ????????????
??? 004.7(07)
?228
? ? ? ? ? ? ? ? ??????? ??????-?????????????? ????,
????????? ??????? ?????????? ?????????? ?.?. ???????? ??????? ?.?. ????????????? ????????????? OLE-????????: ??????? ??????? ??? ?????????? ???????????? ?????. - ?????: ???-?? ?????, 2003. - 28 ?.
???????? ?.?. ?????????
????????? ? ?????????.???.?.1,8
?????? ?????????????? ????? Aficio 1022
????? ? 161????? 32?????????
????? ????????? ? ????????-??????, ??????????????? ???????.
610 000, ?.?????, ??. ??????????,36
?????????? ???????, ???????????? - ???? ?????
? ??????? ??????????????? ???????????, 2003
? ?.?. ???????, 2003
??????????
????????4???????????? ?????? ? 15???????????? ?????? ? 27???????????? ?????? ? 310???????????? ?????? ? 414????????????????? ??????17??????????. ?????????? ???????? ?? ???????????????? ? Visual Basic ??? MS Excel
19
????????
????????? ??????? ???????? ??????? ??? ?????? ????? ????????????? ?????????? ?? ?????????? "????????????? ???????????? ?????".
??????? ???????????? ??????? ? ????????? ??????? ?????? ? ??????? OLE-??????????? (MS Word, MS Excel), ????? ???????????????? ? ????? Borland C++Builder ? ????? ?????? ? ?????????? OLE. ?????????? ? ??????? ??????? ????????????? ?? ?????? MS Office 2000 ? Borland C++ Builder 5.0.
?????? ???????????? ?????? ????? ????????????? ??? ???????? ????? ???????????????? ???????? ?? ????? Visual Basic ??? MS Excel.
?????? ???????????? ?????? ???????? ??????????? ?? ???????? ??????? ??? MS Word. ???????? ??????? ?? ?????? ?????? - ??????? ?? ?????? ????? OLE-?????????.
?????? ???????????? ?????? ????????? ?????????? OLE-????????? ????? ????????????? ????????? ?????????? ???????????, ????????????? ??? ?????? ?????????????? ???????? ?????????? (Borland C++ Builder). ? ?????? ?????? ?????? ??????????? ?????????? ????????? MS Excel.
????????? ???????????? ?????? ?????????? ???????? ???????, ?.?. ?????????? ???????????? MS Word ? MS Excel ????? ????????????? ?????????? OLE ???????????, ????????????? ? ????? Borland C++ Builder, ? ???????? ? ????????? ????????????? ????????, ????????????? ? Visual Basic ??? ??????????????? OLE-??????.
??????????? ?????????? ???????? ??????? ? ???????????. ??? ?????????? ???????????? ????? ?1 -2 ?????? ?????????? ???????? ?????????? [3, 4, 6]. ????? ???????? ? ?????????? OLE ????? ?????????? ?? ????????? [5]. ? ???????? ??????????? ?? ?????????? ???????????? ??????????? ? ????? Borland C++ Builder ????? ???????????? ????????? [1, 2].
???????????? ?????? ? 1
???????????????? ???????? ? MS Excel
???? ??????: ??????? ???????? ?????? ????????????? ????????? ??????, ?????????? ? ???????????????? ??? ?????????? ???????? Visual Basic ??? MS Excel:
1) ??????????? ???????? ????;
2) ??????????? ? ????????? ??????, ?????????????? ????????;
3) ???????? ? ?????????? ??????;
4) ???????????? ??????????? ????????; ??????.
???????? ??????? ???????????????? ?? Visual Basic ??? MS Excel
Visual Basic ??????????? ?? ???? "??????->??????" MS Excel. ??????? ????? ??????????? ??? ?????? ?????? "Insert User Form". ??????? ???????????? ????????? ?? ????? ???????????? ??????? Drag&Drop. ???????? ? ?????????????? ??????? ???????????? ????????? ?????????????? ?? ?????????? ??????????? ????????????????. ? ???? ???? ????? ?? ????????????????? ??????? ?????????? ???????????? ??????? ? ??? ???????, ? ??????? ????? ????????????? ???????.
??????? ??????? ????? ????????? ??????:
1) ?????? ?? Excel ("??????->??????->?????? ??????");
2) ?????????? ??????????????? ? Visual Basic ? ??????????????? ????????? ?????? ? ???????.
??????? ? ??????? Visual Basic, ???????????? ??? ????????????????, ????????? ? ?????????? 1.
???????. ??????????? ??????, ?????????????? ???????? ?????, ?????????? ???????????? ????????, ??????????? ????????? ???????? ???????? ???????? ???????.
??????? 1. ???????? ?????? ????? ?????. ???????? ?? ???? ??????????? ?? ??????? DBF. ?????????? ???????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ?????.
??????? 2. ???????? ?????? ????? ?????. ????????? ??????? ?? ???? ????????: ?????????? ????? ? ???????? (? ???????? ???????? ????? ?????, ????????, ?????????????? ??? ?????????????? ??????????, ?????????????????? ????????? ? ??.). ?????????? ????? ? ???? ?? ??????? DBF. ?????????? ?????????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????.
??????? 3. ???????? ?????? ????? ?????. ???????? ??????? ????? ??????????? ?????? ?? ?????? ??????????? ?????????, ??????????? ?? ?????? ?????, ????????? ?????????????. ?????????? ????????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ?????.
??????? 4. ???????? ?????? ????? ?????. ???????? ?? ???? ??????????? ?? ??????? DBF. ?????????? ?????????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ????????? ?? ???????. ?????????? ?????.
??????? 5. ???????? ?????? ????? ?????. ???????? ??????? ????? ??????????? ?????? ?? ?????? ??????????? ?????????, ??????????? ?? ?????? ?????, ????????? ?????????????. ?????????? ????????? ?? ???????. ?????????? ????????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ?????.
??????? 6. ???????? ?????? ????? ?????. ???????? ??????? ????? ??????????? ?????? ?? ?????? ??????????? ?????????, ??????????? ?? ?????? ?????, ????????? ?????????????. ?????????? ???????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????? ?????. ?????????? ?????.
??????? 7. ???????? ?????? ????? ?????. ???????? ?? ???? ??????????? ?? ??????? DBF. ?????????? ????? ? ???? ?? ??????? DBF. ?????????? ?????????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????? ?????.
??????? 8. ???????? ?????? ????? ?????. ????????? ??????? ?? ???? ????????: ?????????? ????? ? ???????? (? ???????? ???????? ????? ?????, ????????, ?????????????? ??? ?????????????? ??????????, ?????????????????? ????????? ? ??.). ?????????? ????????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????? ?????. ?????????? ?????.
??????? 9. ???????? ?????? ????? ?????. ???????? ?? ???? ??????????? ?? ??????? DBF. ?????????? ???????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ????????? ?? ???????. ?????? ???????. ?????????? ?????.
??????? 10. ???????? ?????? ????? ?????. ???????? ??????? ????? ??????????? ?????? ?? ?????? ??????????? ?????????, ??????????? ?? ?????? ?????, ????????? ?????????????. ?????????? ????????? ?? ???????. ?????????? ????????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????? ???????. ?????????? ?????.
??????? 11. ???????? ?????? ????? ?????. ???????? ?? ???? ??????????? ?? ??????? DBF. ?????????? ?????????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ????????? ?? ???????. ?????? ???????. ?????????? ?????.
??????? 12. ???????? ?????? ????? ?????. ????????? ??????? ?? ???? ????????: ?????????? ????? ? ???????? (? ???????? ???????? ????? ?????, ????????, ?????????????? ??? ?????????????? ??????????, ?????????????????? ????????? ? ??.). ?????????? ????????? ?? ???????. ?????????? ????????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????? ???????. ?????????? ?????.
?????????? ? ??????.
1. ????????? ????.
2. ???? ??????.
3. ??????? ? ???????????? ? ?????????.
4. ????????.
5. ???????? ?????.
6. ?????????????? ????.
7. ?????????? ?????????? ??????? ?????? (???? ????????? ? ???????????? ? ????????).
8. ??????. ???????, ????? ??????????? Visual Basic ?? ????????????? ????????? ?????? ???? ???????? ??? ?????????? ?????? (????????????????? ??????, ???????? ????????????? ????????????? ???????? ? ?.?.).
???????????? ?????? ? 2
???????????????? ???????? ? MS Word
???? ??????: ??????? ???????? ?????? ????????????? ????????? ??????? ??? ?????????? ???????? Visual Basic ??? MS Word:
1) ??????????? ???????? ????;
2) ??????????? ? ?????????????? ???????, ????????? ? ????? ???????? ??????????;
3) ????? ? OLE-????????????.
???????? ??????? ???????????????? ?? Visual Basic ??? MS Word ?????????? ???????? ??? MS Excel. ?? ?????????, ????????????? ? ?????? ??????, ??????? ????????? ??????????.
1) ?????? ? ??????????? ?????? ???????????? ????????? ???????:
' ???????? ?????
Set dlg = Dialogs(wdDialogFileOpen)
aButton = dlg.Display
fSelected = dlg.Name
If aButton = -1 Then
Set MyDoc = Documents.Open(fSelected)
End If
' ?????????? ?????
Set dlg = Dialogs(wdDialogFileSaveAs)
aButton = dlg.Display
fSelected = dlg.Name
fFormat = dlg.FileType
If aButton = -1 Then
MyDoc.SaveAs FileName:=fSelected, FileFormat:=fFormat
End If
2) ????????? ? ???????? ?????????? ???????????? ????? ?????? Documents.
3) ????????? ? ??????, ???????, ??????, ????????????, ????????, ???????? ????????? ???????????? ?????????????? ????? ??? ?????? Words, Paragraphs, Characters, Sentences, Sections, Tables.
4) ????????? ? OLE-??????????? ???????????? ?????????? ???????????? ???????:
If Tasks.Exists("Microsoft Excel") = True Then
Set xlObj = GetObject(, "Excel.Application")
Else
Set xlObj = CreateObject("Excel.Application")
End If
xlObj.Visible = True
File = xlObj.GetOpenFilename("????? Excel,*.xls")
If File <> False Then
xlObj.Workbooks.Open File
xlObj.Activesheet.UsedRange.Copy
xlObj.ActiveWorkBook.Close (False)
MyDoc.Range.Paste
End If
???????. ??????????? ??????, ?????????????? ???????? ?????, ?????????? ???????????? ????????, ??????????? ????????? ???????? ???????? ???????? ???????.
??????? 1. ???????? ?????? ?????????. ?????? Excel ? ????????? ????????? ????????????? ?????. ??????????? ??????????? ??????? ????? ????? ? ???????? Word ? ???? ???????. ?????? ?????????. ?????????? ?????????.
??????? 2. ???????? ?????? ????????? ? ?????????????? ??? ???????????? ??? ?????????????? ? ?????????? ? ???????? ???????. ?????? Excel ? ????????? ????????? ????????????? ?????. ? ????? ????????????: ???????? ????????? ?? ???????, ??????????? ????? ?????? ?????? ??????? Excel ? ????????? ????? ?????????? ?????????, ?????? ?????????, ?????????? ?????????.
?????? ? ???????? 2. ????????????? ???????? ??????????? ?????????. ???????????? ?????????? ???????? ????: "????????? ...! ????????? ???????? ??? ? ??????? ?? ???? ????????????? ? ??????? ...", ?????????:
* ??????? ????????? ??????? (???, ?????),
* ????? ??????, ????? ??????? ?????????????? ??????? ????? ??????? ("?????????", "???????").
?????? ? ????? ??????? ????? ???????? ??? ?????? ?????? ???????, ????????? ??????? ? ???????????? ? ?????????? ????????????, ????????? ???????? ??? ????????? ???.
??????? 3. ???????? ?????? MS DOS. ??????????????. ??????. ?????????? ?????????.
??????? 4. ???????? ?????? MS DOS. ??????????????. ??????? ??????? ?? Excel (??. ??????? 1). ??????. ?????????? ?????????.
??????? 5. ???????? ?????? MS DOS ? ?????????????? ??? ???????????? ??? ??????????????, ?????????????? ? ?????????? ? ???????? ???????. ?????? Excel ? ????????? ????????? ????????????? ?????. ? ????? ????????????: ???????? ????????? ?? ???????, ??????????? ????? ?????? ?????? ??????? Excel ? ????????? ????? ?????????? ?????????, ?????? ?????????, ?????????? ????????? (??. ??????? 2).
??????? 6. ???????? ?????? ????????? ? ??????? ? ???????????? ? ???????? ????????????? ???????????. ?????? Excel ? ????????? ????? ?????. ??????????? ????????? ??????? ? ????? Excel. ??????. ?????????? ?????.
??????? 7. ???????? ?????? ????????? ? ?????????????? ??? ???????????? ??? ?????????????? ? ?????????? ? ???????? ???????. ???????? ?????????? ????????????? ?????????, ??????????? ???????. ? ????? ????????????: ???????? ????????? ?? ???????, ??????????? ????? ?????? ?????? ??????? ? ????????? ????? ?????????? ?????????, ?????? ?????????, ?????????? ?????????. ?????? ?????????, ???? ? ??????????? ?????? ??? ?????? (??. ??????? 2).
??????? 8. ???????? ?????? ????????? ? ?????????????? ??? ???????????? ??? ?????????????? ? ?????????? ? ???????? ???????. ???????? ?????????? ????????????? ?????? MS DOS, ??????????? ??????. ? ????? ????????????: ???????? ????????? ?? ???????, ??????????? ????? ?????? ?????? ??????? (??????) ? ????????? ????? ?????????? ?????????, ?????? ?????????, ?????????? ????????? (??. ??????? 2).
??????? 9. ???????? ?????? MS DOS ? ?????????????? ??? ???????????? ??? ??????????????, ?????????????? ? ?????????? ? ???????? ???????. ???????? ?????????? ????????????? ?????????, ??????????? ???????. ? ????? ????????????: ???????? ????????? ?? ???????, ??????????? ????? ?????? ?????? ??????? ? ????????? ????? ?????????? ?????????, ?????? ?????????, ?????????? ????????? (??. ??????? 2).
??????? 10. ???????? ?????? MS DOS ? ?????????????? ??? ???????????? ??? ??????????????, ?????????????? ? ?????????? ? ???????? ???????. ???????? ?????????? ????????????? ?????? MS DOS, ??????????? ??????. ? ????? ????????????: ???????? ????????? ?? ???????, ??????????? ????? ?????? ?????? ??????? (??????) ? ????????? ????? ?????????? ?????????, ?????? ?????????, ?????????? ????????? (??. ??????? 2).
??????? 11. ???????? ?????? MS DOS, ??????????? ??????? (??????????? - ?????? ?????????). ?????? Excel ? ????????? ????? ?????. ??????????? ??????? ? ????? Excel. ??????. ?????????? ?????.
??????? 12. ??????, ???????? ???????? 2. ???????? ??????? ? ?????? ????????????? ?????????, ?? ??????? ????? ?????? (????????, ????? ???? "?????????", "???????"). ???????? ?????????? ????????????? ?????? ??????????. ?????? Excel ? ????????? ????? ?????. ???????????? ??????? ?? ?????? ????? ????? ?? ??????, ??????????? ????????? ???????? ?? ???????? ??????????.
?????????? ? ??????.
1. ????????? ????.
2. ???? ??????.
3. ??????? ? ???????????? ? ?????????.
4. ????????.
5. ???????? ?????.
6. ?????????????? ????.
7. ?????????? ?????????? ??????? ?????? (???? ????????? ? ???????????? ? ????????).
8. ??????. ???????, ????? ??????????? Visual Basic ?? ????????????? ????????? ?????? ???? ???????? ??? ?????????? ?????? (????????????????? ??????, ???????? ????????????? ????????????? ????????, ????? ????? OLE-???????????? ? ?.?.)
???????????? ?????? ? 3
?????? ? OLE-????????? ? Borland C++Builder
???? ??????: ??????? ???????? ?????? ?????????? OLE-????????? ?? Borland C++Builder.
OLE-???????? ?????????? ??????????, ????????? ???????????? ??????? ?????????? OLE. ??????????, ???????????? ? OLE-???????, ?????????? OLE-???????? (OLE-????????????) [5]. ? OLE-???????? ?????????, ? ?????????, ??? ?????????? MS Office. ??? ???????????? ?????????? OLE2, ?????????? ????? COM. ?????? ? OLE-????????? ?????????????? ????? ????????? ? ??? ????? GUID (Globally Unique Identifier) - ?????????????? OLE-???????? (? ??? ????? ??????????, ??????????, ?? ??????????? ? ?.?.), ?????????? ? ?????? Windows. ?????????? ??? ???????? ??????? ????????? GUID ? ?????? ? ????:
1) ????????? GUID ?? ????? ?????????? ? ???????? ?? ? ???? ??????????-???????;
2) ?????????????????? ????????? GUID ? ???????? ?????????? ?????????? ? ?????????? ????????? ? ???????? OLE, ?????????????? ????? GUID ?? ?????? OLE-????????.
???????? ??????????: ??? ??????? ??????? - ????????? ????????? ??????? ?? ????????? ? OLE-????????, ??? ??????? - ????????????????? ??? ????????? ? ???????? MS Office ?????? ??????, ???????? ??????? ???????? ???????????? GUID ???? ??? ????????? ?????? ?????? ??????????.
?????????? ??? ???? ?????????? ??????? ???????:
1. ????????????? ???????????? ? MS Office ????????? ????? *.OLB. ??? ???? ??????????????? ?????????? ?????????????? ? ??????? ????? ???? C++Builder: Project==>Import Type Library, ????? ???? ????????? ????? *.CPP ? *.H ????????????? ?????????????? ? ???????.
2. ? Borland C++Builder 5 - ????????????? ????????? ???????? Servers [1, 2]. ??? ?????????? ????????? ?????? ? OLE-?????????. ???????????? ??? ?????????? ????????????? ?? ????? ????????? C++Builder ? ?????????? ?? ?????? MS Office: 97/2000.
?????? ?????? ??????????? ????? ????????????? ???????????? ??????? Variant. ???? ?????? ?????????? ????????, ??????? ? ??????????? ??? ?????? MS Office ?? 97 ? ???? (MS Office 95 ????? ????????? ??????????? ? ????? ????????? OLE). ?????????? ?????? ?????????????????? ? ?????? ????????????? ???????????? ????????? ? ??????? ? ???????? ???????? ?????????? ?????? ?????????????? ????? ????????? ? ???????? Visual Basic.
???? ????????? ??????? ?????? ? ????????? MS Excel ??? ?????? Variant:
#include<utilcls.h>
...
VariantMSExcel, MyBook, MySheet;
...
try
{// ???????? ????????? ?? ???????? ??????. MSExcel - ????????
MSExcel = Variant::GetActiveObject("Excel.Application");
}
catch (...)
{
MSExcel = Variant::CreateObject("Excel.Application");
}
MSExcel.OlePropertySet ( "Visible", true );
...
//???????? ????? ?????
VariantMSBooks;
MSBooks = MSExcel.OlePropertyGet ("Workbooks");
MyBook = MSBooks.OleFunction ( "Add" );
...
//???????? ????????
Variant Sheets;
Sheets = MyBook.OlePropertyGet ("Worksheets");
MySheet = Sheets.OleFunction ("Add");
...
//?????????? ???????
Variant Range;
Range = MySheet.OlePropertyGet ( "Range", "B2" );
Range.OlePropertySet ( "FormulaR1C1", "1" );
...
//???????? ?????????
Variant Charts, Chart, Ch, Range;
Charts = MySheet.OlePropertyGet ("ChartObjects");
Chart = Charts.OleFunction ( "Add", 300, 20, 300, 400 );
Ch = Chart.OlePropertyGet ( "Chart" );
Range = MySheet.OlePropertyGet ( "Range", "A2:B17" );
Ch.OleProcedure ( "SetSourceData", Range, "xlColumns" );
????? ???????, ??? ????????? ? OLE-??????? ???????? ? ????????????? ??????? Variant OlePropertyGet, OlePropertySet, OleFunctoin, OleProcedure.
???????. ??????????? ?????????? ??????????, ??????????? ????????? ???????? ???????? ???????? ???????.
??????? 1. ???????? ?????? ????? ?????. ???????? ?? ???? ??????????? ?? ??????? DBF. ?????????? ???????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ?????.
??????? 2. ???????? ?????? ????? ?????. ????????? ??????? ?? ???? ????????: ?????????? ????? ? ???????? (? ???????? ???????? ????? ?????, ????????, ?????????????? ??? ?????????????? ??????????, ?????????????????? ????????? ? ??.). ?????????? ????? ? ???? ?? ??????? DBF. ?????????? ?????????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????.
??????? 3. ???????? ?????? ????? ?????. ???????? ??????? ????? ??????????? ?????? ?? ?????? ??????????? ?????????, ??????????? ?? ?????? ?????, ????????? ?????????????. ?????????? ????????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ?????.
??????? 4. ???????? ?????? ????? ?????. ???????? ?? ???? ??????????? ?? ??????? DBF. ?????????? ?????????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ????????? ?? ???????. ?????????? ?????.
??????? 5. ???????? ?????? ????? ?????. ???????? ??????? ????? ??????????? ?????? ?? ?????? ??????????? ?????????, ??????????? ?? ?????? ?????, ????????? ?????????????. ?????????? ????????? ?? ???????. ?????????? ????????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ?????.
??????? 6. ???????? ?????? ????? ?????. ???????? ??????? ????? ??????????? ?????? ?? ?????? ??????????? ?????????, ??????????? ?? ?????? ?????, ????????? ?????????????. ?????????? ???????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????? ?????. ?????????? ?????.
??????? 7. ???????? ?????? ????? ?????. ???????? ?? ???? ??????????? ?? ??????? DBF. ?????????? ????? ? ???? ?? ??????? DBF. ?????????? ?????????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????? ?????.
??????? 8. ???????? ?????? ????? ?????. ????????? ??????? ?? ???? ????????: ?????????? ????? ? ???????? (? ???????? ???????? ????? ?????, ????????, ?????????????? ??? ?????????????? ??????????, ?????????????????? ????????? ? ??.). ?????????? ????????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????? ?????. ?????????? ?????.
??????? 9. ???????? ?????? ????? ?????. ???????? ?? ???? ??????????? ?? ??????? DBF. ?????????? ???????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ????????? ?? ???????. ?????? ???????. ?????????? ?????.
??????? 10. ???????? ?????? ????? ?????. ???????? ??????? ????? ??????????? ?????? ?? ?????? ??????????? ?????????, ??????????? ?? ?????? ?????, ????????? ?????????????. ?????????? ????????? ?? ???????. ?????????? ????????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????? ???????. ?????????? ?????.
??????? 11. ???????? ?????? ????? ?????. ???????? ?? ???? ??????????? ?? ??????? DBF. ?????????? ?????????? ???????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????????? ????????? ?? ???????. ?????? ???????. ?????????? ?????.
??????? 12. ???????? ?????? ????? ?????. ????????? ??????? ?? ???? ????????: ?????????? ????? ? ???????? (? ???????? ???????? ????? ?????, ????????, ?????????????? ??? ?????????????? ??????????, ?????????????????? ????????? ? ??.). ?????????? ????????? ?? ???????. ?????????? ????????? ? ???????, ????????? ?????????????, ? ?????????? ? ??? ????????? ??????. ?????? ???????. ?????????? ?????.
?????????? ? ??????.
1. ????????? ????.
2. ???? ??????.
3. ??????? ? ???????????? ? ?????????.
4. ????????.
5. ???????? ?????.
6. ?????????????? ????.
7. ?????????? ?????????? ??????? ?????? (???? ????????? ? ???????????? ? ????????).
8. ??????. ??????? ?????????????? ???????? ??????????? ??????????? ??????. ??????????? ???????? ????????????? ??????????? ??? ?????????? ???????????? ?????? OLE-???????!
???????????? ?????? ? 4
????????????? ???????? OLE-??????? MS Word ? Borland C++Builder
???? ??????: ??????? ???????? ?????? ????????????? ???????? OLE-???????? ?? Borland C++Builder.
???????? ?????? ?????? ? OLE-?????????, ?.?. ????????????? ???? Variant ? ??? ??????? OlePropertyGet, OlePropertySet, OleProcedure, OleFunction, ???? ??????????? ? ????????? ???????????? ?????? ? 3:
#include<utilcls.h>
...
VariantMSWord, Docs, MyDoc;
...
try
{// ???????? ????????? ?? ???????? ??????. MSWord - ????????
MSWord = Variant::GetActiveObject("Word.Application");
}
catch (...)
{
MSWord = Variant::CreateObject("Word.Application");
}
MSWord.OlePropertySet ( "Visible", true );
...
//???????? ?????? ?????????
Docs = MSWord.OlePropertyGet ("Documents");
MyDoc = Docs.OleFunction ( "Add" );
?????? ??????? ?????????????? ??? ?????? ????????? Run ??????? Application. ?????? ??????? ?????????:
Run ( MacroName As String,varg1, varg2, varg3, varg4, varg5,
varg6, varg7, varg8, varg9, varg10,
varg11, varg12, varg13, varg14, varg15,
varg16, varg17, varg18, varg19, varg20,
varg21, varg22, varg23, varg24, varg25,
varg26, varg27, varg28, varg29, varg30 )
?????? ????????? Run ?? Builder ?????????????? ??? ?????? ?????? ?????? Exec ???? Variant:
charVARG1[128];
charVARG2[128];
strcpy ( VARG1, AnsiString(MyDoc.OlePropertyGet("Name")).c_str() );
strcpy ( VARG2, Name.c_str() );
MSWord.Exec ( Procedure("Run") <<
NamedParm ( "MacroName", "CopyFromExcel" ) <<
NamedParm ( "varg1", VARG1 ) <<
NamedParm ( "varg2", VARG2 ) );
?????? Procedure ? NamedParm ???????? ????????? ?? ????????? ? ?????? AutoCmd. ??????? Exec ??????? ???????? ???? AutoCmd. ?????? ?????????? ???????????? NamedParm ????? ???????? ?????????? ?????? ????.
?????????? ?????? ?????? ??????????? ? ??????? Normal.dot. ??????? ?????????? ?????????? ? ?????? Normal.dot ????????? ??????. ?? ???????? ??????? ???? ?????? ?? ??????? ????? ?????????????!!!
???????. ??????????? ???????? ???????? ??????? ?????? ?? Word Visual Basic ? ???????????? ??? ?????????? ?? Borland C++Builder.
??????? 1. ??????: ????????? DOC-???? ? ????????????? ???. ??????????: ????????? ??? ?????? ??????????? ???? ???????????? ?????? ?????? ? ??????? ?????? ??? ??????? ?? ???.
??????? 2. ??????: ????????? ????????? ???? MS DOS, ????????? ??? ??? ???????? Word. ??????????: ????????? ??? ?????? ??????????? ???? ???????????? ?????? ?????? ? ??????? ?????? ??? ??????? ?? ???.
??????? 3. ??????: ????????? DOC-???? ? ???????? ??? ?????????? ? ??????? ???????? ????. ??????????: ????????? ??? ?????? ?????????? ???? ??????? ??? ?????? ????? ? ???????????? ?????? ??????-??????????, ??????? ?????? ??? ??????? ?? ???.
??????? 4. ??????: ????????? ????????? ???? MS DOS ? ???????? ??? ?????????? ? ??????? ???????? ????. ??????????: ????????? ??? ?????? ?????????? ???? ??????? ??? ?????? ????? ? ???????????? ?????? ??????-??????????, ??????? ?????? ??? ??????? ?? ???.
??????? 5. ??????: ????????? ????????? ???????? ??? ????????? ??????. ??????????: ????????? ??????? ??? ?????? ??????????? ???? ????????-????????, ???????????? ?????? ???? ??????????-?????????? ? ?????? ? ????????? ?????? ??? ??????? ?? ???.
??????? 6. ??????: ????????? DOC-???? ? ???????? ?????????? ??? ??????? ??????? ? ??????? ???????? ????. ??????????: ????????? ??? ?????? ?????????? ???? ??????? ??? ?????? ????? ? ???????????? ?????? ??????-??????????, ??????? ?????? ??? ??????? ?? ???.
??????? 7. ??????: ???????????? MS Excel, ????????? ????????? XLS-????, ????????? ?????????? ??? ?????? ???????? ? ????????? ???????? Word. ??????????: ????????? ??????? ????? ???????? MS Word, ??? ?????? ??????????? ???? ???????????? ?????? ??????-?????????? ? ??????? ?????? ??? ??????? ?? ???.
??????? 8. ??????: ???????????? MS Excel, ????????? ????????? DBF-????, ????????? ??? ?????????? ? ????????? ???????? Word. ??????????: ????????? ??????? ????? ???????? MS Word, ??? ?????? ??????????? ???? ???????????? ?????? ??????-?????????? ? ??????? ?????? ??? ??????? ?? ???.
??????? 9. ??????: ???????????? MS Excel, ????????? ????????? XLS-????, ????????? ?????????? ??? ?????? ???????? ? ????????? ???????? Word, ?????????? ?????????? ? MS Excel ???????? ? ?????????? ???????? ??? ??????? ?????????????? ?????? ?????? ???????? XLS-?????, ????????? ?? ? ???????? ???????? ?? ??????? ? ????????????, ????????? XLS-???? ??? ??????????. ??????????: ????????? ??????? ????? ???????? MS Word, ??? ?????? ??????????? ???? ???????????? ?????? ??????-?????????? ? ??????? ?????? ??? ??????? ?? ???.
??????? 10. ??????: ???????????? MS Excel, ????????? ????????? DBF-????, ????????? ??? ?????????? ? ????????? ???????? Word, ?????????? ?????????? ? MS Excel ???????? ? ?????????? ???????? ??? ?????????????? ???? DBF-?????, ????????? ?? ? ???????? ???????? ?? ??????? ? ????????????, ????????? DBF-???? ??? ??????????. ??????????: ????????? ??????? ????? ???????? MS Word, ??? ?????? ??????????? ???? ???????????? ?????? ??????-?????????? ? ??????? ?????? ??? ??????? ?? ???.
??????? 11. ??????: ???????????? MS Excel, ????????? ????????? XLS-????, ????????? ?????????? ??? ?????? ???????? ? ????????? ???????? Word, ?????????? ? MS Excel ?????????? ????????? ?? ???????, ???????? ?? ? ????????, ????????? XLS-???? ??? ??????????. ??????????: ????????? ??????? ????? ???????? MS Word, ??? ?????? ??????????? ???? ???????????? ?????? ??????-?????????? ? ??????? ?????? ??? ??????? ?? ???.
??????? 12. ??????: ???????????? MS Excel, ????????? ????????? DBF-????, ????????? ??? ?????????? ? ????????? ???????? Word, ?????????? ? MS Excel ?????????? ????????? ?? ???????, ???????? ?? ? ????????, ????????? DBF-???? ??? ??????????. ??????????: ????????? ??????? ????? ???????? MS Word, ??? ?????? ??????????? ???? ???????????? ?????? ??????-?????????? ? ??????? ?????? ??? ??????? ?? ???.
?????????? ? ??????.
1. ????????? ????.
2. ???? ??????. ??????? ? ???????????? ? ?????????.
3. ????????.
4. ???????? ?????.
5. ?????????? ?????? ??????????.
6. ??????. ??????? ?????????????? ???????? ??????????? ??????????? ??????. ??????????? ???????? ????????????? ??????????? ??? ?????????? ???????????? ?????? OLE-???????!
????????????????? ??????
1. ????????????? ?.?. ???????????????? ? Delphi 5. - ?.: ?????, 2000. - 1072 ?.: ??.
2. ????????????? ?.?. ???? SQL ? C++Builder 5. - ?.: ?????, 2000. - 224 ?.: ??.
3. ???? ?.?. Visual Basic 5. ??????????? ????????????. - ????: ??????????, 1997. - 704 ?.: ??.
4. ??????????? ???????????? ?? Visual Basic ??? Microsoft Office 97: ???. ? ????. - ?.: "???. ???" ??? "Channel Trading Ltd", 1997. - 544 ?.: ??.
5. ?????? ?. ???????????????? OLE. ????? ?????????????? ?? 21 ????: ???. ? ????. - ?.: ?????, 1995. - 464 ?.: ??.
6. Visual Basic 6.0: ???????? ?????? ??????????? ??? ???????????????? ?????? ? ????? Visual Basic 6.0. - ???.: BHV - ?????-?????????, 2001. - 992 ?.: ??.
??????????
?????????? ???????? ?? ???????????????? ? Visual Basic ??? MS Excel
??? ???????????????? ? Visual Basic ?????? ???????????? ??????? ? ??????? VBA. ?????? ??????? ???????? ?????????????? ?????????. ? ??????????? ???? ???????? ????? ????????? ???????? ???????? (o), ???????????? - (r).
1. ?????? Application.
? ????????? ? ??????? ??????? ??????? ????? ?????????? ??? ???????? ?????? ???????. ?? ????????? ?????????? ???????? ??? ?????? ????????? ?????? ?????? Application. ? ???????? 1 ? 2 ????????? ???????? ??????????? ???????? ? ?????? ??????? Application.
??????? 1
???????? ??????? Application????????????????????ActiveCell???????? ??????ActiveChart???????? ?????????ActiveSheet???????? ????????ActiveWindow???????? ????ActiveWorkbook???????? ????? ??????? 2
?????? ??????? Application?????????????????????????????123CellsrowIndex (o)
columnIndex (o)?????????? ?????? Range, ?????????????? ?? ?????????? ????????? ??? ?? ????? ??????????? ???????? ?????Chartsindex (o)?????????? ?????? ???????? ??? ????????? ?????????Columnsindex (o)?????????? ?????? ??????? ??? ????????? ???????
??????????? ????. 2123GetOpenFilenamefileFilter (o) - ?????? ??? "??????????? ? ???????, ??????" ???? "Text Files (*.txt),*.txt,Add-In Files (*.xla),*.xla"
filterIndex (o) - ????? ??????? ?? ?????? ?? ?????????
title (o) - ????????? ??????????? ????
buttonText (o) - ????? ?????? "Open"
multiSelect (o) - ??????????? ?????????????? ???????????????? ??? ???????????? ????? ??? False ? ?????? ??????GetSaveAsFilenameinitialFilename (o) - ??? ????? ?? ?????????
fileFilter (o) - ??. ????
filterIndex (o) - ??. ????
title (o) - ??. ????
buttonText (o) - ??. ????
multiSelect (o) - ??. ?????????????? ??? ???????????? ????? ??? False ? ?????? ??????Gotoreference (o) - ????? ???????? (?????? ??????? R1C1, ?????? Range)
scroll (o) - ??????????? ????????? ?????? ??? ??????????? ?????? ??????????????? ?? ????????? ??????. ???? ??????????????, ???? ??? ??????????InchesToPointsinches (r)??????? ?????? ? ?????
??????????? ????. 2123InputBoxprompt (r) - ?????????, ????????? ? ?????????? ????
title (o) - ??. ????
default (o) - ???? ???? Range, ???????? ???????? ????????? ? ???? ????? ?? ?????????
left (o), top (o) - ?????????? (? ??????)
helpFile (o), helpContextID (o) - ??? ????? ?????? ? ????????????? ??????????
type (o) - ??? ????????????? ????????:
0 ???????
1?????
2??????
4??????????
8Range?????????? ???? ?? ??????? ?????Modulesindex (o)?????????? ?????? VBA-??????? ??? ???????? ??????Rangecell1 (r) - ?????? ? ???????????? ????????? (1) ??? ??????????? ??????? ????? ?????? ????????? (2)
cell2 (o) - ??????????? ?????? ?????? ?????? ????????? (2)?????????? ???????? ????? ????????? ?????Rowsindex (o)?????????? ????????? ?????? ????????? ????? ??? ?????? ?????Runmacro (o)
arg1, arg2 ...(o)?????? ???????Savefilename (o)?????????? ???????? ????? ??? ????????? ??? ???????????? ?????? ?????
????????? ????. 2123Sheetsindex (o)?????????? ????????? ???? ??? ?????? ?????? ???????? ?????Windowsindex (o)?????????? ????????? ???? ??? ?????? ????Workbooksindex (o)?????????? ????????? ????? ??? ?????? ????Worksheetsindex (o)?????????? ????????? ???? ??? ?????? ?????? ???????? ????? 2. ?????? Workbooks
?????? ?????? ???????????? ????? ????????? ???????? Workbook. ????? ???????????? ???????? ??? ????? Add - ?????????? ????? ?????. ?????????????? ?????????? ???????? ??????, ? ???????? ???????? ????? ???? ??? ????? Excel ??? ?????????: xlWorksheet, xlChart, xlExcel4MacroSheet, xlExcel4IntlMacroSheet. ???????????? ????? ???????? Count - ?????????? ???????? ????.
??????? 3
?????? ??????? Sheets?????????????????????????????123Addbefore (o) - ????, ????? ??????? ????? ??????????? ?????
after (o) - ????, ????? ???????? ????? ??????????? ?????
count (o) - ?????????? ??????????? ??????
type (o) - ??? ??????????? ?????? (xlWorksheet, xlChart, xlModule, xlDialogSheet, xlExcel4MacroSheet, xlExcel4IntlMacroSheet)?????????? ????? ????????
????????? ????. 3123PrintOutfrom , to (o) ?????? ? ????????? ???????? ?????????
copies (o) - ????? ?????
preview (o) - ?????? ???????????????? ?????????
activePrinter (o) - ??? ????????? ????????
printToFile (o) - ?????? ? ????
collate (o) - ????????? ?? ???????????? 3. ?????? Sheets
?????????? ??????? Workbooks. ???????????? ????? ????????? ???????? Sheet. ???????? ??????????? ?????? ????????? ? ??????? 3.
4. ?????? Charts
??????????? ????????? ??????? Sheets.
5. ?????? Window
??????? 4
???????? ??????? Window????????????????????ActiveCell???????? ??????ActiveChart???????? ?????????ActiveSheet???????? ???????? ??????? 5
?????? ??????? Window?????????????????????????????Activate?????????? (????????? ????? ? z-???????) ????ClosesaveChanges (o) - ?????????? ?????????
fileName (o) - ??? ????????????? ????PrintOut??. ??????? 3 6. ?????? Workbook
??????? 6
???????? ??????? Workbook????????????????????ActiveChart???????? ?????????ActiveSheet???????? ????????Saved????????? ?? ????? ??????? 7
?????? ??????? Workbook?????????????????????????????123Activate??. ??????? 5Charts??. ??????? 2Close??. ??????? 5PrintOut??. ??????? 3RunAutoMacroswhich (r) - ??? ????????:
xlAutoOpen
xlAutoClose
xlAutoActivate
xlAutoDeactivate???????????? ??? ??????? ?????????????? ???????? ??? ??????????????? ????????? ??? ??????? ? ???????, ???????????? ????????? Visual BasicSave??. ??????? 2SaveAsfilename (o) - ??? ?????
fileFormat (o) - ?????? (xlExcel4, xlDBF3 ? ?.?.)
password (o)
writeResPassword (o)
readOnlyRecommended (o)
createBackup (o)
accessMode (o)
conflictResolution (o)?????????? ? ???????????SaveCopyAsfilename (r) - ??? ??????????????? ????? ?????Sheets??. ??????? 2Windows??. ??????? 2Worksheets??. ??????? 2 7. ?????? Worksheet
????? ??????? ??????? Worksheet ??????? ???????? UsedRange - ???????? ????? ?????, ??????????? ???????????.
??????? 8
?????? ??????? Worksheet?????????????????????????????123Activate??. ??????? 5Cells??. ??????? 2Columns??. ??????? 2Copybefore (o) - ????, ????? ??????? ????? ??????????? ??????????
after (o) - ????, ????? ???????? ????? ??????????? ????????????????????? ?????Delete???????? ?????Movebefore (o) - ????, ????? ??????? ????? ??????????? ????????????
after (o) - ????, ????? ???????? ????? ??????????? ??????????????????????? ?????Pastedestination (o) - ?????? Range, ? ??????? ????? ??????????? ???????
link (o) - ???????????? ?????????????? (??????????) ? ???????? ?? ?????? ??????PasteSpecialformat (r) - ?????? ?????? ??????
link (o)
displayAsIcon (o)
iconFileName (o)
iconIndex (o)
iconLabel (o)??????????? ???????PrintOut??. ??????? 3Range??. ??????? 2Rows??. ??????? 2SaveAs??. ??????? 7Select????????? ????? 8. ?????? Range
?????? Range - ????????, ???????? ???????????? ? ????????????? ??????. ?? ????? ???? ??????????? ????? ???????? ?????. ????? ?????? ?????? ????????? ???????? ?????????? Range.
??????? 9
???????? ??????? Range????????????????????12Column?????? ??????? ? ?????????ColumnWidth?????? ??????? ?????????Count????? ????????? ? ?????????Formula
FormulaArray
FormulaHidden
FormulaLocal
FormulaR1C1
FormulaR1C1Local????????? ????????? ? ??????? (??? ???????, ???????? - ???? ??????)Row?????? ?????? ? ?????????RowHeight?????? ????? ? ?????????Text????? ? ????????? (??? ???????, ???????? - ???? ??????)Value???????? ? ????????? (??? ???????, ???????? - ???? ??????) ??????? 10
?????? ??????? Range?????????????????????????????123Activate??. ??????? 5AdvancedFilteraction (r) - xlFilterInPlace ??? xlFilterCopy
criteriaRange (o) - ???????? ????????
copyToRange (o) - ????? ??????????? ?????????? ?????????
unique (o) - ?????? ?????????? ????????????????? ??????
??????????? ????. 10123AutoFilldestination (r) - ????? ??????????
type (o) - ??? ?????????? (xlFillDefault, xlFillSeries, xlFillCopy, xlFillFormats, xlFillValues, xlFillDays, xlFillWeekdays, xlFillMonths, xlFillYears, xlLinearTrend, xlGrowthTrend)??????????????AutoFit?????????????? ????????? ??????Cells??. ??????? 2Columns??. ??????? 2Copydestination (o) - ????????, ???? ????? ???????????? ???????????????????? ????????? ? ????? ???????? ??? ? ????? ??????Cutdestination (o) - ????????, ???? ????? ????????? ???????????????????? ????????? ? ????? ???????? ??? ? ????? ??????Deleteshift (o) - ??? ?????? (xlToLeft, xlUp)???????? ?????????Insertshift (o) - ??? ?????? (xlToRight, xlDown)??????? ?????????OffsetrowOffset (o) - ????? ?? ???????
columnOffset (o) - ????? ?? ????????????????, ????????? ???????????? ??????? ?? ????????? ????????
????????? ????. 10123PasteSpecialpaste (o) - ??? ????? ???????????? ????????? (xlAll, xlFormulas, xlValues, xlFormats, xlNotes, xlAllExceptBorders)
operation (o) - ??? ???????? ??????? (xlNone, xlAdd, xlSubtract, xlMultiply, or xlDivide)
skipBlanks (o) - ??????? ????????
transpose (o) - ??????????????????????????? ???????PrintOut??. ??????? 3Range??. ??????? 2Replacewhat (r) - ?????????? ??????
replacement (r) - ?????????? ??????
lookAt (o) - ??????/????????? ?????????? (xlWhole/xlPart)
searchOrder (o) - ??????? ?????? (xlByRows/xlByColumns)
matchCase (o) - ???? ????????
matchByte (o) - ?? ???????.??????ResizerowSize (o) - ????? ?????????? ?????
columnSize (o) - ????? ?????????? ????????????????? ???????Rows??. ??????? 2Run??. ??????? 2Select??. ??????? 8 9. ?????? Chart
???????? ?????? ???????????? ???????? Chart ??? ?????? ??? ?????? ChartWizard.
2
27
Документ
Категория
Без категории
Просмотров
51
Размер файла
70 Кб
Теги
miole
1/--страниц
Пожаловаться на содержимое документа