Excel VBA atkļūdošana. Drukāt
Debug Print ir viens no noderīgajiem rīkiem, kas tiek parādīts VBA redaktorā, lai noskaidrotu, kā programma darbojas, un tas palīdz analizēt VBA programmā izveidoto mainīgo vērtību izmaiņas. Tas parāda uzvednes loga iznākumu, kad mēs palaižam programmu bez kļūdām.
Debug.print piedāvā divas galvenās priekšrocības salīdzinājumā ar Msgbox izmantošanu koda izvades parādīšanai. Tas novērš nepieciešamību katru reizi noklikšķināt uz pogas Labi un tūlītējiem logiem parāda atgriezto izvades vērtību žurnālu. Tas ietaupa lietotājiem daudz laika. Šajā rakstā ir izskaidrota excel VBA Debug Print izmantošana ar daudziem piemēriem un paskaidrots, kā to izmantot, aptverot šādas lietas.
Kas ir VBA atkļūdošanas druka?
Atkļūdošana ir objekts VBA un tiek izmantots ar divām metodēm, ko sauc par Apstiprināt un Drukāt. Drukāšana ir noderīga paziņojumos displejā un ir noderīga apstākļu novērtēšanā. VBA, atkļūdošana. Drukāto paziņojumu izmanto jebkurā kodēšanas programmas vietā, lai parādītu mainīgā vai ziņojumu vērtības tūlītējā logā. Viņiem nav nepieciešams apstiprinājums vai apstiprinājums, un tie neietekmē izstrādāto kodu. Situācijā to ir droši un vislabāk izmantot kodā, lai atvieglotu piekļuvi daudziem lietotājiem. Tie ir tikai noderīgi koda pārbaudē vai novērtēšanā, lai apstiprinātu, ka tas darbojas pareizi vai nedarbojas. Tas izdrukā mainīgos, virknes, skaitļus, masīvu, vērtības Excel lapās, kā arī tukšas un aktīvas lapas.
Kā izmantot Excel VBA atkļūdošanas druku?
VBA debug.print ir paziņojums, kas palīdz vairākos mainīgos vienlaikus parādīt tiešajā logā. Tā ir labākā un alternatīvā pieeja, lai parādītu rezultātu.
Piemēram,
Debug.print skaits, summa, vidējā, standartnovirze
Kā parādīts piemērā, visi mainīgie tiek atdalīti ar komatiem. Šis paziņojums var pārsūtīt izvadi uz tiešo logu, pat ja logs netiek atvērts. Tas neapstājas palaist kodu kā Msgbox. Šī elastība nodrošina nepārtrauktu izejas izmaiņu uzraudzību attiecībā uz izmaiņām kodā.
Mainīgie lielumi, summa, vidējais lielums un standartnovirze tiek rādīti vienā un tajā pašā rindā ar vienādu atstarpi starp tiem. Ja tūlītējais logs netiek atvērts, veiciet tālāk norādītās darbības, lai redzētu rezultātu.
Darbības, lai atvērtu tūlītējo logu un skatītu rezultātu
- Nospiediet Ctrl + G vai noklikšķiniet uz izvēlnes “Skatīt” VBA redaktorā.
- Izvēlieties opciju 'Tūlītējs logs'.
- Novietojiet kursoru logā un atkal palaidiet kodu.
- Novērojiet izvadi logā.
Excel VBA atkļūdošanas piemēri. Drukāt
Šie ir piemēri, lai parādītu atkļūdošanas drukas izmantošanu Excel VBA.
1. piemērs - mainīgo vērtību parādīšana
Vispirms dodieties uz cilni Izstrādātājs, noklikšķiniet uz Makro un izveidojiet makro, lai ierakstītu kodu VBA un pievienotu tam vārdu.
Pēc vārda pievienošanas noklikšķiniet uz izveidot. Tas atver VBA redaktoru.
Izstrādājiet nelielu programmu, kā parādīts attēlā.
Kods:
Apakšējie mainīgie () Dim X kā vesels skaitlis Dim Y kā virkne Dim Z kā Double X = 5 Y = "John" Z = 105.632 Debug.Print X Debug.Print Y Debug.Print Z End Sub
Kā redzams ekrānuzņēmumā, trīs dimensijas vai mainīgie tiek samazināti kā X, Y un Z kā vesels skaitlis, virkne un Double. Lai izdrukātu šīs vērtības, tiek izmantota Debug.print, un izvade tiks parādīta uzvednes logā. Nospiediet CTRL + G, lai redzētu rezultātu, kā parādīts ekrānuzņēmumā.
Palaidiet šo kodu, izmantojot taustiņu F5, un nospiediet CTRL + G, lai redzētu izvadi tūlītējā logā.
Šo programmu var vienkāršot, atdalot atkļūdošanas un izdrukāšanas paziņojumus ar komatu.
Kods:
Apakšējie mainīgie () Dim X kā vesels skaitlis Dim Y kā virkne Dim Z kā Double X = 5 Y = "John" Z = 105.632 Debug.Print X, Y, Z End Sub
Šis atkļūdošanas paziņojums izdrukā izvadi tajā pašā rindā, kā parādīts ekrānuzņēmumā.
2. piemērs - atkļūdot druku failā
This example illustrates the use of VBA debug print to display output to a file when the length of the text is too high.
The program to print the output on a file is developed, as shown in the figure.
Code:
Sub DebugPrintToFile() Dim s As String Dim num As Integer num = FreeFile() Open "D:ArticlesExcel est.txt" For Output As #num s = "Hello, world!" Debug.Print s ' write to the immediate window Print #num, s ' write output to file Close #num End Sub
In this program, two variables called S and Num, are considered as string and integer. The open statement is used to create a text file with the name test. A column called “Hello World” is declared into the variable S.
When you run the VBA code manually or using the F5 key, the output is written into the immediate window, and the file at a time is shown in the folder.
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
Šeit 'skaits' ir mainīgais, kas ņemts, lai saskaitītu aktīvo darbgrāmatu skaitu un parādītu aktīvās darbgrāmatas pilnu nosaukumu. Tiek parādīts pilns nosaukums un aktīvo darbgrāmatu skaits, kā parādīts attēlā.
Darbgrāmatas ceļš diskos ir precīzi parādīts, izmantojot VBA atkļūdošanas paziņojumu.
Atceramās lietas
- Galvenā atkļūdošanas .print problēma nav teksta ietīšanas iespēja garām virknēm tiešajā logā
- Tūlītējais logs ir jāpaceļ uz augšu, lai redzētu izeju lietotāja saskarnē
- Tūlītējā logā parādīto garo tekstu nav iespējams ietīt. Šajā situācijā rezultāts ir jāparāda diskā saglabātā failā.
