控制测量的外业工作主要包括测量角度和边长，外业数据测量完成后，还要进行内业计算，看是不是满足要求。我们在绘制完导线平差表后，就要把测量的外业数据输入表格，这就要先制作一个函数，讲输入的角度转换为表格中固定的格式，以方便打印和查看。下面通过一个函数实现上述功能。工具/原料more电脑EXCEL方法/步骤1/5分步阅读

测量的外业数据如下表所示：

2/5

把外业观测到的角度输入表格中，这里设计了一个转换函数，比如外业观测的角度是98°45′48，为了输入时方便，在往EXCEL中录入时，直接输入98.4548，即代表98°45′48，通过函数转换到工作表中的格式为98 45 48，度分秒间加了两个空格。

3/5

编写程序：

Public Function dfm1(aaa As String)

Dim dd, ff, mm As String

Select Case Len(aaa)

Case Is = 6

dd = Left(aaa, 1)

ff = Mid(aaa, 3, 2)

mm = Right(aaa, 2)

Case Is = 7

dd = Left(aaa, 2)

ff = Mid(aaa, 4, 2)

mm = Right(aaa, 2)

Case Is = 8

dd = Left(aaa, 3)

ff = Mid(aaa, 5, 2)

mm = Right(aaa, 2)

End Select

dfm1 = dd ff mm

End Function

4/5

在EXCEL中试验程序，输入=dfm1(98.4548)。

5/5

结果如下：

注意事项

在命名函数时，不要和EXCEL已有的函数同名。