vba commands

scrx.value, Scry.valueEnd SubThis chapter reviews:1. All spaces have properties, methods, and events2. The format of the properties and methods of the access space are: space name, a dot number, properties and methods, provide parameters when needed3. When the program runs, the interaction between the user and the interface triggers events4. Show user forms with Show method5. Use the Initialize event to set values and add controls before the window is displayedThe 11th Chapter MicroStation obje

When you use Excel to write a VBA program, you use a ListBox, and then you examine all of its properties. In fact, this control function is very bad, too old, the most important thing is not support mouse wheel, very bad operation, but considering compatibility, or use it.In fact, reading, writing data with Listbox.list is enough, and BoundColumn and TextColumn is mainly used to read data, what kind of bird? I'm not sure, but I can use it like this. T

This article link: http://www.cnblogs.com/Charltsing/p/TripleDES.htmlAs we all know, the tripledes algorithm that Java uses by default is the Ecb+pkcs#5 fill method. The VB6 algorithm that can be found online is incompatible with this.Is there a simple way to achieve the common use between the two?As you know, C # is capable of implementing the TripleDES algorithm, so you can invoke the static class of. NET in VBA, VBS, and vb6.0 to implement an encry

BackgroundThe business needs to write all the corresponding pages according to the detailed design documentProblemHeavy workload, 11 large tables (dozens of hundreds of fields) time tight 3 days to completeCoreThere is a complete table design that can be edited manually through Excel.New issuesNormal field is not a problem, can increase the workload of the dictionary after a sudden increase, this particularity makes the work difficult and volume of the manual operation of Excel poses a challenge

The analysis of subway subsidence observation data using VBA programming processWhen you're tired of watching the day, you're back looking at hundreds of measurements and reporting. If it's a 35-page report, it's okay to say that if it's a 2000-point report, it will have about 70 pages of reports on a page of paper 30. As the force of the surveyors, but also more bitter force is no settlement data analysis software surveyors, but also more difficult t

The most by a friend set up a part-time operation of the company, but the need for some part-time staff pay, but due to a part-time wage between the 40~60, so the company adopted the principle is more than 200 to carry out, this rule is equivalent to drop the driver, the withdrawal needs more than 200, Then the problem came, in order to better let a large number of part-time staff can, clearly understand the time period in which they earn a lot of money, this time extended a problem, we need to

When you copy Sheet1 to Sheet3, you implement the following method:Worksheets ("Sheet1"). Copy after:=worksheets ("Sheet3") The syntax for using Worksheet.copy is as follows:An expression. Copy ( before, after)Before: inserting before a sheetAfter: inserting after a sheetNote: The above two parameters cannot be specified at the same time, and when none of the two parameters are specified, the sheet will be copied to a new workbook.Resources:Https://msdn.microsoft.com/zh-cn/

Range (Rows (3), rows (5)). Insert Shift:=xldown1) Insert a row at the current cell ; You can add a loop statement to insert multiple rowsRange ("A10"). SelectSelection.EntireRow.Insert, Copyorigin:=xlformatfromleftorabove2) Insert the same number of rows at the current selection row as the number of rows to select, and change the line number to insert in different places. Rows ("10:11"). Select Selection.insert Shift:=xldown, Copyorigin:=xlformatfromleftorabove3) Change range to Sheet1.c

Debugging VBA Programs: Setting breakpoints, stepping through, setting up a watch WindowThe Acces VBE programming environment provides a complete set of debugging tools and debugging methods. Master the use of these debugging tools and debugging methods, can quickly and accurately find the problem, and constantly modify, to improve.　　First, the "breakpoint" conceptA "breakpoint" is a point in a particular statement on a procedure that breaks the execu

Https://github.com/inshua/vba-interpreterHas covered almost all of the features of VB, but the library is not full.VB language itself is relatively backward, grammar also has a lot of improper design. The most serious is that both the function and the array are accessed through (), and the later extended item class members also use (), resulting in a clustered syntax ambiguity. But the form of return results taken by VB language 函数名=结果 is well suited

