.
Copy, Cut, Paste, Delete
Copy Cut, , , Paste .
Delete
InsertAfter, InsertBefore
, InsertAfter InsertBefore . , Insert. . , InsertBreak , , InsertCells ..
TypeBackspace
, , Backspace .
TypeParagraph
Enter .
TypeText
. Text. , . , .
WholeStory
. , .
Selection
Bookmarks
Bookmarks, , . (Characters), (Tables) . , Document.
End Start
, , (End) (Start) .
Font
. .
' Selection.Font.Bold = wdToggle ' Selection.Font.Italic = wdToggle ' Selection.Font.Underline = wdUnderlineSingle ' Arial Narrow Selection.Font.Name = "Arial Narrow" ' - 14 Selection.Font.Size = 14 ' - - ' wdColorR Selection.Font.Color = wdColorRedInformation
. wdInformation, , .
Range Selection Range
Range, .
Dim obj_Range As Range Set obj_Range = Selection.RangeText
|
|
, , .
1. Selection?
2. Text- ө ?
3. Selection?
4. Selection?
5. Fotn- ?
Text | ә | |
Font | қ | |
properties | қ | |
An object | ||
Method | ә | |
An object | ||
Treatment | өң |
1 Internet
- www
- http
- tcp/ip
- ru
2. MyMinor =Operation Management. mid(MyMinor,7,3) :
- ion
- eration
- Operati
- MyMinor
3. MyMovie =Mrs Park. Len(MyMovie) :
- 8
- die hard 4,0
- 14
- 10
4. Select Case EndSelect :
- Indeterminate loop
5. My_Text=I like KAU! (loop)
For i=Len(My_Text) To 1 Step-1 :
- 11
- 6
- 7
- 10
6. () VBA?
- Immediate window
- Module window
- Project window
7. Internet
- tcp/ip
- http
- ftp
- mailto
8. X :
- Double
- String
- Long
- Variant
, (3-4 )
.
1. . . , ., , 2008.
2 Internet : http://www.intuit.ru/studies/courses/3735/977/info
3 21-22 VBA . | 4-, 3 5,7 2018-2019 . |
16-01-Formula.xlsm - . 16.1.
, MS Excel . , VBA . VBA, , , , , . , : =(A1: A 10) A1 A 10. , ( 16.1.)
Range("B1").Formula = "=sum(A1:A10)"16.1.
, - Application.WorksheetFunction - ( 250), VBA. , Fact . ( 16.2.)
Dim num_F As Integer num_F = InputBox(" ") MsgBox (" " & num_F & " " & _ WorksheetFunction.Fact(num_F))16.2. MS Excel VBA
|
|
Range - . , , VBA, , .