Foxtable(狐表)用户栏目专家坐堂 → excel单元格中输入值多个值,每个值用alt+enter换了行,如何取出它的每个值?


  共有2571人关注过本帖树形打印复制链接

主题:excel单元格中输入值多个值,每个值用alt+enter换了行,如何取出它的每个值?

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/8 8:52:00 [显示全部帖子]


For Each s As String In p.Replace(vbcr,"").Split(vblf)
    'Output.Show(s)
    ' Dim s As String = "08:20"
    Dim s1 As Date
    If Date.TryParse(s, s1) Then
        If s1 < # 08:30 #  Then
            output.show("正常上班")
        Else
            output.show("迟到")
        End If
    Else
        output.show("字符无法转换为日期")
    End If
Next

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/9 10:55:00 [显示全部帖子]

我测试你的代码和你的问题,没发现问题。请上传具体excel文件测试。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/10 9:11:00 [显示全部帖子]

1、报什么错?

 

2、你的列【考勤时间】是什么数据类型的?


 回到顶部