Kako podesiti pametne telefone i računare. Informativni portal
  • Dom
  • Windows 10
  • Pozivanje Excel-a iz DELPHI-ja. Pristup Microsoft Excelu iz Delphija

Pozivanje Excel-a iz DELPHI-ja. Pristup Microsoft Excelu iz Delphija

Komunikacija sa MS Excel in Delphi uz pomoć OLE.

Drage kolege!

Prije ili kasnije, svi se suočavamo sa zadatkom razmjene podataka sa aplikacijama paketa. MS office. Jedan od njih je MS Excel. I radi se o interakciji s ovim proizvodom MS office će se raspravljati u ovom članku.

Jedan način za interakciju Delphi c MS Excel je da se povežete na njega kao OLE objekt.

Dakle.
Prije svega, raditi sa MS Excel i OLE dodati u odjeljak koristi moduli ComObj i ActiveX.

I prva stvar koju trebamo provjeriti je da li MS Excel na računaru korisnika u principu.
Da bismo to učinili, koristimo funkciju CLSIDFromProgID, koji se pretražuje u registru CLSID za preneseno ProgID:
Pomoć od MSDN-a: Metod CLSIDFromProgID
Opcije:
pszProgID: POleStr— Niz s imenom objekta
clsid: TCLSID— Pokazivač na strukturu TGUID kome se prosleđuje pronađeni objekat;
Povratak:
HRESULT- Rezultat, koji može imati vrijednosti:
S_OK— predmet je pronađen;
CO_E_CLASSSTRING— Registrovan CLSID za ProgID je nevažeći;
REGDB_E_WRITEREGDB- Greška u pisanju CLSID u registar.
Od gore navedenih rezultata, potrebni su nam S_OK.
Napišimo funkciju za određivanje prisutnosti excel kod korisnika:

Funkcija IsXlsInstall: boolean; var CLSID: TCLSID; započeti Rezultat:= (CLSIDFromProgID("Excel.Application", CLSID) = S_OK); kraj;

Ako a excel instaliran, a zatim se povežite na njega. To možete učiniti na dva načina: GetActiveOleObject- Dobijte vezu do već pokrenute instance excel ili CreateOleObject- Kreirajte novu instancu excel.
Ako imamo zadatak da primimo podatke iz pokretanja excel, onda bismo trebali koristiti samo prvu opciju, u ostalim slučajevima pokušavamo se povezati i ako ne uspije, onda je kreiramo.
Napišimo 2 funkcije za povezivanje Xls Connect i lansiranje novog XlsStart:
Dodajmo varijablu FXlsApp sa tipom Varijanta, koji će sadržavati referencu na objekt excel.

Privatna FXlsApp: varijanta; *** funkcija XlsConnect: boolean; započeti Rezultat:= False; pokušajte FXlsApp:= GetActiveOleObject("Excel.Application"); Rezultat:= istina; osim kraja; kraj; procedure XlsStart; begin FXlsApp:= CreateOleObject("Excel.Application"); kraj;

Sada možete dodati dugme na koji ćemo se povezati MS Excel koristeći napisane funkcije:

Procedura btnConnectClick(Pošiljalac: TObject); započnite ako nije IsXlsInstall onda podignite Exception.Create("MS Excel aplikacija nije pronađena na ovaj računar!"); ako nije XlsConnect onda XlsStart; FXlsApp.Visible:= True; end;

Zadani prozor excel počinje u pozadini. Linija FXlsApp.Visible:= Tačno; pravi prozor u pozadini excel vidljivo.

Prozor excel počinje praznim i treba ga dodati radna sveska. Ovo se radi pomoću metode WorkBooks.Add, što dodaje nova knjiga ili otvara prethodno sačuvani ako navedete putanju do datoteke.
Dodajmo proceduru koja će ovo učiniti:

Procedura XWorkbookAdd(const FilePath: string = ""); započeti FXlsApp.WorkBooks.Add(FilePath); kraj;

