设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 3606|回复: 15
打印 上一主题 下一主题

请教大神数据分裂代码,解决代码下标越界的问题

[复制链接]

点击这里给我发消息

跳转到指定楼层
1#
发表于 2021-6-20 11:11:00 | 只看该作者 回帖奖励 |正序浏览 |阅读模式

我是一个新学者,对于Excel有点爱好,由于每天登记的发票太多,在Excel HOME论坛找的灵感和帮助下制作了一个发票报销登记表格,在分裂数据是出现下标越界。请教大神怎么处理?

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

16#
 楼主| 发表于 2021-6-29 08:26:50 | 只看该作者
已完善

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
回复

使用道具 举报

15#
发表于 2021-6-28 20:46:01 | 只看该作者
学习
回复

使用道具 举报

点击这里给我发消息

14#
 楼主| 发表于 2021-6-23 17:03:28 | 只看该作者
aslxt 发表于 2021-6-23 16:49
看看立即窗口显示的是什么?

12楼就是扫码后显示的窗口
13#
发表于 2021-6-23 16:49:26 | 只看该作者
看看立即窗口显示的是什么?

点击这里给我发消息

12#
 楼主| 发表于 2021-6-23 15:32:36 | 只看该作者
aslxt 发表于 2021-6-23 14:49
或者:
...
    If Me.扫描码.Text  "" Then

您说的代码添加上去之后仍然是提示下标越界

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
11#
发表于 2021-6-23 14:49:04 | 只看该作者
或者:
...
    If Me.扫描码.Text <> "" Then
        Debug.Print "|" & Me.扫描码.Text & "|"  '添加这一句,看看立即窗口显示的是什么
        rr = Split(Me.扫描码.Text, ",")
...
10#
发表于 2021-6-23 14:39:27 | 只看该作者
没有二维码扫描枪测试.也许是扫描枪输出设置,也许是有(例如不可见的)特殊符号.直接用nodepad新建txt文件,然后用扫描枪录入,再设置"显示所有字符"看看有没有毛病.

点击这里给我发消息

9#
 楼主| 发表于 2021-6-23 11:15:54 | 只看该作者
aslxt 发表于 2021-6-23 11:04
你到其他电脑测试一下,如果其他电脑正常,也许是你的电脑需要重新注册某些库.

我多台电脑测试之后都是这样,复制上面去的没有问题,但是用扫码抢就会出现问题,不知道怎么解决

点击这里给我发消息

8#
 楼主| 发表于 2021-6-23 11:06:17 | 只看该作者
aslxt 发表于 2021-6-23 11:03
我用你给的"01,10,041002000211,04749116,9901.00,20210608,67240737822138529800,E37D"直接粘贴在窗体的文 ...

复制粘贴上去的没有问题,但是扫码上去的就会出现问题
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-30 09:37 , Processed in 0.105869 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表