How to use VBA code to implement automatic daily backup of Excel documents To achieve this "tall yet" features existing Excel features cannot be completed, but also the method of VBA programming. Of course, as you do not understand the VBA code, just follow the steps below to copy and paste. Step 1th: Open the Excel file you want to back up, right-click on the

Fully understand the PageSetup object of page SetupWhen we write VBA code, especially when we do small program development, we often use VBA to setThe options in the page setup, you can also use VBA to achieve some special effects, which requires theUse the Pagesteup object. The PageSetup object contains properties for all page settings (left margin, bottom edgeP

Write the Excel VBA tool to connect and manipulate the MySQL database.System environment:Os:win7 64-bit English versionOffice 2010 32-bit English version1, VBA before the preparation of the connection to MySQLTools--->references. ----> ReferencesTick Microsoft ActiveX Data Objects 2.8 Librarys and Microsoft ActiveX Data Objects Recordset 2.8 Librarys2. Install MySQL ODBC connection serviceDownload Connectio

SUBNBSP;GENEQ () ifselection.startThis article is from the "GONE with the Wind" blog, please be sure to keep this source http://h2appy.blog.51cto.com/609721/1604040Considerations when you use VBA to automatically generate formulas in Word

,sheng,13831,shi,13658,shou,13611,shu,13601,shua,13406,shuai, 13404,shuan,13400,shuang,13398,shui,13395,shun,13391,shuo,13387,si,13383,song,13367,sou,13359,su,13356,suan, 13343,sui,13340,sun,13329,suo,13326,"Pinma= Pinma "Ta,13318,tai,13147,tan,13138,tang,13120,tao,13107,te,13096,teng,13095,ti,13091,tian,13076,tiao,13068,tie, 13063,ting,13060,tong,12888,tou,12875,tu,12871,tuan,12860,tui,12858,tun,12852,tuo,12849,"Pinma= Pinma "wa,12838,wai,12831,wan,12829,wang,12812,wei,12802,wen,12607,weng,1259

/blog_638f98570101fbqn.html-----If you believe that this article is helpful to your work or study, please support (comment, reprint or share) the author to give him the impetus to continue writing. If you have any questions, please contact [email protected] to communicate.-----Copyright notice: This article by @ I was just a little bird creation, licensed under the Creative Commons Attribution-NonCommercial use-no derivative of the 3.0 Chinese mainland license agreement. Unless noted, are origin

SUB constant () const PI = 3.1415926End SubSub variable () Dim A as Integera = 100a = 200End SubSub Applied () const PI = 3.1415926 ' constant A = 20 0 ' variable, without declaring Debug.Print pi * a VBA third lesson constants and variables

Iamlaosong folder inside the image file is saved with a single scan, the file name is the mail number, now want to collect these mail numbers, because the volume is very large, it is not possible to intercept a single, only through the program implementation, assuming that the current worksheet B is placed in the folder of these image files, The following program can be used to tell the message number of these image files: Sub findname () Dim FS, F, F1, FC, Mydir MaxRow = Sheets ("Mail Number").

problem number; m = Mt. FIRSTINDEX:N = Mt. Length45. The preferred drug for each type of leprosy is (E) Set orng = ActiveDocument.Range (m, m + N) ' orng for the dry + option; str = mt.submatches (0) ' Str is the answer to the problem; . Pattern = "([A-E]. )((?:(?! [A-E]. ).) +) "' Match ABCDE option; For each MH in. Execute (orng.text) m = mh. Firstindex:n = MH. Length SetRG = ActiveDocument.Range (Orng.start + M, Orng.start + M + N) ' RG for specific options;

Effect preview:Converted to a date format:Extract from ID date of birth:Example code:1. Convert to date formatMethod 1:Subzhuanhuadate () Dim I as Integer fori =2 toSheet1.range ("a65536"). End (Xlup). Row Sheet1.range ("b" i) =DateSerial( Left(Sheet1.range ("a" i),4),Mid(Sheet1.range ("a" i),5,2), Right(. Range ("a" i),2)) NextEnd SubMethod 2:SubZhuanhua ()DimI as Integer' Use the WITH statement to complete withSheet1 fori =2 to. Range ("a65536"). End (Xlup). Row. Range ("b" i) =DateSerial