Knjiga je dodata, hajde sada da pokušamo da upišemo nešto u nju.

FXlsApp.Cells := "Test string";

Gdje red je indeks reda, i pukovnik je indeks stupca koji počinje s jedan.

FXlsApp.Range["A1"] := "Ćelija A1";

Gdje Domet je niz ćelija, i A1- navikli excel koordinate ćelije.
Opseg se može specificirati kao koordinate. Na primjer, kod

FXlsApp.Range["A3:A10"] := 5;

će ispuniti sve ćelije sa brojem 5 A3 on A10, i kod

FXlsApp.Range["A3:A10"].Interior.Color:= clMoneyGreen;

će istaći isti raspon svijetlozelenom bojom.
AT poleđina, odnosno da dobije podatke od excel, radi na isti način. Linija

ShowMessage(FXlsApp.Cells);

Prikazaće se poruka sa sadržajem ćelije sa koordinatama: Red=5, Kolona=1.

Nakon što smo izvršili potrebne manipulacije sa excel, rezultujuću knjigu možemo sačuvati u datoteku sa sljedećom naredbom:

FXlsApp.ActiveWorkbook.SaveAs("C:\Test.xlsx");

Gdje aktivna radna sveska je trenutna knjiga.
I zatvorite aplikaciju excel naredba:

FXlsApp.Quit;

Kako razumete ovu kontrolu? excel od Delphi nisu ograničeni. I postoji jedan prilično jednostavan način da saznate kako izvršiti potrebnu radnju sa excel od Delphi.
Zove se Makroi.

Zamislimo da trebamo spojiti nekoliko ćelija u jednu, a ne znamo kako to učiniti. Ali želimo da znamo. Da biste to učinili, izvršite sljedeće korake:
1. Pokreni excel i kreirajte praznu radnu svesku.
2. Pokrenite naredbu "Record macro", prema zadanim postavkama ime makroa će biti "Macro1". (AT različite verzije excel data komanda koji se nalaze u različitim stavkama menija).
3. Odaberite raspon ćelija i pritisnite dugme "Spoji i sredi".
4. Zaustavite snimanje makroa.
5. Pozivamo listu makroa i tamo biramo naš snimljeni makro.
6. Kliknite na dugme "Promeni".
Urednik počinje Microsoft Visual Basic for Application u kojem vidimo kod izvršenih radnji:

Sub Macro1() " " Macro1 Macro " Sa izborom .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = .ShrinkToFit = FalseCenter = FalseCenter. .Merge End Sub

Pogledajmo bliže šta nam je napisao ovde:
Sa selekcijom- Za odabrani raspon ćelija postavite svojstva:
HorizontalAlignment = xlCenterHorizontalna orijentacija= centriran.
VerticalAlignment = xlBottom— Vertikalna orijentacija — duž donje ivice.
wraptext = lažno- Prelamanje teksta u riječi - onemogućeno.
Orijentacija = 0— Orijentacija 0 stepeni.
AddIndent = False- Koristite automatsko uvlačenje uključivanje/isključivanje.
IndentLevel = 0- Nivo uvlake na 0.
ShrinkToFit = Netačno— Smanjite tekst kako bi se uklopio/isključio stupac.
Redosled čitanja = xlContext— Redoslijed čitanja prema kontekstu.
MergeCells = Netačno- Spojene ćelije uključeno/isključeno
završiti sa— Kraj sekcije za rad sa izabranim opsegom.
Selection.Merge— Spojite odabrani opseg.

Pokušajmo sada spojiti ćelije iz Delphija:

Odabiremo raspon koji nam je potreban.

FXlsApp.Selection.MergeCells:= Tačno;

Spojite ćelije postavljanjem svojstva. Ili koristeći metodu:

FXlsApp.Selection.Merge;

Na ovaj način možete dobiti kod za gotovo svaku potrebnu manipulaciju.
A ako neko svojstvo ili metoda izaziva pitanja, onda možete koristiti pomoć na MSDN-u.

