21. . :
- ;
- ;
- ;
- ;
- 2 ;
- (19902010);
- , , .
:
Excel ;
30:39 10 , , 8271-8280. 30-39 ;
D2 : . 4, 5, 7, 12, 15 : , , , , ;
D4 ;
, F5;
, . ;
. . . , H5 . 5. , ;
H5;
D5 : =($$30:$$39;$$5). . D5;
, G7:I10. ;
. . , K7. . ;
7;
D7 : =($$30:$$39;$K$7). D7;
, F12. ;
|
|
|
D12 , . ̻;
F13 ƻ, ;
F15:F16. ;
: 1990. : 1990. : 2010. : 1. D15, ;
;
C18:D18. . , . .
22. 2- : , , , , . .
23. B25, 25, D25, E25, F25 , D4, D5, D7, D12 D15. B25:F25:
25 : =$D$4
25 : =$D$5
D25 : =$D$7
25 : =$D$12
F25 : =$D$15
24. . :
;
( );
;
B25:F25;
;
3;
;
;
25. . 3:3, , , . .
26. , , . , . VisualBasic.
27. VisualBasic Sheets(" ").Select
:
Sheets("").Select
Range("A2").Select
If Cells(3, 1).Value <> "" Then
|
|
|
Cells(2, 1).Select
ActiveCell.End(xlDown).Cells(2).Select
Else
Range("A3").Select
End If
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
EndSub
28. , Excel. .
29. . , , .
30. .
31. (10-15 ).
32. , :
.
:
A1:G10 , D4, E4, 7, D7.
, A1:2. ;
. . . . 20. 6;
. . .
, , 20 ;
, , . , , Enter;
D4 :
=(;$ A $20;1)
. .
4 :
=(;$A$20;5);
7 , D7 .
. . /. .
32. lab6.xls m, Excel .
. , , . :
;
( , ), .
! , .
|
|
|
[1] , Microsoft Office .
