Je kunt bij elke fase van dit model stoppen en het maandenlang bestuderen. Als er een speciale behoefte is om aanvullende eigenschappen en methoden te bestuderen, komen we zeker terug om te studeren. Laten we nu aan de slag gaan in Delphi met werkmapbladen.
2. Hoe activeer ik een Excel-werkmapblad?
Zoals u weet bij het maken van een lege werkmap Excel voegt automatisch 3 toe aan dit boek wit laken. Om met een specifiek blad te werken ( Werkblad of gewoon Laken) dit blad moet geactiveerd zijn. Eén manier om een werkmapblad te activeren Excel V Delphi als volgt:
resourcestring rsEInvalidSheetIndex = "Ongeldige index opgegeven voor WorkBooks. Bladactivering afgebroken"; rsEInvalidSheetActivate = "Bladactivering voltooid met fout"; functie ActivateSheet(WBIndex: geheel getal; Bladnaam: string): boolean; var i: geheel getal ; begin Resultaat: = false; als WBIndex › MijnExcel. Werkboeken. Tel en verhoog de uitzondering. Maken (rsEInvalidSheetIndex); probeer voor i : = 1 naar MyExcel. Werkboeken [WBIndex]. Lakens. Tel als AnsiLowerCase (MyExcel. WorkBooks [ WBIndex]. Spreadsheets . Item [ i]. Naam ) = AnsiLowerCase (Bladnaam) en begin vervolgens met MyExcel. Werkboeken [WBIndex]. Lakens. Artikel[i]. Activeren; Resultaat: = waar; pauze; einde ; behalve uitzondering verhogen. Maken (rsEInvalidSheetActivate); einde ; einde ;
Hier worden de functieparameters ingesteld op de werkmapindex (WBIndex) in de verzameling Werkboeken en de naam van het blad.
Als u wilt, kunt u hetzelfde blad per index in de collectie activeren Werkbladen- tegelijkertijd is de functie zelf enigszins vereenvoudigd (de voorwaarde voor het controleren van de bladnaam is niet vereist).
Ook als je dat zeker weet dit moment Omdat de werkmap die u nodig hebt actief is, kunt u het gebruik van een extra variabele (werkmapindex WBIndex) vermijden en het blad als volgt activeren:
MijnExcel. ActiefWerkboek. Lakens. Artikel[i]. Activeren;
Laten we nu eens nader kijken naar de methoden die door het object worden gebruikt Werkblad.
3. Excel-werkbladbladmethoden
Laten we nu het object in meer detail bekijken Werkblad.
De figuur toont de methoden die ik ooit in mijn werk heb gebruikt.
Totaal voorwerp Werkblad totalen 30 verschillende methoden die u kunt gebruiken.
| Methode | Beschrijving |
| Activeren | Maakt het huidige blad actief. We hebben al besproken hoe de methode werkt. |
| berekent alles open boeken, een specifiek blad in een boek, of opgegeven bereik cellen op een blad | |
| controleer de spelling op het geselecteerde blad | |
| slaat alle wijzigingen in het bestand op | |
| verwijdert het huidige blad Werkblad | |
| blad selectie | |
| kopieert het blad naar een andere locatie in de werkmap | |
| plakt de inhoud van het klembord in een werkblad | |
| retourneert een object dat een enkel diagram vertegenwoordigt (object GrafiekObject GrafiekObjecten) op het blad | |
| het blad verplaatsen. Deze methode is vergelijkbaar met de methode Kopiëren. Het enige verschil is dat na het plakken het gekopieerde blad uit het boek wordt verwijderd |
Laten we nu elk van de hierboven gepresenteerde methoden bekijken.
Hieronder, als uitdrukking het vel moet uitsteken ( Werkblad), tenzij anders aangegeven.
Bereken methode
Bereken een werkmap, blad of celbereik.
Het is vermeldenswaard dat de methodeaanroep Berekenen niet alleen mogelijk voor een specifiek werkblad Excel-werkmappen. Laten we eens kijken naar de opties voor het aanroepen van de Calculate-methode.
var MyExcel: OleVariant; MijnExcel. Berekenen
het onderstaande codefragment berekent het actieve blad
MijnExcel. ActiefWerkboek. ActiefWerkblad. Berekenen
Laten we alle formules in de kolommen A, B en C berekenen:
MijnExcel. ActiefWerkboek. ActiefWerkblad. Gebruikt bereik. Kolommen("A:C"). Berekenen
Controleer de spellingmethode
De methodeaanroep ziet er als volgt uit:
uitdrukking. CheckSpelling(CustomDictionary, IgnoreHoofdletters, AlwaysSuggest, SpellLang)Op hetzelfde moment als uitdrukking het vel moet uitsteken ( Werkblad).
| Parameter | Type | Beschrijving |
| Aangepastwoordenboek | Variant | Met een tekenreeks die de naam specificeert van het gebruikerswoordenboekbestand dat in aanmerking wordt genomen als het woord niet in het hoofdwoordenboek voorkomt. Als dit argument wordt weggelaten, wordt het standaardwoordenboek gebruikt |
| NegerenHoofdletters | Variant | WAAR, indien nodig, zodat Microsoft Excel woorden overgeslagen die in hoofdletters waren geschreven. Vals om te Microsoft Excel controleer alle woorden. Als dit argument wordt weggelaten, dan Huidige Instellingen Excel. |
| Altijd voorstellen | Variant | WAAR, om te Microsoft Excel een lijst met suggesties voor andere spellingen weergegeven wanneer een verkeerd gespeld woord werd gedetecteerd. Vals, naar Microsoft Excel wachtte op input correcte spelling. Als dit argument wordt weggelaten, worden de huidige instellingen gebruikt. |
| SpelLang | Variant | woordenboek taal. Kan de waarden van een van de constanten aannemen MsoTaalID , bijvoorbeeld voor de Russische taal SpelLang = 1049, voor Engels (VS) SpelLang = 1033 enz. Meer details over taalidentificaties. |
Hoe grammatica controleren op Excel-blad in Delphi?
MijnExcel. ActiefWerkboek. ActiefWerkblad. CheckSpelling(CustomDictionary:=EmptyParam, IgnoreUppercase:=false, AlwaysSuggest:=EmptyParam, SpellLang:=1033)
in dit geval MS-Excel controleert het huidige blad, inclusief het controleren van woorden uit hoofdletters. De verificatietaal is Russisch. Houd er rekening mee dat we, om de methode aan te roepen, expliciet hebben gespecificeerd welke parameter aan welke waarde moet worden toegewezen. Bovendien gebruikten we om elke parameter over te slaan LeegParam(lege parameter), die in staat Delphi vertegenwoordigt type variabele OleVariant.
Het is duidelijk dat deze methode voor het aanroepen van methoden (met expliciete aanduiding van alle parameters) niet helemaal handig voor u is en niet op grote schaal wordt toegepast bij het programmeren in het Engels. Delphi , maar niettemin is dit de enige manier en geen andere manier om de gebruikte methoden aan te roepen Excel .
SaveAs-methode
Een Excel-werkblad opslaan.
Methodeaanroep:
expression.SaveAs(Bestandsnaam, Bestandsformaat, Wachtwoord, WriteResPassword, ReadOnlyRecommended, CreateBackup, AddToMru, TextCodepage, TextVisualLayout, Lokaal)| Parameter | Type | Beschrijving |
| Bestandsnaam | Variant | een tekenreeks die de naam vertegenwoordigt van het bestand dat moet worden opgeslagen. Moet worden gespecificeerd vol pad naar het bestand, anders wordt het bestand in de map opgeslagen Excel . |
| Bestandsformaat | Variant | Het bestandsformaat dat wordt gebruikt bij het opslaan. Standaard wordt het bestand opgeslagen in het formaat dat u hebt geselecteerd laatste keer V Excel. |
| Wachtwoord | Variant | wachtwoord voor het bestand (niet meer dan 15 tekens). Het wachtwoord is hoofdlettergevoelig. |
| WriteResWachtwoord | Variant | wachtwoord dat zal worden gebruikt om wijzigingen aan te brengen werkboek. Als er geen wachtwoord is opgegeven, wordt het boek geopend in de modus Alleen-lezen. |
| Alleen-lezenAanbevolen | Variant | als de parameter gelijk is WAAR Wanneer u een bestand opent, verschijnt er een bericht op het display waarin wordt aanbevolen het bestand te openen voor alleen-lezen. |
| Een backup maken | Variant | WAAR, om een back-upbestand te maken |
| ToevoegenToMru | Variant | WAAR, om de naam van het opgeslagen bestand onlangs aan de lijst toe te voegen open bestanden in het hoofdmenu Excel |
| Tekstcodepagina En TekstVisueleLay-out | Variant | momenteel niet gebruikt en behouden voor achterwaartse compatibiliteit |
| Lokaal | Variant | Niet vereiste parameter, is standaard gelijk aan Vals.Betekenis WAAR- bestanden opslaan van Microsoft-taal Excel (inclusief configuratiescherminstellingen). |
MijnExcel.ActiveWorkBook.ActiveWorkSheet.SaveAs("C\:MijnExcelFile.xls")
In dit geval worden bij het opslaan de standaardinstellingen gebruikt.
Als u wilt opslaan Excel bestand in een ander formaat en vervolgens in de parameter Bestandsformaat u kunt een van de enumeratorwaarden gebruiken xlBestandsformaat . Enkele betekenissen xlBestandsformaat worden weergegeven in de onderstaande tabel:
| Naam | Betekenis | Beschrijving | Bestandsextensie |
| xlCSV | 6 | CSV | *.csv |
| xlExcel8 | 56 | Excel 97-2003-werkmap | *.xls |
| xlHtml | 44 | HTML-formaat | *.htm; *.HTML |
| xlOpenDocumentSpreadsheet | 60 | OpenDocument-spreadsheet | *.ods |
| xlOpenXMLWerkboek | 51 | Open XML-boek | *.xlsx |
Laten we een kleine procedure schrijven waarmee u een Excel-blad in verschillende formaten kunt opslaan:
const xlCSV = 6; xlExcel8 = 56; xlHtml = 44; xlOpenDocumentSpreadsheet = 60 ; xlOpenXMLWerkboek = 51 ; resourcestring rsESaveActiveSheet = "Fout bij opslaan actief werkblad"; procedure SaveAs(const AFileName: TFileName; AFileFormat: geheel getal ) ; probeer MyExcel. ActiefWerkboek. Actief blad. OpslaanAls(AFileName, AFileFormat); behalve uitzondering verhogen. Maken(rsESaveActiveSheet); einde ; einde ;
Methode verwijderen
Een Excel-werkblad verwijderen.
MijnExcel.ActiveWorkBook.WorkSheets.Item.Select
Selecteert het derde blad van de werkmap
Kopieer methode
Kopieer een blad naar een andere locatie in de werkmap.
Methodeaanroep:
expression.Copy(Voor, Na)Als u echter de parameter Voor, dan moet je het niet gebruiken Na en vice versa. Ik wil uw aandacht vestigen op het feit dat het het BLAD is dat wordt aangegeven, en niet de bladindex.
Hoe Excel-blad naar Delphi kopiëren?
MijnExcel.ActiveWorkBook.WorkSheets.Item.Copy(Na:=MijnExcel.ActiveWorkBook.WorkSheets.Item)
In dit geval wordt het eerste blad gekopieerd en na het derde geplakt.
Plak methode
Plak de inhoud van het klembord in een Excel-werkblad.
Methodeaanroep:
expression.Paste(Bestemming, Link)Hoe plak ik de inhoud van het klembord in een Excel-blad in Delphi?
MijnExcel.ActiveWorkBook.ActiveSheet.Paste(Bestemming:=MijnExcel.ActiveWorkBook.ActiveSheet.Range("D1:D5"))
In dit geval wordt de inhoud van de buffer ingevoegd in kolom D in de rijen 1 tot en met 5. Opgemerkt moet worden dat als de inhoud van de buffer niet aan de voorwaarde voldoet, er bijvoorbeeld slechts 1 getal in de buffer staat, Dan uitzonderlijke situatie.
Methode GrafiekObjecten
Retourneert een object dat een enkel diagram vertegenwoordigt (object GrafiekObject) of de verzameling van alle diagrammen (object GrafiekObjecten) op het blad.
Methodeaanroep:
expressie.ChartObjectsHoe krijg ik een grafiek in een Excel-werkblad in Delphi?
MijnExcel.ActiveWorkBook.ActiveSheet.ChartObjects
In dit geval wordt de eerste ontvangen.
Verplaats methode
Een blad verplaatsen. Deze methode is vergelijkbaar met de . Het enige verschil is dat na het plakken het gekopieerde blad uit het boek wordt verwijderd.
Hier is het deel van de methoden waarmee ik ooit heb gewerkt Excel V Delphi . In het algemeen kan worden gezegd dat in Delphi kan worden gecontroleerd MS-Excel niet slechter dan wanneer je rechtstreeks met deze applicatie werkt, het belangrijkste is om niet te vergeten welke methode of eigenschap waarvoor verantwoordelijk is :). Om het niet te vergeten, heb ik een kleine MindMap gemaakt, die ik regelmatig zal aanvullen en bijwerken. Door op de link te klikken, kunt u Excel-objecten zien, de methoden die ze gebruiken, de methodeparameters en hun typen in overeenstemming Delphi-typen. Over het algemeen een klein grafisch spiekbriefje voor degenen die graag aan Excel sleutelen in Delphi.
In dit artikel zullen we kijken naar de basisconstructies waarmee u vanuit Delphi toegang krijgt tot een MS Excel-werkmap.
Het organiseren van toegang tot het EXCEL-boek
Om in het programma met MS Excel te kunnen communiceren, moet u de ComObj-module gebruiken
Gebruikt ComObj;
en declareer een variabele voor toegang tot MS Excel van het volgende type:
Var MsExcel: Variant;
In het eenvoudigste geval kan het initialiseren van een Excel-variabele als volgt worden gedaan:
MsExcel:= CreateOleObject("Excel.Applicatie");
Een nieuw boek maken:
MsExcel.Werkboeken.Toevoegen;
Opening bestaand boek(waarbij pad het pad is naar het bestand met xls-extensie.):
MsExcel.Werkboeken.Open;
Een bestaande werkmap openen voor alleen-lezen:
MsExcel.Werkboeken.Open;
Excel afsluiten:
MsExcel.ActiveWorkbook.Close; MsExcel.Applicatie.Afsluiten;
Blokkeren van MS Excel-verzoeken (bevestigingen, meldingen), bijvoorbeeld het blokkeren van een verzoek om een bestand op te slaan:
MsExcel.DisplayAlerts:=False;
Excel op het scherm weergeven:
MsExcel.Visible:= Waar;
of verberg:
MsExcel.Visible:= Onwaar;
De inhoud van het actieve MS Excel-blad afdrukken:
MsExcel.ActiveSheet.PrintOut;
Gegevens lezen/schrijven in EXCEL
U kunt als volgt toegang krijgen tot een cel in de huidige Excel-werkmap:
Een waarde naar een cel schrijven:
MsExcel.Range["B2"]:="Hallo!";
Een waarde uit een cel lezen:
S:=MsExcel.Range["B2"];
Waar B2- mobiel adres.
Of gebruik de R1C1-linkstijl:
MsExcel.Range]:="Hallo!";
Waar - celcoördinaat.
Helemaal niet, Excel-cel U kunt elke waarde toewijzen (teken, geheel getal, breuk, datum) en mevrouw Excel zal de standaardopmaak in de cel instellen.
Cellen opmaken in EXCEL
U kunt als volgt een groep cellen selecteren (selecteren) voor later werk:
MsExcel.Range, MsExcel.Cells].Selecteren; // of MsExcel.Range["A1:C5"].Selecteer;
in dit geval wordt het gebied tussen de cellen A1 en C5 geselecteerd.
Nadat u een selectie heeft gemaakt, kunt u het samenvoegen van cellen, tekstomloop en horizontale en instellen verticale uitlijning:
// cellen samenvoegen MsExcel.Selection.MergeCells:=True; // inpakken volgens MsExcel.Selection.WrapText:=True; // horizontale uitlijning MsExcel.Selection.HorizontalAlignment:=3; // verticale uitlijning MsExcel.Selection.VerticalAlignment:=1;
Voor verticale en horizontale uitlijning worden de volgende waarden gebruikt:
1 - standaarduitlijning wordt gebruikt
2 - linker uitlijning
3 - in het midden
4 - aan de rechterkant.
Celgrens
Indien ingesteld op 1, worden celranden getekend met dunne, ononderbroken lijnen.
Daarnaast kun je voor de eigenschap Borders waarden opgeven, bijvoorbeeld gelijk aan 3. Dan wordt alleen de bovenste rand voor het selectieblok ingesteld:
MsExcel.Selection.Borders.LineStyle:=1;
De waarde van de eigenschap Borders geeft aan verschillende combinatie cel randen. In beide gevallen kunt u waarden gebruiken in het bereik van 1 tot 10.
Wachtwoorden gebruiken in EXCEL
Een wachtwoord instellen voor de actieve werkmap kunt u als volgt doen:
Probeer // probeer een wachtwoord in te stellen MsExcel.ActiveWorkbook.protect("pass"); behalve // acties als een poging om een wachtwoord in te stellen mislukt;
Waar doorgang- stel een wachtwoord in voor het boek.
Het verwijderen van een wachtwoord uit een boek is vergelijkbaar, gebruik de opdracht
MsExcel.ActiveWorkbook.Unprotect("pass");
Waar doorgang
Het instellen en verwijderen van een wachtwoord voor het actieve blad van een Excel-werkmap gebeurt met behulp van de opdrachten
MsExcel.ActiveSheet.protect(“pass”); // het wachtwoord instellen MsExcel.ActiveSheet.Unprotect("pass"); // verwijder wachtwoord
Waar doorgang- wachtwoord ingesteld om het boek te beschermen.
Hulpwerkzaamheden in EXCEL
Rijen verwijderen met shift omhoog:
MsExcel.Rows["5:15"].Selecteren; MsExcel.Selectie.;
Bij het uitvoeren van deze acties worden de regels 5 t/m 15 verwijderd.
Een vastgezet gebied instellen op actief blad Excel
// maak het gebied vrij als het is ingesteld MsExcel.ActiveWindow.FreezePanes:=False; // selecteren de gewenste cel, V in dit geval D3 MsExcel.Range["D3"].Selecteren; // bevries het gebied MsExcel.ActiveWindow.FreezePanes:=True;
Een actieve Excel-werkmap opslaan
IN deze recensie De basisconstructies waarmee u vanuit Delphi toegang krijgt tot een Excel-werkmap worden besproken.
Het organiseren van toegang tot het EXCEL-boek
Om in een programma met MS Excel te kunnen communiceren, moet u de ComObj-module gebruiken en een variabele declareren om toegang te krijgen tot het MS Excel-varianttype.
gebruikt ComObj;
var Excel: variant;
In het eenvoudigste geval kunt u een Excel-variabele als volgt initialiseren:
Excel:= CreateOleObject("Excel.Applicatie");
Een nieuw boek maken:
Excel.Werkboeken.Toevoegen;
Een bestaand boek openen (waarbij pad het pad is naar het bestand met de xls-extensie):
Excel.Werkboeken.Open;
Een bestaande werkmap openen voor alleen-lezen:
Excel.Werkboeken.Open;
Excel afsluiten:
Excel.ActiveWorkbook.Sluiten;
Excel.Applicatie.Afsluiten;
Blokkeren van Excel-verzoeken (bevestigingen, meldingen), bijvoorbeeld het blokkeren van een verzoek om een bestand op te slaan:
Excel.DisplayAlerts:=Onwaar;
Excel op het scherm tonen of verbergen:
Excel.Visible:= Waar;
Excel.Visible:= Onwaar;
De inhoud van het actieve Excel-werkblad afdrukken:
Excel.ActiveSheet.PrintOut;
Gegevens lezen/schrijven in EXCEL
U kunt als volgt toegang krijgen tot een cel in de huidige Excel-werkmap:
Excel.Range["b2"]:="Hallo!"; // schrijf een waarde naar een cel
s:=Excel.Bereik["b2"]; // waarde uit cel lezen
Waarbij b2 het celadres is.
Of gebruik de R1C1-linkstijl:
Excel.Range]:="Hallo!";
Waar is de celcoördinaat.
Over het algemeen kunt u elke waarde aan een Excel-cel toewijzen (teken, geheel getal, breuk, datum), en Excel stelt de standaardopmaak in de cel in.
Cellen opmaken in EXCEL
U kunt als volgt een groep cellen selecteren (selecteren) voor later werk:
Excel.Bereik, Excel.Cellen].Selecteren;
// of
Excel.Range["A1:C5"].Selecteer;
In dit geval wordt het gebied tussen de cellen A1 en C5 geselecteerd.
Nadat u de selectie heeft gemaakt, kunt u het volgende instellen:
1) Cellen samenvoegen:
Excel.Selection.MergeCells:=Waar;
2) Tekstterugloop:
Excel.Selection.WrapText:=Waar;
3) Horizontale uitlijning:
Excel.Selectie.HorizontaleUitlijning:=3;
Indien ingesteld op 1, wordt de standaarduitlijning gebruikt. Wanneer ingesteld op 2, is de uitlijning links, 3 gecentreerd en 4 rechts. 4) Verticale uitlijning
Excel.Selectie.VerticalAlignment:=1;
De toegewezen waarden zijn hetzelfde als de horizontale uitlijning.
5) Rand voor cellen:
Indien ingesteld op 1, worden celranden getekend met dunne, ononderbroken lijnen.
Daarnaast kun je voor de eigenschap Borders waarden opgeven, bijvoorbeeld gelijk aan 3. Dan wordt alleen de bovenste rand voor het selectieblok ingesteld:
Excel.Selectie.Borders.LineStyle:=1;
De waarde van de eigenschap Borders specificeert een andere combinatie van celranden.
In beide gevallen kunt u waarden gebruiken in het bereik van 1 tot 10.
Wachtwoorden gebruiken in EXCEL
Een wachtwoord instellen voor de actieve werkmap kunt u als volgt doen:
poging
// probeer een wachtwoord in te stellen
Excel.ActiveWorkbook.protect(“pass”);
behalve
// acties als een poging om een wachtwoord in te stellen mislukt
einde;
Waar pass het wachtwoord is dat voor het boek moet worden ingesteld.
Het verwijderen van een wachtwoord uit een boek is vergelijkbaar, gebruik de opdracht
Excel.ActiveWorkbook.Unprotect("pass");
Het instellen en verwijderen van een wachtwoord voor het actieve blad van een Excel-werkmap gebeurt met behulp van de opdrachten
Excel.ActiveSheet.protect("pass"); // stel een wachtwoord in
Excel.ActiveSheet.Unprotect("pass"); // verwijder wachtwoord
Waar pass is het wachtwoord dat is ingesteld om het boek te beschermen.
Hulpwerkzaamheden in EXCEL
Rijen verwijderen met een opwaartse verschuiving (bij het uitvoeren van deze acties worden rijen 5 t/m 15 verwijderd):
Excel.Rijen["5:15"].Selecteren;
Excel.Selectie.Verwijderen;
Een bevriezingsgebied instellen op het actieve Excel-werkblad:
// maak het gebied vrij als dit is ingesteld
Excel.ActiveWindow.FreezePanes:=False;
// selecteer de gewenste cel, in dit geval D3
Excel.Range["D3"].Selecteer;
// stel het gebied in dat moet worden bevroren
Excel.ActiveWindow.FreezePanes:=Waar;
In deze review worden de belangrijkste structuren besproken waarmee u vanuit DELPHI toegang krijgt tot een Excel-werkmap.
Het organiseren van toegang tot het EXCEL-boek
Om met MS Excel in het programma te kunnen communiceren, moet u de ComObj-module gebruiken
gebruikt ComObj;
en declareer een variabele voor toegang tot MS Excel van het volgende type:
var Excel: variant;
In het eenvoudigste geval kan het initialiseren van een Excel-variabele als volgt worden gedaan:
Excel:= CreateOleObject("Excel.Applicatie");
Een nieuw boek maken:
Excel.Werkboeken.Toevoegen;
Een bestaand boek openen (waarbij pad het pad is naar het bestand met de xls-extensie):
Excel.Werkboeken.Open;
Een bestaande werkmap openen voor alleen-lezen:
Excel.Werkboeken.Open;
Excel afsluiten:
Excel.ActiveWorkbook.Sluiten;
Excel.Applicatie.Afsluiten;
Excel-verzoeken blokkeren (bevestigingen, meldingen), blokkeer bijvoorbeeld het verzoek om een bestand op te slaan:
Excel.DisplayAlerts:=Onwaar;
Excel op het scherm weergeven:
Excel.Visible:= Waar;
of verberg:
Excel.Visible:= Onwaar;
De inhoud van het actieve Excel-werkblad afdrukken:
Excel.ActiveSheet.PrintOut;
Gegevens lezen/schrijven in EXCEL
U kunt als volgt toegang krijgen tot een cel in de huidige Excel-werkmap:
Excel.Range["B2"]:="Hallo!";- om een waarde naar een cel te schrijven of
s:=Excel.Bereik["B2"]; - voor lezen,
waarbij B2 het celadres is.
Of gebruik de R1C1-linkstijl:
Excel.Range]:="Hallo!";, waar is de celcoördinaat.
Over het algemeen kunt u elke waarde aan een Excel-cel toewijzen (teken, geheel getal, breuk, datum), en Excel stelt de standaardopmaak in de cel in.
Cellen opmaken in EXCEL
U kunt als volgt een groep cellen selecteren (selecteren) voor later werk:
Excel.Bereik, Excel.Cellen].Selecteren;
of
Excel.Range["A1:C5"].Selecteer;
in dit geval wordt het gebied tussen de cellen A1 en C5 geselecteerd.
Nadat u de selectie heeft gemaakt, kunt u het volgende instellen:
1) cellen samenvoegen
Excel.Selection.MergeCells:=Waar;
2) woordterugloop
Excel.Selection.WrapText:=Waar;
3) horizontale uitlijning
Excel.Selectie.HorizontaleUitlijning:=3;
Indien ingesteld op 1, wordt de standaarduitlijning gebruikt. Wanneer ingesteld op 2, is de uitlijning links, 3 gecentreerd en 4 rechts.
4) verticale uitlijning
Excel.Selectie.VerticalAlignment:=1;
de toegewezen waarden zijn hetzelfde als de horizontale uitlijning.
5) rand voor cellen
Wanneer ingesteld op 1, worden celranden getekend met dunne, ononderbroken lijnen.
Daarnaast kun je voor de eigenschap Borders waarden opgeven, bijvoorbeeld gelijk aan 3. Dan wordt alleen de bovenste rand voor het selectieblok ingesteld:
Excel.Selectie.Borders.LineStyle:=1;
De waarde van de eigenschap Borders specificeert een andere combinatie van celranden.
In beide gevallen kunt u waarden gebruiken in het bereik van 1 tot 10.
Wachtwoorden gebruiken in EXCEL
Een wachtwoord instellen voor de actieve werkmap kunt u als volgt doen:
poging
// probeer een wachtwoord in te stellen
Excel.ActiveWorkbook.protect(“pass”);
behalve
// acties als een poging om een wachtwoord in te stellen mislukt
einde;
waarbij pass het wachtwoord is dat voor het boek moet worden ingesteld.
Het verwijderen van een wachtwoord uit een boek is vergelijkbaar, gebruik de opdracht
Excel.ActiveWorkbook.Unprotect("pass");
Het instellen en verwijderen van een wachtwoord voor het actieve blad van een Excel-werkmap gebeurt met behulp van de opdrachten
Excel.ActiveSheet.protect(“pass”); // stel een wachtwoord in
Excel.ActiveSheet.Unprotect("pass"); // verwijder wachtwoord
waarbij pass het wachtwoord is dat is ingesteld om het boek te beschermen.
Hulpwerkzaamheden in EXCEL
Rijen verwijderen met shift omhoog:
Excel.Rijen["5:15"].Selecteren;
Excel.Selectie.Verwijderen;
Bij het uitvoeren van deze acties worden de regels 5 t/m 15 verwijderd.
Stel een vriesgebied in op het actieve Excel-werkblad
// maak het gebied vrij als dit is ingesteld
Excel.ActiveWindow.FreezePanes:=False;
// selecteer de gewenste cel, in dit geval D3
Excel.Range["D3"].Selecteer;
// stel het gebied in dat moet worden bevroren
Excel.ActiveWindow.FreezePanes:=Waar;
Succes!
Hallo, in dit artikel zal ik je vertellen hoe je het in je applicatie (programma) kunt gebruiken Delphi DB in de vorm MS-Excel. Ja ja precies MS-Excel. Er is hier niets ingewikkelds. Laten we eerst ons blad in MS Excel invullen. De eerste regel in elke kolom neemt altijd onze applicatie als de naam van de kolommen, dat wil zeggen dat deze niet de naam van de kolommen op deze manier gebruikt: A, B, C enzovoort. Dus in de eerste regel van kolom A en kolom B schreef ik Voor-en achternaam En Cijfer respectievelijk voor elke kolom. Dit zullen onze rubrieken zijn, en hieronder heb ik de gegevens ingevuld die in mijn database zullen staan, nou, schrijf zelf de namen en beoordelingen. Onze database is dus klaar. Laten we er nu een verbinding mee maken. er wordt een verbinding gemaakt die vergelijkbaar is met MS-toegang, dus er is hier niets ingewikkelds. Op het formulier hebben we oude componenten:
- TDBGrid
- TADOQuery
- TADOVerbinding
- TGegevensbron
Ik zal je snel vertellen hoe je deze componenten moet aansluiten, aangezien dit al door mij is gezegd.
- TADOQuery C TADOVerbinding in eigendom - Verbinding
- TGegevensbron Met TADOQuery in eigendom Gegevensset
- TDBGrid C TGegevensbron in eigendom Databron
IN TADOVerbinding stel de eigenschap in LangePromt V Vals. Het lijkt kleine opstelling klaar. Nu komen we bij de directe verbinding. In eigendom TADOVerbinding- Verbindingsdraad klik op de knop " … “, dan hebben we een kijkvenster
Klik op de knop " Bouwen..." en het volgende venster verschijnt
In dit venster selecteert u de volgende aanbieder: Microsoft OLE DB Provider voor ODBC-stuurprogramma's en druk op de knop " Volgende>>" en zie het volgende venster
Plaats in dit venster onmiddellijk een verwijzing naar “ Gebruik een verbindingsreeks" en klik op de knop " Montage“, waarna een venster verschijnt
Ga in dit venster naar het tabblad Computergegevensbron en selecteer in de lijst die verschijnt - Excel-bestanden, of beter gezegd: klik met de linkermuisknop op deze datum Dubbelklik en geef in het venster dat verschijnt het pad naar onze aan Excel-het boek dat we hebben gemaakt. Klik daarna op de knop “ OK". We hebben alle aansluitingen klaar. Ik zou graag meer willen toevoegen als je een bestand hebt Excel, waarbij uw tabel zich in dezelfde map bevindt als het programma, en vervolgens in de componenteigenschap TADOVerbinding- Verbindingsdraad het pad naar uw Excel-bestand wordt opgeschreven, wis het pad en laat alleen uw naam achter Excel bestand met de extensie, en in de eigenschap StandaardDataBase hetzelfde onderdeel, schrijf de naam van uw Excel-bestand met extensie . Wanneer u vervolgens uw toepassing start, zullen er geen fouten optreden met een onjuist opgegeven pad naar uw database. Volgende binnen TDBGrid Laten we erop dubbelklikken en 2 rijen maken in het venster dat verschijnt, dit zullen onze kolommen zijn. En ze worden gemaakt door op de knop “ Nieuw toevoegen (Ins)". Vervolgens selecteren we elke regel in de eigenschap FieldName en voor de eerste regel schrijven we: Voor-en achternaam, sinds in Excel-file, dit is precies hoe ik de kolomnaam in de eerste regel schreef (voor de cel A1 Ik heb het zo geschreven), en door de tweede regel te markeren die is gemaakt in TDBGrid, op eigendom Veldnaam laten we schrijven - Cijfer, aangezien ik het was die deze kolomnaam schreef (in de cel A2 Ik heb het zo geschreven). Nu kunnen we onze gegevens activeren. Voor dit evenement belangrijkste vorm — Aanmaken laten we het volgende schrijven
Zoals u kunt zien, dezelfde query, alleen in plaats van de naam van de tabel, zoals we hadden MS-toegang wij geven de naam van ons blad aan Excel, tussen vierkante haakjes en eindigend met $ . Zoals je kunt zien, is er niets ingewikkelds. In het volgende artikel over de database MS-Excel Ik zal je vertellen hoe je gegevens invoegt, bewerkt, enzovoort.
| Ik zou willen opmerken dat als je een echte fan bent van voetbal, en vooral van het Engelse kampioenschap, dat momenteel een van de sterkste is, je waarschijnlijk erg geïnteresseerd zult zijn in het lezen over de voetbalclub. |