Obratite pažnju na posebnost rada sa nizovima u VBA. Indeksi u nizovima u Delphi pretvoriti u uglaste zagrade, dok je u VBA oni će biti u krugovima. I šifra unutra Delphi

FXlsApp.Range["B5:C8"].Odaberi;

in VBAće izgledati

Opseg("D5:H14").Odaberi;

Ispod je mali FAQ po pitanju interakcije sa excel od Delphi

Kako definirati konstantne vrijednosti u Excelu za korištenje u Delphiju?

U uredniku VBA stavi tačku nasuprot konstanti od interesa. Kliknite na execute i kada se izvršenje zaustavi, pokažite na konstantu od interesa:

Kako onemogućiti izlaz poruke u Excelu?

FXlsApp.DisplayAlerts:= False;

Kako dobiti listu knjiga iz Excela?

Za i:= 1 do FXlsApp.Workbooks.Count do ListBox1.Items.Add(FXlsApp.Workbooks.Item[i].Name);

Kako onemogućiti prikaz mreže?

FXlsApp.ActiveWindow.DisplayGridlines:= False;

Kako prikazati trenutni list u pregledu štampe?

FXlsApp.ActiveWindow.SelectedSheets.PrintPreview;

Kako podebljati tekst u ćelijama?

VarRow: cijeli broj; // Indeks stringa Col: integer; // Indeks ćelije TextSelStart: integer; // Počevši od znaka TextSelLength: integer; // Broj odabranih znakova počinje FXlsApp.Cells.Characters(TextSelStart, TextSelLength).Font.Bold:= True; kraj;

Kako automatski prilagoditi visinu reda za zalijepljenu ćeliju?

merge_area: varijanta; cell_width, cells_width, i: integer begin // Pohranjivanje raspona spojenih ćelija u varijablu merge_area:= FXlsApp.Range["D5"].MergeArea; // Sačuvamo širinu ćelije za koju ćemo odabrati visinu cell_width:= FXlsApp.Range["D5"].ColumnWidth; ćelije_width:=0; for i:= 1 to merge_area.Columns.Count do // Dobiti ukupnu širinu svih kolona u spojenom rasponu cells_width:= cells_width + merge_area.Columns[i].ColumnWidth; // Spajanje ćelija merge_area.UnMerge; // Postavite širinu ćelije od interesa na ukupnu širinu FXlsApp.Range["D5"].ColumnWidth:= cells_width; // Call standardna metoda autofit visina reda FXlsApp.Rows.EntireRow.AutoFit; // Vraća originalnu širinu ćelije od interesa FXlsApp.Range["D5"].ColumnWidth:= cell_width; // Spoji natrag opseg merge_area.Merge; kraj;

Kako iskoristiti raspon ćelija?

Rezultat:= exApp.ActiveSheet.UsedRange;

Kako dobiti slovo kolone po indeksu?

Use Math; *** funkcija ColIdxToStr(const Col: integer): string const CharsCount: cijeli broj = 26; Pomak: cijeli broj = 64; varRank: bajt; Col, Tmp: cijeli broj; započeti Rezultat:= ""; dok Col > 0 počinje Rang:= 0; Tmp:=Col; dok Tmp > CharsCount počinje Tmp:= Ceil(Tmp / CharsCount - 1); Inc(rang); kraj; Rezultat:= Rezultat + Chr(Tmp + Offset); Col:= Col - Trunc(Power(CharsCount,Rank)) * Tmp; kraj; kraj;

AT ovu recenziju razmatraju se osnovne konstrukcije koje omogućavaju pristup Excel radnoj knjizi iz DELPHI-ja.

Organizacija pristupa EXCEL radnoj svesci

Za interakciju sa MS excelom u programu morate koristiti ComObj modul
koristi ComObj;
i deklarirajte varijablu za pristup MS excelu sljedećeg tipa:
var Excel: Variant;

