Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]录入


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

主题：[求助]录入
帅哥哟，离线，有人找我吗？
ntqhj
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：438 积分：2664 威望：0 精华：0 注册：2018/1/15 13:54:00 		  发帖心情 Post By：2022/5/30 16:36:00 [显示全部帖子]

决定不使用副本。我之前的描述应该没把问题讲清楚，不过“玩呢？”这2个字在我看来还是有点扎眼的。

 回到顶部
帅哥哟，离线，有人找我吗？
ntqhj
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：438 积分：2664 威望：0 精华：0 注册：2018/1/15 13:54:00 		  发帖心情 Post By：2022/6/3 19:33:00 [显示全部帖子]

老师好！窗口导入提示出错"从字符串“”到类型“Date”的转换无效。"。导入的代码在我的其它表窗口可正常使用，这个表导入就出错，请帮看下该如何解决呢。Excel文件是从我的另外应用平台导出的文件。
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:导入.zip
 回到顶部
帅哥哟，离线，有人找我吗？
ntqhj
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：438 积分：2664 威望：0 精华：0 注册：2018/1/15 13:54:00 		  发帖心情 Post By：2022/6/9 13:41:00 [显示全部帖子]

老师好！导入时想加个判断条件，当待导入的Excel文件的列名与foxtable的字段不一致时，中断执行导入，并加提示，该如何写代码？因为我下载的待导入的文件列名是不符合foxtable字段格式的，有时会忘记修改Excel列标题

 回到顶部
帅哥哟，离线，有人找我吗？
ntqhj
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：438 积分：2664 威望：0 精华：0 注册：2018/1/15 13:54:00 		  发帖心情 Post By：2022/6/9 15:14:00 [显示全部帖子]

结合24楼的代码，26楼的代码应该插入在24楼哪条代码后面，我调试的结果都不成功呢

 回到顶部
帅哥哟，离线，有人找我吗？
ntqhj
 小大  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：438 积分：2664 威望：0 精华：0 注册：2018/1/15 13:54:00 		  发帖心情 Post By：2022/6/9 17:03:00 [显示全部帖子]

又要麻烦老师了，老师的代码测试是通过的。我的Excel文件格式在包里，它的列名上还有一个合并单元格的标题描述，如何只对该描述判断？
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:导入1.zip
 回到顶部
帅哥哟，离线，有人找我吗？
ntqhj
 小大  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：438 积分：2664 威望：0 精华：0 注册：2018/1/15 13:54:00 		  发帖心情 Post By：2022/6/9 17:53:00 [显示全部帖子]

抱歉，文件选错了
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:导入2.zip
 回到顶部
帅哥哟，离线，有人找我吗？
ntqhj
 小大  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：438 积分：2664 威望：0 精华：0 注册：2018/1/15 13:54:00 		  发帖心情 Post By：2022/6/9 22:45:00 [显示全部帖子]

老师提供的从第三行开始是方法，但不太适合我用，因我待导入的Excel文件数据中，有其它不被foxtable认可的字符，无法直接从第三行开始导入呢，要通过Excel宏先期处理，有时操作人，不运行宏文件，直接点导入按钮，此时就会出错。所以，还是希望通过判断已合并单元格的首行着手。即希望：若首行=中石油电子卡加油列表，就终止执行代码，并提示。否则就完成导入。幸苦老师了！

 回到顶部
帅哥哟，离线，有人找我吗？
ntqhj
 小大  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：438 积分：2664 威望：0 精华：0 注册：2018/1/15 13:54:00 		  发帖心情 Post By：2022/7/1 14:46:00 [显示全部帖子]

老师好！以下代码可以完成功能，感觉怪怪的，有空帮我完善下呗。
Select Case e.DataCol.Name
    Case "fa piao号码", "是否开piao", "开piao日期"
        If e.DataRow.IsNull("fa piao号码") Then          
            e.DataRow("是否开piao") = “不开piao”
            e.DataRow("开piao日期") = Nothing
        Else If e.DataRow("fa piao号码") = "0" Then 
        e.DataRow("是否开piao") = “不开piao”
        e.DataRow("开piao日期") = Nothing
        Else
            e.DataRow("是否开piao") = "开piao"
            e.DataRow("开piao日期") = Format(Date.Today, "yyyy-MM-dd")            
        End If 
End Select

字段都是中文，发完帖子有的字变成拼音了，至少在我的电脑看上是，预览正常的
[此贴子已经被作者于2022/7/1 14:48:56编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
ntqhj
 小大  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：438 积分：2664 威望：0 精华：0 注册：2018/1/15 13:54:00 		  发帖心情 Post By：2022/7/1 14:54:00 [显示全部帖子]

感觉if 及 else if 这2行代码应该可以合并到一条，就是不会合并

 回到顶部
帅哥哟，离线，有人找我吗？
ntqhj
 小大  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：438 积分：2664 威望：0 精华：0 注册：2018/1/15 13:54:00 		  发帖心情 Post By：2022/7/1 15:18:00 [显示全部帖子]

日期不可以修改呢，帮我看下呢
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:自动开piao或不开piao.zip
 回到顶部
总数 25 上一页 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 9 次数据查询