如何在Excel按钮存储数据，点击时写入对应单元格？

当然可以实现！你完全不用依赖输入框，直接把数据存在按钮控件本身的属性里，点击时直接读取这个属性写入对应单元格就行，下面给你具体的实现步骤：

方法一：利用ActiveX按钮的Tag属性（推荐） #

Tag属性是ActiveX控件自带的「自定义存储区」，专门用来存放开发者的额外数据，不会影响按钮的外观和正常功能，非常适合你的需求：

1. 打开Excel的「开发工具」选项卡（如果没显示，需要在Excel选项里勾选开启），点击「插入」，选择「命令按钮(ActiveX控件)」，在工作表上画出按钮。
2. 右键点击这个按钮，选择「属性」，在弹出的属性窗口里找到Tag项，输入你要存储的文本（比如test1），然后关闭属性窗口。
3. 双击按钮进入VBA编辑器，把默认代码替换成下面的内容：

Sub CommandButton1_Click()
    ' 读取按钮自身Tag属性中存储的数据
    Dim storedText As String
    storedText = Me.CommandButton1.Tag
    
    ' 写入指定单元格，这里的目标位置可按需修改
    ' 比如要写入B列的下一行空白单元格，可替换成：
    ' Dim targetRow As Long
    ' targetRow = Cells(Rows.Count, 2).End(xlUp).Row + 1
    Cells(2, 2).Value = storedText ' 示例：写入第2行第2列（B2单元格）
End Sub

4. 回到Excel，点击「开发工具」里的「设计模式」退出设计状态，现在点击按钮就能直接把存储的文本写入目标单元格了！

额外技巧：动态修改按钮存储的数据 #

如果之后需要更新按钮里存储的内容，不用手动改属性，也可以用VBA代码批量修改：

Sub UpdateButtonStoredData()
    ' 把按钮的Tag属性改成新内容
    Me.CommandButton1.Tag = "更新后的文本内容"
End Sub

这样就完全满足你“按钮存储数据，点击直接写入单元格”的需求啦！

内容的提问来源于stack exchange，提问作者RKP