记录某个单元格多次输入的文本到另一个单元格

tsingtaobaby · 发表于 2020-9-24 20:47

我在做一个项目记录, 每天会在同一个单元格A1输入一些最新的进展. 但时间长了之后, 内容就变得很多.
能否在这个单元格A1里, 每次输入之后, 点击某个确定按钮, 然后这些输入的内容就被自动汇总到另一个单元格B1.
这样就保证了A1只记录当天的更新, 但是B1可以把历史上所有的记录显示出来?

感谢.

比如, 连续三天在A1单元格输入如下信息:
9月1号: 项目启动
9月2号: 项目开发正在进行
9月3号: 项目结束

希望这些信息最终全都显示在B1单元格, 但A1单元格只显示最新输入的信息, 不会把所有信息都保留下来.

感谢

f8b1987 · 发表于 2020-9-24 21:42

VISUAL BASIC for applications

123-456789 · 发表于 2020-9-25 11:00

Excel 中有个叫“记录单”的功能，就能很好的完成你想要的结果！！

tsingtaobaby · 发表于 2021-4-23 12:54

123-456789 发表于 2020-9-25 11:00
Excel 中有个叫“记录单”的功能，就能很好的完成你想要的结果！！

这个记录单会把信息记录到不同单元格, 怎么样记录到一个单元格啊

tsingtaobaby · 发表于 2021-4-23 12:56

f8b1987 发表于 2020-9-24 21:42
VISUAL BASIC for applications

能帮我编个小程序搞定么? 可以付费. 谢谢

当家的MAX · 发表于 2021-4-23 13:58

仅仅只是这样吗

f8b1987 · 发表于 2021-4-26 08:31

tsingtaobaby 发表于 2021-4-23 12:56
能帮我编个小程序搞定么? 可以付费. 谢谢

怎么看着像我以前帮别人写的程序，不过他要求是做成图表

tsingtaobaby · 发表于 2021-4-29 09:10

本帖最后由 tsingtaobaby 于 2021-4-29 09:15 编辑

当家的MAX 发表于 2021-4-23 13:58
仅仅只是这样吗

主要功能实现了. 能把每天的内容, 都放到一个单元格么 (不要分行), 而且最新的记录放在单元格的开始? 这样可以保证每个事项(占一行), 都会在一行追踪. 感谢感谢

两蛋一瓜 · 发表于 2021-4-29 10:21

本帖最后由两蛋一瓜于 2021-4-29 10:31 编辑

大半年了，应该早解决了吧...
好巧，正好会这个代码，实现：

当家的MAX · 发表于 2021-5-6 21:50

tsingtaobaby 发表于 2021-4-29 09:10
主要功能实现了. 能把每天的内容, 都放到一个单元格么 (不要分行), 而且最新的记录放在单元格的开始? 这 ...

Sub test2()
If Range("c1") = "" Then
Range("c1") = Range("b1").Value
Else
If InStr(Range("c1").Value, Range("b1").Value) > 0 Then
Exit Sub
Else
Range("c1") = Range("b1").Value & Chr(10) & Range("c1").Value
End If
End If
End Sub

复制代码

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

[求助] 记录某个单元格多次输入的文本到另一个单元格