将行中的粗体单元格值复制到同一行中的另一个单元格

Question

我有一些单元格中的行具有不同的值。

我想要做的是，当一个值变为粗体时，只需将该值复制到另一个单元格中。

如果这不可能也许以某种方式标记它，我想避免 ctrl + c / ctrl + v

你们有什么想法吗？

Answer 1

我创建了一个 ActiveX 按钮（http://www.excel-easy.com/vba/activex-controls.html) 使用以下代码：

Dim value As Double
Dim column As Integer
column = 3 - ActiveCell.column
value = ActiveCell.value
ActiveCell(1, column).value = value

您还可以使用“视图”选项卡中的“冻结窗格”将按钮固定

PS：我相信有更简单、更实用的方法来做到这一点。