飘云阁

 找回密码
 加入我们

QQ登录

只需一步,快速开始

查看: 2308|回复: 11

[求助] 一个VBA问题求老大帮忙(工作小小程序,别笑我小白)

[复制链接]
  • TA的每日心情
    开心
    2024-4-13 17:28
  • 签到天数: 47 天

    [LV.5]常住居民I

    发表于 2023-6-5 11:30:52 | 显示全部楼层 |阅读模式
    需求:用VBA 写出excel表格 sheet1中A列为ID,B列为定额名称 ,C列为材料电算号,F列为材料消耗量,G列为材料单价,H列为F*G合价,sheet2中  A列为材料电算号,
    B列为材料名称 ,C列为单位 ,人工费的材料电算号小于100010;其他材料的材料电算号大于100011并且小于20000;机械的材料电算号大于20001并且小于30000;在sheet1中依据相同的ID及材料电算号在sheet2中匹配到对应材料的材料名称、单位、单价,分别填入 sheet1中对应的D列、E列、G列,并计算所有F*G结果放在sheet1中H列,分别计算相同ID的人工费、材料费、机械费及三者总和放在H列。


    程序运行出错,代码‘424’---要求对象。小白一枚,不知杂解决。请老大帮忙!感谢


    本帖子中包含更多资源

    您需要 登录 才可以下载或查看,没有账号?加入我们

    x
    PYG19周年生日快乐!
  • TA的每日心情
    奋斗
    昨天 08:04
  • 签到天数: 1538 天

    [LV.Master]伴坛终老

    发表于 2023-6-5 18:32:39 | 显示全部楼层
    用录制宏试试呢
    PYG19周年生日快乐!
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    11 小时前
  • 签到天数: 903 天

    [LV.10]以坛为家III

    发表于 2023-6-6 09:25:10 | 显示全部楼层
    本帖最后由 lengbingling 于 2023-6-6 09:30 编辑

    不需要用VBA也可解决吧

    材料电算号材料名称单位材料消耗量材料单价
    10001
    人工费工日
    3
    2
    6
    20002
    木方立方
    6
    7
    42
    20003
    水泥立方
    7
    8
    56
    20004
    土方立方
    9
    9
    81
    20005
    材料1立方
    8
    10
    80
    20006
    材料2立方
    6
    11
    66
    30002
    火车台班
    5
    16
    80
    30003
    汽车台班
    9
    17
    153
    10001
    人工费工日
    6
    2
    12
    20005
    材料1立方
    3
    10
    30
    20006
    材料2立方
    4
    11
    44
    10002
    人工费工日
    5
    3
    15
    30003
    汽车台班
    9
    17
    153

    PYG19周年生日快乐!
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    11 小时前
  • 签到天数: 903 天

    [LV.10]以坛为家III

    发表于 2023-6-6 10:41:09 | 显示全部楼层
    分别计算相同ID的人工费、材料费、机械费及三者总和放在H列 这一句话没有明白.
    PYG19周年生日快乐!
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    擦汗
    9 小时前
  • 签到天数: 240 天

    [LV.8]以坛为家I

    发表于 2023-6-6 10:49:20 | 显示全部楼层
    在excel中用vlookup函数,这才是最简单的方法
    PYG19周年生日快乐!
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    11 小时前
  • 签到天数: 903 天

    [LV.10]以坛为家III

    发表于 2023-6-6 11:16:20 | 显示全部楼层
    本帖最后由 lengbingling 于 2023-6-6 11:30 编辑

    用vlookup ,sumifs函数

    ID
    定额名称
    材料电算号
    材料名称
    单位
    材料消耗量
    材料单价
    人工费
    材料费
    机械费
    总价
    100011
    10001110001
    10001
    人工费
    工日
    3
    2
    6
    1000111
    10001
    6
    564
    100011
    10001120002
    20002
    木方
    立方
    6
    7
    42
    1000112
    20002
    42
    100011
    10001120003
    20003
    水泥
    立方
    7
    8
    56
    1000112
    20003
    56
    100011
    10001120004
    20004
    土方
    立方
    9
    9
    81
    1000112
    20004
    81
    100011
    10001120005
    20005
    材料1
    立方
    8
    10
    80
    1000112
    20005
    80
    100011
    10001120006
    20006
    材料2
    立方
    6
    11
    66
    1000112
    20006
    66
    100011
    10001130002
    30002
    火车
    台班
    5
    16
    80
    1000113
    30002
    80
    100011
    10001130003
    30003
    汽车
    台班
    9
    17
    153
    1000113
    30003
    153
    100012
    10001210001
    10001
    人工费
    工日
    6
    2
    12
    1000121
    10001
    12
    86
    100012
    10001220005
    20005
    材料1
    立方
    3
    10
    30
    1000122
    20005
    30
    100012
    10001220006
    20006
    材料2
    立方
    4
    11
    44
    1000122
    20006
    44
    100013
    10001310002
    10002
    人工费
    工日
    5
    3
    15
    1000131
    10002
    15
    168
    100013
    10001330003
    30003
    汽车
    台班
    9
    17
    153
    1000133
    30003
    153
    不知道我理解的对不对

    点评

    他的大体要求估计就是这样的,但我感觉他要舍近求远非要VBA,所以我只提醒他用vlookup一样可以实现,而且简单  详情 回复 发表于 2023-6-6 11:35
    PYG19周年生日快乐!
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    擦汗
    9 小时前
  • 签到天数: 240 天

    [LV.8]以坛为家I

    发表于 2023-6-6 11:35:10 | 显示全部楼层
    lengbingling 发表于 2023-6-6 11:16
    用vlookup ,sumifs函数

    不知道我理解的对不对

    他的大体要求估计就是这样的,但我感觉他要舍近求远非要VBA,所以我只提醒他用vlookup一样可以实现,而且简单

    点评

    就你这样子的压根用不到VBA,如果真的需要VBA,我可以帮你写代码,也很简单  详情 回复 发表于 2023-6-9 15:33
    PYG19周年生日快乐!
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    昨天 17:52
  • 签到天数: 686 天

    [LV.9]以坛为家II

    发表于 2023-6-9 15:33:51 | 显示全部楼层
    lras 发表于 2023-6-6 11:35
    他的大体要求估计就是这样的,但我感觉他要舍近求远非要VBA,所以我只提醒他用vlookup一样可以实 ...

    就你这样子的压根用不到VBA,如果真的需要VBA,我可以帮你写代码,也很简单

    点评

    是的呢,就我这样子要什么用delphi或C++,你说的这种低级的东西我还真没兴趣  详情 回复 发表于 2023-6-10 08:02
    PYG19周年生日快乐!
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    开心
    昨天 17:52
  • 签到天数: 686 天

    [LV.9]以坛为家II

    发表于 2023-6-9 16:39:24 | 显示全部楼层



    请测试


    本帖子中包含更多资源

    您需要 登录 才可以下载或查看,没有账号?加入我们

    x
    PYG19周年生日快乐!
    回复 支持 反对

    使用道具 举报

  • TA的每日心情
    擦汗
    9 小时前
  • 签到天数: 240 天

    [LV.8]以坛为家I

    发表于 2023-6-10 08:02:54 | 显示全部楼层
    本帖最后由 lras 于 2023-6-10 08:04 编辑
    lizhipei78 发表于 2023-6-9 15:33
    就你这样子的压根用不到VBA,如果真的需要VBA,我可以帮你写代码,也很简单

    是的呢,就我这样子要什么用delphi或C++,你这种货喜欢用的东西我还真没兴趣

    点评

    你怎么骂人了,我说的这样子并不针对你,而是说楼主这个题目,这样子的 可能你误解了,我本意是回复楼主的,这个跟其它论坛不一样,回复你的帖子就变成了点评 你激动什么,我只是看到你用函数来回答了,顺便在你  详情 回复 发表于 2023-6-10 09:59
    PYG19周年生日快乐!
    回复 支持 反对

    使用道具 举报

    您需要登录后才可以回帖 登录 | 加入我们

    本版积分规则

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