Inicijalizacija Excel varijable u najjednostavnijem slučaju može se uraditi ovako:
Excel:= CreateOleObject("Excel.Application");

Kreiranje nove knjige:
Excel.Workbooks.Add;

Otvaranje postojeće radne knjige (gdje je putanja put do datoteke sa xls ekstenzija.):
Excel.Workbooks.Open;

Otvaranje postojeće radne knjige samo za čitanje:
Excel.Workbooks.Open;

Zatvaranje Excela:
Excel.ActiveWorkbook.Close;
Excel.Application.Quit;

Blokiranje zahtjeva (potvrda, obavještenja) programa Excel, na primjer, zabranjuje zahtjev za spremanje datoteke:
Excel.DisplayAlerts:=False;

Na ekranu prikazujemo Excel:
Excel.Visible:= Tačno;
ili sakrij:
Excel.Visible:= False;

Štampanje sadržaja aktivnog Excel lista:
Excel.ActiveSheet.PrintOut;

Čitanje/pisanje podataka u EXCEL-u

Ćeliji u trenutnoj Excel radnoj knjizi može se pristupiti na sljedeći način:
Excel.Range["B2"]:="Zdravo!";- za pisanje vrijednosti u ćeliju, ili s:=Excel.Range["B2"]; - za čitanje, gdje je B2 adresa ćelije.

Ili koristeći stil veze R1C1:
Excel.Range]:="Bok!";, gdje je koordinata ćelije.

općenito, ćelija u Excelu možete dodijeliti bilo koju vrijednost (znak, cijeli broj, razlomak, datum) dok će Excel postaviti zadano formatiranje u ćeliji.

Format ćelije u EXCEL-u

Možete odabrati (odabrati) grupu ćelija za dalji rad na sljedeći način:
Excel.Range, Excel.Cells].Select; ili Excel.Range["A1:C5"].Select; ovo će odabrati područje između ćelije A1 i C5.

Nakon što je odabir obavljen, možete instalirati:

1) spajanje ćelija Excel.Selection.MergeCells:=True;

2) prelamanje riječi Excel.Selection.WrapText:=Tačno;

3) horizontalno poravnanje Excel.Selection.HorizontalAlignment:=3; kada se dodeljuje vrednost 1, koristi se podrazumevano poravnanje, sa 2 - levo poravnanje, 3 - centar, 4 - desno.

4) vertikalno poravnanje Excel.Selection.VerticalAlignment:=1; dodijeljene vrijednosti su slične horizontalnom poravnanju.

5) ivica za ćelije Excel.Selection.Borders.LineStyle:=1; Kada se postavi na 1, granice ćelija se crtaju kao tanke, pune linije.

Osim toga, možete odrediti vrijednosti za svojstvo Borders, na primjer, jednake 3. Tada će biti postavljena samo gornja granica za blok odabira: Excel.Selection.Borders.LineStyle:=1;

Vrijednost svojstva Borders specificira drugačija kombinacija ivice ćelije. U oba slučaja mogu se koristiti vrijednosti između 1 i 10.

Korištenje lozinki u EXCEL-u

Postavljanje lozinke za aktivnu radnu knjigu može se izvršiti na sljedeći način:
pokušaj // pokušaj postaviti lozinku
Excel.ActiveWorkbook.protect("pass");
osim // radnji kada neuspjeli pokušaj Postavite lozinku
kraj;
gdje je pass lozinka koja se postavlja za knjigu.

Uklanjanje lozinke iz knjige je slično, koristimo naredbu
Excel.ActiveWorkbook.Unprotect("pass");

Postavljanje i uklanjanje lozinke za aktivni list excel knjige proizveden od strane timova
Excel.ActiveSheet.protect("pass"); // postavlja lozinku
Excel.ActiveSheet.Unprotect("pass"); // ukloni lozinku
gdje je pass lozinka postavljena za zaštitu radne knjige.

Pomoćne operacije u EXCEL-u

