excel如何提取单个单元格中一串数字中的某一位（几位），使之显示在指定新单元格中

假设数据存放于sheet1从A1开始的A列，从控件工具箱添加一个命令按钮，其代码如下 Dim i As Integer, j As Integer, k As Integer, s As String, m As String, f As String i = 1 Do While Sheet1.Cells(i, 1).Value "" s = Sheet1.Cells(i, 1).Value f = Left(s, 1) k = 2 For j = 2 To Len(