提取多个表格带3个数字的公式怎么写？

最初的梦想168 · 发表于 2024-8-9 11:50

老师您好：
问题如图？看似麻烦，百度找不到具体公式，所以求助。。。。谢谢！！

求助2024.rar (11.87 KB, 下载次数: 12)

高个子 · 发表于 2024-8-9 12:02

=FILTER(A1:A18,(LEN(CLEAN(TRIM(A1:A18)))=3)*ISNUMBER(--A1:A18))

复制代码

gadxjyang · 发表于 2024-8-9 12:06

=FILTER(A1:A18,LEN(SUBSTITUTE(A1:A18," ",""))=3)

hxj119 · 发表于 2024-8-9 12:06

=FILTER(A1:A18,LEN(SUBSTITUTE(A1:A18," ",))=3)

最初的梦想168 · 发表于 2024-8-9 12:12

谢谢！！
但是点击复制提取后的数据有什么办法没？？

最初的梦想168 · 发表于 2024-8-9 12:25

谢谢你们，复制的问题自己解决了。谢谢[合十][合十]

最初的梦想168 · 发表于 2024-8-9 13:42

复制指定行的VBA：送给有需要的朋友！！这也是这个论坛的精神所在！！！

Sub Macro1()

'

' Macro1 Macro

' 宏由 6549841 录制，时间: 2024/03/21

Range("r60:r150").Select

Selection.Copy

Range("E9").Select

Dim AckTime As Integer, InfoBox As Object
Set InfoBox = CreateObject("WScript.Shell")
'Set the message box to close after 1 seconds
AckTime = 1
Select Case InfoBox.Popup("恭喜你！！复制成功！！).", _
AckTime, "祝你好运！！！！", 0)
Case 1, -1
Exit Sub
End Select
End Sub

leepoison · 发表于 2024-8-9 17:28

=FILTER(A1:A18,LEN(SUBSTITUTE(A1:A18," ",""))=3)

wgreen · 发表于 2024-8-9 17:42

=TOCOL(IF(LEN(SUBSTITUTE(A1:A18," ",""))=3,A1:A18,0/0),3)

ww87725244 · 发表于 2024-8-10 10:04

=TOCOL(REGEXEXTRACT(A1:A18,"\d{3}",1),3)

		自动登录	找回密码
密码			免费注册

[已解决] 提取多个表格带3个数字的公式怎么写？