Uklanjanje redova sa pomakom prema gore:
Excel.Rows["5:15"].Select;
Excel.Selection.Delete;
prilikom izvođenja ovih radnji, redovi od 5 do 15 će biti obrisani.

Postavljanje zakačenog područja na aktivno Excel list
// otkvači područje ako je postavljeno
Excel.ActiveWindow.FreezePanes:=False;
// biramo željenu ćeliju, in ovaj slučaj D3
Excel.Range["D3"].Select;
// postavlja zakačenje područja
Excel.ActiveWindow.FreezePanes:=Tačno;

Uspješan rad!

Content-Disposition: obrazac-podaci; name="sort" 50


koristi ComObj;

var Excel: Variant;

Kreiranje nove knjige:
Excel.Workbooks.Add;


Excel.Workbooks.Open;

Zatvaranje Excela:
Excel.ActiveWorkbook.Close;
Excel.Application.Quit;


Excel.DisplayAlerts:=False;

Na ekranu prikazujemo Excel:
Excel.Visible:= Tačno;
ili sakrij:
Excel.Visible:= False;


Excel.ActiveSheet.PrintOut;

Čitanje/pisanje podataka u EXCEL-u



gdje je B2 adresa ćelije.


Format ćelije u EXCEL-u



ili


1) spajanje ćelija

2) prelamanje riječi





5) granica za ćelije



Excel.Selection.Borders.LineStyle:=1;

Korištenje lozinki u EXCEL-u


probaj


osim

kraj;





gdje je pass lozinka postavljena za zaštitu radne knjige.


Excel.Rows["5:15"].Select;
Excel.Selection.Delete;





Excel.Range["D3"].Select;


Uspješan rad!

Izvor:

Ovaj pregled govori o osnovnim konstrukcijama koje vam omogućavaju pristup Excel radnoj knjizi iz DELPHI-ja.

Organizacija pristupa EXCEL radnoj svesci

Za interakciju sa MS excelom u programu morate koristiti ComObj modul
koristi ComObj;
i deklarirajte varijablu za pristup MS excelu sljedećeg tipa:
var Excel: Variant;

Inicijalizacija Excel varijable u najjednostavnijem slučaju može se uraditi ovako:
Excel:= CreateOleObject("Excel.Application");

Kreiranje nove knjige:
Excel.Workbooks.Add;

Otvaranje postojeće knjige (gdje je putanja put do datoteke s ekstenzijom xls.):
Excel.Workbooks.Open;

Otvaranje postojeće radne knjige samo za čitanje:
Excel.Workbooks.Open;

Zatvaranje Excela:
Excel.ActiveWorkbook.Close;
Excel.Application.Quit;

Blokiranje zahtjeva (potvrda, obavještenja) programa Excel, na primjer, zabranjuje zahtjev za spremanje datoteke:
Excel.DisplayAlerts:=False;

Na ekranu prikazujemo Excel:
Excel.Visible:= Tačno;
ili sakrij:
Excel.Visible:= False;

Štampanje sadržaja aktivnog Excel lista:
Excel.ActiveSheet.PrintOut;

Čitanje/pisanje podataka u EXCEL-u

Ćeliji u trenutnoj Excel radnoj knjizi može se pristupiti na sljedeći način:
Excel.Range["B2"]:="Zdravo!";- za pisanje vrijednosti u ćeliju, ili
s:=Excel.Range["B2"]; - za čitanje,
gdje je B2 adresa ćelije.

Ili koristeći stil veze R1C1:
Excel.Range]:="Zdravo!";, gdje je koordinata ćelije.

Općenito, Excel ćeliji možete dodijeliti bilo koju vrijednost (znak, cijeli broj, razlomak, datum), dok će Excel postaviti zadano oblikovanje u ćeliji.

Format ćelije u EXCEL-u

Možete odabrati (odabrati) grupu ćelija za dalji rad na sljedeći način:
Excel.Range, Excel.Cells].Select;
ili
Excel.Range["A1:C5"].Select;
ovo će odabrati područje između ćelije A1 i C5.

