输入互惠度METRIC <---> IMPERIAL

Question

我正在创建一个电子表格，该表格可以进行从英寸到米的简单转换。
我希望能够输入一个值并将转换填充到其他单元格中。例如：

单元格B2和C2是英寸/米单元格。因此，如果我在单元格C2中输入一个值，那么B2将返回C2 * 39.37007874的值。
相反，如果我在B2中输入一个值，C2将返回一个B2 * 0.0254的值覆盖C2。

Answer 1

您可以尝试一下。放在相关工作表的代码中：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Not Intersect(Target, Range("B2")) Is Nothing Then
        Range("C2").Value = Range("B2").Value * 0.0254
    End If


    If Not Intersect(Target, Range("C2")) Is Nothing Then
         Range("B2").Value = Range("C2").Value * 39.37007874 
    End If

End Sub