吾爱破解 - LCG - LSG |安卓破解|病毒分析|www.52pojie.cn

 找回密码
 注册[Register]

QQ登录

只需一步,快速开始

查看: 155|回复: 7
收起左侧

[资源求助] excel函数求助-向上查找第一个非空值

[复制链接]
STURay11 发表于 2024-4-30 11:52
25吾爱币


A列 效果
100 100
100
100
200  200
  200
  200
300 300
300
400 400
400
400
500 500
500
500
500
600 600
600
600
700700

如B列所示,如何在excel利用函数来实现向上查找非空值

最佳答案

查看完整内容

C2 单元格输入 =IF(A2="",C1,A2)。向下填充就行了。 参考文件 https://wormhole.app/kQDbb#VguE-ZjxjaeqHkz4ooYWQg

发帖前要善用论坛搜索功能,那里可能会有你要找的答案或者已经有人发布过相同内容了,请勿重复发帖。

次谐波 发表于 2024-4-30 11:52
C2 单元格输入 =IF(A2="",C1,A2)。向下填充就行了。

参考文件
https://wormhole.app/kQDbb#VguE-ZjxjaeqHkz4ooYWQg
JackLei 发表于 2024-4-30 11:54
 楼主| STURay11 发表于 2024-4-30 11:55
JackLei 发表于 2024-4-30 11:59
本帖最后由 JackLei 于 2024-4-30 12:00 编辑

VBA可以不,你直接选择你要编辑的那一段,然后运行就行
[Visual Basic] 纯文本查看 复制代码
Sub 空白单元格填充其上方非空值()
    Dim r As Range, tmp
    Dim cols, rows
    Dim i, j
    
    If Selection.Cells.Count <= 1 Then
        MsgBox "请选中一块区域!"
        Exit Sub
    End If
    
    If Selection.Areas.Count > 1 Then Exit Sub
    rows = Selection.Cells.rows.Count
    cols = Selection.Cells.Columns.Count
    
    For j = 1 To cols
        tmp = ""
            For i = 1 To rows
            Set r = Selection.Cells(i, j)
            If r.Value = "" Then
                r = tmp
            Else
                tmp = r
            End If
        Next i
    Next j
End Sub
greatpeng 发表于 2024-4-30 12:00
=IF(ISBLANK(A2),LOOKUP(2,1/(A$1:A1<>""),A$1:A1),A2)
A列是数据,B列是公式填充
greatpeng 发表于 2024-4-30 12:07
https://www.123pan.com/s/gFLA-6tV53.html提取码:id3G  看下是这个效果不?
finillusion 发表于 2024-4-30 13:16
你好
你想要的是不是这样
https://jingyan.baidu.com/article/76a7e4093485a4bd3b6e15ee.html
可以参照这个操作
您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则 警告:本版块禁止灌水或回复与主题无关内容,违者重罚!

快速回复 收藏帖子 返回列表 搜索

RSS订阅|小黑屋|处罚记录|联系我们|吾爱破解 - LCG - LSG ( 京ICP备16042023号 | 京公网安备 11010502030087号 )

GMT+8, 2024-5-18 00:29

Powered by Discuz!

Copyright © 2001-2020, Tencent Cloud.

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