Nakon što je odabir obavljen, možete instalirati:
1) spajanje ćelija
Excel.Selection.MergeCells:=Tačno;
2) prelamanje riječi
Excel.Selection.WrapText:=Tačno;
3) horizontalno poravnanje
Excel.Selection.HorizontalAlignment:=3;
kada se dodeljuje vrednost 1, koristi se podrazumevano poravnanje, sa 2 - levo poravnanje, 3 - centar, 4 - desno.
4) vertikalno poravnanje
Excel.Selection.VerticalAlignment:=1;
dodijeljene vrijednosti su slične horizontalnom poravnanju.
5) granica za ćelije
Excel.Selection.Borders.LineStyle:=1;
Kada se postavi na 1, granice ćelija se crtaju kao tanke, pune linije.
Osim toga, možete odrediti vrijednosti za svojstvo Borders, na primjer, jednake 3. Tada će biti postavljena samo gornja granica za blok odabira:
Excel.Selection.Borders.LineStyle:=1;
Vrijednost svojstva Borders specificira drugačiju kombinaciju lica ćelija.
U oba slučaja mogu se koristiti vrijednosti između 1 i 10.

Korištenje lozinki u EXCEL-u

Postavljanje lozinke za aktivnu radnu knjigu može se izvršiti na sljedeći način:
probaj
// pokušavamo postaviti lozinku
Excel.ActiveWorkbook.protect("pass");
osim
// radnje na neuspješnom pokušaju postavljanja lozinke
kraj;

gdje je pass lozinka koja se postavlja za knjigu.

Uklanjanje lozinke iz knjige je slično, koristimo naredbu
Excel.ActiveWorkbook.Unprotect("pass");
gdje je pass lozinka postavljena za zaštitu radne knjige.

Postavljanje i uklanjanje lozinke za aktivni list Excelove radne knjige obavlja se pomoću naredbi
Excel.ActiveSheet.protect("pass"); // postavlja lozinku
Excel.ActiveSheet.Unprotect("pass"); // ukloni lozinku

gdje je pass lozinka postavljena za zaštitu radne knjige.

Pomoćne operacije u EXCEL-u

Uklanjanje redova sa pomakom prema gore:
Excel.Rows["5:15"].Select;
Excel.Selection.Delete;

prilikom izvođenja ovih radnji, redovi od 5 do 15 će biti obrisani.

Postavljanje okna za zamrzavanje na aktivnom Excel listu
// otkvači područje ako je postavljeno
Excel.ActiveWindow.FreezePanes:=False;
// odaberite željenu ćeliju, u ovom slučaju D3
Excel.Range["D3"].Select;
// postavlja zakačenje područja
Excel.ActiveWindow.FreezePanes:=Tačno;

U ovom članku ćemo pogledati osnovne konstrukcije koje vam omogućavaju pristup radnoj knjizi MS Excel iz Delphija.

Organizacija pristupa EXCEL radnoj svesci

Za interakciju sa MS Excelom u programu, morate koristiti ComObj modul

UsesComObj;

i deklarirajte varijablu za pristup MS Excel-u sljedećeg tipa:

Var MsExcel: Variant;

Inicijalizacija Excel varijable u najjednostavnijem slučaju može se uraditi ovako:

MsExcel:= CreateOleObject("Excel.Application");

Kreiranje nove knjige:

MsExcel.Workbooks.Add;

Otvaranje postojeće knjige (gdje je putanja put do datoteke s ekstenzijom xls.):

MsExcel.Workbooks.Open;

Otvaranje postojeće radne knjige samo za čitanje:

MsExcel.Workbooks.Open;

Zatvaranje Excela:

MsExcel.ActiveWorkbook.Close; MsExcel.Application.Quit;

Blokiranje zahtjeva (potvrda, obavještenja) Ms Excel, na primjer, zabranjuje zahtjev za spremanje datoteke:

MsExcel.DisplayAlerts:=False;

