在Excel中进行审计抽样，可以采用以下方法：

方法一：使用RAND函数

生成随机数

打开Excel，选择需要抽样的数据范围。

在任意单元格中输入公式 `=RAND（）`，Excel会自动生成一个0到1之间的随机小数。

如果需要生成指定范围内的随机数，可以使用公式 `=RAND（b-a）+a`，其中a是范围的最小值，b是范围的最大值。

四舍五入

如果需要将随机数四舍五入到整数，可以使用 `ROUND` 函数。例如，将随机数四舍五入到最接近的整数，可以使用公式 `=ROUND（RAND（）,0）`。

抽样数量

根据需要抽取的样本数量，可以多次使用上述公式，或者使用其他工具如“数据分析”工具中的“随机抽样”功能。

方法二：使用数据分析工具

打开数据分析工具

点击Excel顶部的“工具”菜单，选择“数据分析”。

在弹出的“数据分析”对话框中，选择“抽样”选项。

设置参数

在“输入区域”框中，输入包含总体单位编号的单元格区域。

如果数据有标志项（如行标题或列标题），选中“标志”复选框。

在“抽样方法”中选择“随机”模式。

指定“输出区域”，然后点击“确定”。

获取抽样结果

数据分析工具会自动在指定的输出区域中显示抽样结果。

方法三：使用VBA宏

如果需要更复杂的抽样逻辑或自动化抽样过程，可以使用Excel的VBA（Visual Basic for Applications）编写宏。

打开VBA编辑器

按 `Alt + F11` 打开VBA编辑器。

在“项目”窗口中，右键点击工作表，选择“插入” -> “模块”。

编写抽样宏

在新模块中，编写VBA代码来实现所需的抽样逻辑。例如，以下代码可以随机选择指定数量的样本：

```vba

Sub RandomSample（）

Dim ws As Worksheet

Dim rng As Range

Dim sampleSize As Integer

Dim i As Integer

Dim randomCell As Range

' 设置工作表和抽样数量

Set ws = ThisWorkbook.Sheets（"Sheet1"）

sampleSize = 10 ' 需要抽取的样本数量

' 获取数据范围

Set rng = ws.Range（"A1:A" & ws.Cells（ws.Rows.Count, "A"）.End（xlUp）.Row）

' 随机选择样本

For i = 1 To sampleSize

Set randomCell = rng.Cells（Rnd（） * rng.Cells.Count + 1, 1）

' 可以在这里添加代码将选中的样本复制到其他位置或进行其他处理

Next i

End Sub

```

运行宏

按 `F5` 运行宏，或者在VBA编辑器中点击“运行”按钮。

通过以上方法，可以在Excel中有效地进行审计抽样。选择哪种方法取决于具体的需求和数据的复杂性。