Excel VBA-feilsøking. Utskrift
Feilsøking er et av de nyttige verktøyene som presenteres i VBA-redigereren for å finne ut hvordan et program fungerer, og det hjelper til med å analysere endringene i verdiene til variabler opprettet i VBA-programmet. Det viser utdataene fra hurtigvinduet når vi kjører programmet uten feil.
Debug.print tilbyr de to viktigste fordelene i forhold til bruken av Msgbox for å vise utdataene fra koden. Det eliminerer behovet for å klikke på OK-knappen hver gang og viser loggen over returnerte utdataverdier til de umiddelbare vinduene. Det sparer mye tid for brukerne. Denne artikkelen forklarer bruken av excel VBA Debug Print med mange eksempler og forklarer hvordan du bruker den som dekker følgende ting.
Hva er VBA Debug Print?
Feilsøking er et objekt i VBA og brukes med de to metodene kalt Assert and Print. Utskriften er nyttige meldinger på displayet og hevder at det er nyttig i vurderingen av forholdene. I VBA, feilsøk. Utskriftsuttalelsen brukes hvor som helst i kodingsprogrammet for å vise verdiene til en variabel eller meldinger i Øyeblikkelig vindu. Disse trenger ingen bekreftelse eller bekreftelse og viser ingen effekt på utviklet kode. Det er trygt og best å bruke koden i situasjonen for å lette tilgangen til mange brukere. Disse er bare nyttige i testing eller evaluering av koden for å bekrefte at den fungerer riktig eller ikke. Den skriver ut variablene, strenger, tall, matrise, verdier i Excel-ark og tomme og aktive ark.
Hvordan bruke Excel VBA feilsøkingsutskrift?
VBA debug.print er uttalelsen som er nyttig for å vise flere variabler om gangen i det umiddelbare vinduet. Det er den beste og alternative tilnærmingen for å vise resultatet.
For eksempel,
Feilsøking. Antall trykk, sum, gjennomsnitt, standardavvik
Som vist i eksemplet, er alle variablene skilt med komma. Denne uttalelsen kan overføre utdataene til det umiddelbare vinduet, selv om et vindu ikke åpnes. Det slutter ikke å kjøre koden som i Msgbox. Denne fleksibiliteten støtter kontinuerlig overvåking av endringene i utdataene angående endringer i koden.
Variablene teller, sum, gjennomsnitt og standardavvik vises på samme linje med lik plass mellom dem. Hvis Øyeblikkelig vindu ikke åpnes, følg følgende trinn for å se utdataene.
Fremgangsmåte for å åpne øyeblikkelig vindu og se utdataene
- Trykk på Ctrl + G eller klikk på "Vis" -menyen i VBA-redigereren.
- Velg alternativet "Umiddelbart vindu".
- Plasser markøren i vinduet og kjør koden igjen.
- Observer utdataene i vinduet.
Eksempler på Excel VBA Debug.Print
Følgende er eksemplene for å demonstrere bruken av feilsøking i Excel VBA.
Eksempel nr. 1 - Vise verdiene til variablene
Gå først til kategorien Utvikler, klikk på Makroer, og opprett en makro for å skrive koden i VBA og legge til et navn til den.
Når du har lagt til et navn, klikker du på Opprett. Dette åpner VBA-redaktøren.
Utvikle et lite program, som vist på figuren.
Kode:
Undervariabler () Dim X Som Heltall Dim Y Som String Dim Z Som Double X = 5 Y = "John" Z = 105,632 Feilsøking. Skriv ut X Feilsøking. Skriv ut Y Feilsøking. Skriv ut Z End Sub
Som vist på skjermbildet reduseres tre dimensjoner eller variabler som henholdsvis X, Y og Z som et heltall, streng og dobbelt. For å skrive ut disse verdiene brukes Debug.print, og utdataene vises i ledetekstvinduet. Trykk CTRL + G for å se resultatet, som vist på skjermbildet.
Kjør denne koden ved hjelp av F5-tasten og trykk CTRL + G for å se utdataene i Umiddelbart vindu.
Dette programmet kan forenkles ved å skille feilsøkingsuttalelsene med et komma.
Kode:
Undervariabler () Dim X Som Heltall Dim Y Som String Dim Z Som Double X = 5 Y = "John" Z = 105.632 Feilsøking. Skriv ut X, Y, Z End Sub
Denne feilsøkingsuttalelsen skriver ut utdata på samme linje, som vist på skjermbildet.
Eksempel 2 - Feilsøk utskrift til fil
Dette eksemplet illustrerer bruken av VBA-feilsøking for å vise utdata til en fil når lengden på teksten er for høy.
Programmet for å skrive ut utdataene på en fil er utviklet, som vist på figuren.
Kode:
Sub DebugPrintToFile () Dim s As String Dim num As Integer num = FreeFile () Åpne "D: Articles Excel test.txt" For output As #num s = "Hello, world!" Feilsøk. Skriv ut 'skriv til det umiddelbare vinduet Skriv ut #num, s' skrive utgang til fil Lukk #num End Sub
I dette programmet blir to variabler kalt S og Num betraktet som streng og heltall. Den åpne uttalelsen brukes til å lage en tekstfil med navnetesten. En kolonne kalt “Hello World” blir erklært til variabelen S.
Når du kjører VBA-koden manuelt eller bruker F5-tasten, skrives utdataene inn i det umiddelbare vinduet, og filen om gangen vises i mappen.
The output to file is shown in the below-mentioned figure.
Printing output to file is beneficial when long text is presented.
Example #3 - Displaying the Factorial of a Number in the Immediate Window
This example illustrates the use of the debug-a print statement to show the factorial of a number.
Code:
Public Sub Fact() Dim Count As Integer Dim number As Integer Dim Fact As Integer number = 5 Fact = 1 For Count = 1 To number Fact = Fact * Count Next Count Debug.Print Fact End Sub
To determine the factorial, three variables are considered, including the count, number, and fact. For loop is taken to repeat the multiplication of fact-value with count to determine factorial of the number.
Here, debug. The print statement is used outside the “for” loop to display the value after completing the circle. The output is determined.
If we use debug. Print statement inside the “for” loop, the fact-value is displayed for every recurring time, as shown in the figure.
Code:
Public Sub Fact() Dim Count As Integer Dim number As Integer Dim Fact As Integer number = 5 Fact = 1 For Count = 1 To number Fact = Fact * Count Debug.Print Fact Next Count End Sub
Run the code by pressing the F5 key and see the output in the immediate window. In this situation, we should consider the last value as the factorial of the given number.
Example #4 - Printing the Full name of the Active Workbook
This example explains how to print the current workbook name into the prompt window.
The program is developed, as shown in the figure.
Code:
Sub Activework() Dim count As Long For count = 1 To Workbooks.count Debug.Print Workbooks(count).FullName Next count Debug.Print count End Sub
Her er 'count' variabelen som er tatt for å telle antall aktive arbeidsbøker og for å vise det fulle navnet på den aktive arbeidsboken. Fullt navn og antall aktive arbeidsbøker vises, som vist på figuren.
Banen til arbeidsboken i stasjonene vises nøyaktig ved hjelp av VBA-feilsøkingsuttalelsen.
Ting å huske
- Hovedproblemet med feilsøkingen .print er ikke noe alternativ for tekstinnpakning for lange strenger i det umiddelbare vinduet
- Det umiddelbare vinduet skal bringes til toppen for å se resultatet i brukergrensesnittet
- Det er umulig å pakke inn den lange teksten som vises i Umiddelbart vindu. I denne situasjonen må resultatet vises til en fil som er lagret på stasjonen.
