怎么把指纹机里面的考勤记录考下来
这个写一个VBA就能很容易解决，不知道你是不是熟悉VBA，如果不熟悉我就帮不上了。
（考勤机出来的数据，是前面人名，后面是打卡时间吧？中间是用空格分隔）
核心思路如下：
1、查找特定符号在此行中的位置，如空格、“，”、“。 ”号等。
2、获得位置后，提取此符号后面的所有文字。并显示到后一列。（这样人名和时间就成功分开了）
3、检测时间是否超过了指定时间，如果是，在时间的后一列写上“迟到“
早退同理
核心代码如下：
1、如在C1单元格中，输入=COUNTA(A:A) '判断A列有多少行数据
row=[c1]
for i = 1 to row
int_a= InStr(Workshee...全部
这个写一个VBA就能很容易解决，不知道你是不是熟悉VBA，如果不熟悉我就帮不上了。
（考勤机出来的数据，是前面人名，后面是打卡时间吧？中间是用空格分隔）
核心思路如下：
1、查找特定符号在此行中的位置，如空格、“，”、“。
”号等。
2、获得位置后，提取此符号后面的所有文字。并显示到后一列。（这样人名和时间就成功分开了）
3、检测时间是否超过了指定时间，如果是，在时间的后一列写上“迟到“
早退同理
核心代码如下：
1、如在C1单元格中，输入=COUNTA(A:A) '判断A列有多少行数据
row=[c1]
for i = 1 to row
int_a= InStr(Worksheets("表格名")。
Cells(i, 1) , " ") '获得A列单元格数据，并判断第一个空格所在的位置
变量A = Mid(Worksheets("表格名")。Cells(i, 1), Len(Worksheets("表格名")。
Cells(i, 1))) '从空格开始，截取到字符串末尾，存到变量A中
Worksheets("表格名")。Cells(i, 2)=变量A '把截取的打卡时间，放到B列中。
dim 变量B as date
变量B=2011/12/30 10:00
if Worksheets("表格名")。Cells(i, 2) > 变量B then '判断时间是否超过了指定时间
Worksheets("表格名")。
Cells(i, 3)="迟到"
end if
next i
你替换一下就能直接用了，绝对可以实现你想要的效果。收起
