«  »

Обзор средств для автоматизации геодезических вычислений (WinWord&Excel)



-







.

Microsoft Excel.
.




.


: ..

: 2-

..

-

1999 .





.

.



, . ,

- ,
, ,
, ..
,
, ,

. -
,
-
, ,
(
), .. , ,
, - ,
- .
, (
-
,
), -
, , ,
. , ,
.
,
, ,
. ,
, , ,
. ,
.
.
-
, , -, (

- - ,
!), , -,
- ,
. (, ,
,
.). ,
,
.

.


-
, , .
,
, .

- , ,
, ,
. , ,
,
.

-, ,
, ,
, PC, Spectrum-, Macintosh,
Commondore, Atari, , ( )

, , ,
. ,

,
( , ,
, ).
,
, . ,
,
, . ,

,
,
,
, ..
,
.
,
-
,
, ..
.

.
, .. ,
,
,
.
,
,
( ) - ,
,

. ,
,
- ,
, , , .

,

PC, .
, ,

-
(

,
Microsoft Windows ,
.
, ,
,
(
),
, .
,
, , ,
,
,
(), .
, ,
,
- ,
,
, .
-
, , ,
, ,
,
,
(, , ).

, , ,

,
.
,
- , , ,
,
,
. ,
, ,

- .






()
( )
.


, .
-

.

,

, ,
,

, . ,
,

.
.

,
,
. ,
,
,
,
. , , ,
,
,
.


,
,
,
. ,
,
. , ,
,
,
, .


,
,
, ,
.

,
. , .

,

.



.

.

.
. ,
,
.
, ,
,
. ,
. , Spectra Precision
IS (Integrated Surveying - )
GeoTool,

.
- , ,
,
,
,
.

.




.
-
.

( ), .

.

- .
.
.


( -)
. , ,
Caddy Ziegler (), - (),
(), Topocad SMT Datateknik () FieldWorks
Intergraph. ,

.


. ,
32- MS Windows 95 NT
.
Windows ,
,
, ,
..
. Windows
Topocad. FieldWorks
MicroStation,
Windows 95 NT.
Windows 1997 . Caddy
- Windows .


Topocad FieldWorks.

.

,
,
.


. .

.


,
.
.

,
.
.
,
. GPS-

,
.

.

.

, ,
. - ,

,
.
.

.


, , .
,
.., .
.

.

.

.
.

,
, ..
. ,

, , .

.




.

Topocad FieldWorks

SMT Datateknik, Intergraph,

Windows 3.1, 95, NT Windows 95, NT

MicroStation

, 12 16

, 15 35



TOP FLD

Geotronics, Leica, Psion, Sokkia*






5 ,








:



- , , ,
, , , ,

-

-

-

- ** 5

***

, , , ,










, Windows
, Windows

DXF, DWG DGN MicroStation
Intergraph, DXF DWG

, . Profile Volume
SiteWorks



* 3.0 1998.

**
, , ,
.

*** MicroStation,
( , ..).
.





, TopoCad
.
.

. FieldWorks -
.
.
.

MicroStation. , .

.

, ,
- ,
,
, ,
,
.

, ,
, , , ,
.
,
,
.

Microsoft Excel. .

,
Microsoft.
, ,
,
, ..
, ,
. Microsoft
,
, ,
, .

Microsoft Office,
Microsoft Windows,
Microsoft Excel. (, ,

, , -,
(, -
, -, ,
Microsoft -,
). , Microsoft Excel

.

,
Excel.

EXCEL . ,
- ,
- .
,
.
, EXCEL . 14-

.
, , ,VisiCalc,
. .

.
, ,
, .
Windows .
Windows
. , ,
,
Windows.

EXCEL.

Excel .
Windows,
Excel. Excel
( ), .
, - .
Windows,
-
, .
256 16384
. 1 16384,
. 26
, .. Excel,
Windows, .
.

Excel. . . ,

. .
.
.
. ,
,
. .
.
, , -
, .

.


: , .


.

.

Excel
, .
, .
.
. . ,
,
. ,
. .
- , -
. .
.
, :
, 13.
, .
,
.

#.###,## 13

0.000,00 0.013,00

#.##0,00 13,00

,
, . (
) , .
,
, "".
,
,
. Excel ,
, .. . ,
, , ,
.
, " ":
,
.

.

Excel ,
,
. ,
.
, , ,
Excel .
- . Excel
. F7.
,
.

.


, .
.





- 10 -

+ =A1+1

- =4-4

* =A3*X123

/ =D3/Q6

% =10%



: =(A1:C10)

; =(A1;A2;A6)



&

,
, , ,
- ,
.

.

,

.
,
. -,

.

.

Excel.


.
.
.
,
. :

=B1+B2+B3+C4+C5+D2

, ,
.
Excel,
,
,
. ,
.
:

=(B1:B3;C4:C5;D2)

, ,
. .
, , ,
, , , ,
.
1 4. :

=(1;2;3;4)

:

=(1:4)

.

,

. Excel. Excel
,
: , -, "" , -,
" ". ,
;
.
,
Excel. .
.
- -
.
- . :
, .
,
, .
,
.
, .
.

-.

,
.
, ,
. .

Excel
,
, , ,
, .
, ,
Excel, .
,
.
.

.

, Windows,
(Clipboard),
,
. , ,
Excel,
, Windows .

. .
, -
, Ctrl+C. Excel,

- : Shift+Insert
Ctrl+V.

Word Windows.

Word Windows .
Excel.
.
.

.

Excel .
, -
, . ,
Excel .

,
MS Excel,

, ,
,
.
,
, ,
, , ,
MS Excel, ,
,
.

,
.

,
,
, .
, ,
, -
.
MS Excel,
. ,
, ..
, ,
.
, ,
( ,
).

, 1,
, :

, ,
, ()
,
. , - Excel
,
. ,
, , ,
, , ,
, ,
. ,
( ) ,

,
. , , :

H4 =(G4)

I4 =((G4-H4)*60)
, 60, ..

J4 =((G4-H4-(I4/60))*3600;2)

, 60 3600
= , 2-
.

(
-
), H4
, G4 ( G4
. ,
H4:J11 ,
, , ,
G4,
, .. (
) (
Excel ), ..
, , ,
, G4
. , ,
,
, , , , ,
, .

:

S4 =(((B5-B4;2)+(C5-C4;2));2)

.

(B5-B4;2) , B5
B4 ( ), - .

.

.


, .

,
.

MS Excel
,
. , ( )
,
,

.

,
,
. -,
, .. , ,
.. , ,
,
, , ,
, , ,
, ,
, ,
,
.

, - Excel
,
, : , , . ,
( , , ,
360 ,
, !)
, , ,
, , :

=((D10:D12)+((E10:E12)/60;0)>=60;((D10:D12
)+((E10:E12)/60;0)>=120;(D10:D12)+((E10:
E12)/60;0)-120;(D10:D12)+((E10:E12)/60;0)-60);(D10
:D12)+((E10:E12)/60;0))


,
, .

, .

. Visual Basic.

,
, .
, ,
,
,
,
, .

MS Excel Visual Basic.

- Basic,
,
.

,
,
. , ,
,
,
---(
F8), , ,
, , , .. ,
,
, . ,

Sub MyInput()

With Workbooks("Book1").Worksheets("Sheet1").Cells(1, 1)

.Formula = "=SQRT(50)"

With .Font

.Name = "Arial"

.Bold = True

.Size = 8

End With

End With

End Sub

A1 ( 1,1
) Sheet1 Book1
=SQRT(50), .. 50 ,
Arial 8.

,
,
, -
, . ,
,
,
. ,
, , , ,
Visual Basic
, (
) ,
. ,

,
, ,,
,
, ,
,
.
,
, ,
, . ,
.

,
, ,
,
, .
.

.

.


, . ,
, ,
,
,

. ,
, ( , )
,
.
,
. ,
,
( -,
) . , ,
?

,

, ,
, .
,
, ,
,
. , , ,
.

,
( , ),
.

, ,
.
, , ,
,

, ,
.


, ,
, ,
.
,

, .
, - !

, , ,
.

.

.

, ,

, .

,
.
,
,

.


( )
,
- ,
, , .
TopoCad FieldWorks.

,
, ,
,
.

,
,
.
MS Excel,
-
Visual Basic,
Microsoft Office.


.

, ,
, ,
.

:

:

-- (GIS)

-- WWW -

-- -

( )

-- -. : ,
- -.

--"-" 3/1997.
ʻ, .. ,
-

- , , .. ,
-

:

-- , : ..
, .. , .., . , 1996.

PAGE \# "': '#'


?
?
?