Na ekranu prikazujemo Excel:

MsExcel.Visible:= Tačno;

ili sakrij:

MsExcel.Visible:= False;

Štampanje sadržaja aktivnog MS Excel lista:

MsExcel.ActiveSheet.PrintOut;

Čitanje/pisanje podataka u EXCEL-u

Ćeliji u trenutnoj Excel radnoj knjizi može se pristupiti na sljedeći način:

Da upišete vrijednost u ćeliju:

MsExcel.Range["B2"]:="Zdravo!";

Za čitanje vrijednosti iz ćelije:

S:=MsExcel.Range["B2"];

gdje B2- adresa ćelije.

Ili koristeći stil veze R1C1:

MsExcel.Range]:="Zdravo!";

gdje - koordinata ćelije.

Općenito, Excel ćeliji se može dodijeliti bilo koja vrijednost (znak, cijeli broj, razlomak, datum), dok će Ms Excel postaviti zadano formatiranje u ćeliji.

Format ćelije u EXCEL-u

Možete odabrati (odabrati) grupu ćelija za dalji rad na sljedeći način:

MsExcel.Range, MsExcel.Cells].Select; // ili MsExcel.Range["A1:C5"].Select;

ovo će odabrati područje između ćelije A1 i C5.

Nakon odabira, možete postaviti spajanje ćelija, prelamanje riječi i horizontalno i vertikalno poravnanje:

// spajanje ćelija MsExcel.Selection.MergeCells:=True; // prelamanje riječi MsExcel.Selection.WrapText:=True; // horizontalno poravnanje MsExcel.Selection.HorizontalAlignment:=3; // okomito poravnanje MsExcel.Selection.VerticalAlignment:=1;

Za vertikalne i horizontalno poravnanje koriste se sljedeće vrijednosti:

1 - koristi se zadano poravnanje
2 - lijevo poravnanje
3 - u centru
4 - desno.

granica ćelije

Kada se postavi na 1, granice ćelija se crtaju kao tanke, pune linije.

Osim toga, možete odrediti vrijednosti za svojstvo Borders, na primjer, jednake 3. Tada će biti postavljena samo gornja granica za blok odabira:

MsExcel.Selection.Borders.LineStyle:=1;

Vrijednost svojstva Borders specificira drugačiju kombinaciju lica ćelija. U oba slučaja mogu se koristiti vrijednosti između 1 i 10.

Korištenje lozinki u EXCEL-u

Postavljanje lozinke za aktivnu radnu knjigu može se izvršiti na sljedeći način:

Pokušajte // pokušati postaviti lozinku MsExcel.ActiveWorkbook.protect("pass"); osim // šta učiniti ako pokušaj postavljanja lozinke ne uspije završiti;

gdje pass- postavite lozinku za knjigu.

Uklanjanje lozinke iz knjige je slično, koristimo naredbu

MsExcel.ActiveWorkbook.Unprotect("pass");

gdje pass

Postavljanje i uklanjanje lozinke za aktivni list Excelove radne knjige obavlja se pomoću naredbi

MsExcel.ActiveSheet.protect("pass"); // postavlja lozinku MsExcel.ActiveSheet.Unprotect("pass"); // ukloni lozinku

gdje pass- lozinka postavljena za zaštitu knjige.

Pomoćne operacije u EXCEL-u

Uklanjanje redova sa pomakom prema gore:

MsExcel.Rows["5:15"].Select; MsExcel.Selection.;

prilikom izvođenja ovih radnji, redovi od 5 do 15 će biti obrisani.

Postavljanje okna za zamrzavanje na aktivnom Excel listu

// odmrzavanje okna ako je postavljeno MsExcel.ActiveWindow.FreezePanes:=False; // biramo željenu ćeliju, u ovom slučaju D3 MsExcel.Range["D3"].Select; // postavlja zamrzavanje okna MsExcel.ActiveWindow.FreezePanes:=True;

Čuvanje aktivne Excel radne sveske

Top Related Articles