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 : = ($A$30:$A$39;$H$5)
D25 : =($C$30:$C$39;$K$7)
25 : =$D$12
F25 : =$D$15
24. . :
;
( );
;
B25:F25;
;
3;
;
;
25. . 3:3, , , . .
26. , . , . Visual Basic.
27. Visual Basic 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
End Sub
28. , Excel. .
29. . , , .
30. .
31. (10-15 ).
32. , :
| _____________ _____ , () - - _____ ____________ .. 10 2016 . |
.
:
A1:G10 , D4, E4, 7, D7.
, A1:2. ;
. . . . 20. 6;
. . .
, , 20 ;
, , . , , Enter;
D4 :
=(;$A$20;1)
. .
4 :
=(;$A$20;5);
7 , D7 .
. . / , .
32. lab6.xlsm, Excel .
. , , . :
|
|
|
;
( , ), .
! , .
1. . . Microsoft Office 2010. . .: , , , 2011. 512 .
2. . ., . ., . . Microsoft Office 2010. . .: , 2011. 432 .
3. . Microsoft Office Excel 2010. . .: /, 2010. 416 .
4. . Microsoft Excel 2010. . .: /, 2011. 912 .
5. . - Excel. .: , 2012. 576 .
6. . Microsoft Excel 2010. .: , 2011.704 .
7. . Microsoft Office Excel 2010. .: /, 2011. 1094 .
8. ., . Microsoft Excel 2010. .: /, 2011. 464 .
[1] , Microsoft Office .
[2] , . Visual Basic (VBA).
