Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 1792|回复: 3

如何时实现自动等于合并行

[复制链接]
发表于 2020-1-2 12:56 | 显示全部楼层 |阅读模式
本帖最后由 linsong1119 于 2020-1-11 12:35 编辑

办里目录选择(维修)项目A行等于另一表(项目明细)表内容。但是项目明细表出合并行时,办理目录表A行无法等自动等于项目明细表的合并单元表格,就是出现-,如何时实现自动等于合并行。
办理项目.png
项目明细.png

模版.rar

43.53 KB, 下载次数: 2

excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2020-1-2 22:54 | 显示全部楼层
A9 陣列公式:
=IF(
COUNTA(A$8:A8)<=COUNTIF(项目明细!C$2:C$45,B$2),
LOOKUP(
MATCH(B$2,项目明细!C:C,)+ROW(A1)-1,
IF((项目明细!C$2:C$45=B$2)*(项目明细!B$2:B$45<>""),ROW($2:$45)),
项目明细!B$2:B$45),
"")

※陣列公式,請記得按Ctrl+Shift+Enter

B9 公式: =IF(A9="","",INDEX(项目明细!D:D,MATCH(B$2,项目明细!C:C,)+ROW(A1)-1,))
C9 公式: =IF(A9="","",INDEX(项目明细!E:E,MATCH(B$2,项目明细!C:C,)+ROW(A1)-1,))

※如果有解決您的問題,再請將帖子設為[已解決]

祝順心,南無阿彌陀佛!



log.png

模版.rar

45.04 KB, 下载次数: 2

回复

使用道具 举报

 楼主| 发表于 2020-1-3 12:43 | 显示全部楼层
cutecpu 发表于 2020-1-2 22:54
A9 陣列公式:
=IF(
COUNTA(A$8:A8)

老大可以根据(项目明细)表中列是合并的,想在(办理目录)表(A列项目)也自己动生成合并行,能做到?
085[9W_NCD7V3}I)$UNO~3M.png
回复

使用道具 举报

发表于 2020-1-7 11:44 | 显示全部楼层
Sub test4()
    Dim rng, A, r, i
    Application.DisplayAlerts = False
    Set rng = Range("a1:a" & Range("a65536").End(xlUp).Row)
    With rng.Resize(, 6)
    MsgBox .Address
        .Value = .Value
    End With


    'Range("a:a").Sort key1:=[A1], order1:=xlAscending, Header:=xlYes
    A = rng: r = UBound(A)
    For i = r To 9 Step -1
        If A(i, 1) <> A(i - 1, 1) And r > i Then Range(Cells(i, 1), Cells(r, 1)).Merge: r = i - 1
    Next
    Range("a8").CurrentRegion.Borders.LineStyle = 1
End Sub

模版2.rar (50.32 KB, 下载次数: 5)

评分

参与人数 1学分 +2 收起 理由
linsong1119 + 2 学习

查看全部评分

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-3-29 23:35 , Processed in 0.564897 second(s), 12 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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