Question

我写了一个脚本来询问用户输入。我知道如何编写脚本以将其输入到一个单元格中或将其输入到行尾的每个空单元格中。我不知道的是如何编写它以便用户输入值在两个单独的纸张上的一个单元格中输入。有人可以帮我重写这段代码吗？

Sub AddText()
Dim myRange As String
myRange = Application.inputbox("Enter Item Number", "1")
Range("S1").Value = myRange
End Sub

Answer 1

Sheets("Sheet1").Range("S1").Value = myRange
Sheets("Sheet2").Range("S1").Value = myRange

Answer 2

使用与之关联的工作表对象限定范围（这也是最佳实践，无论您正在做什么）。我还更改了变量名称以使其更有意义，因为它具有有意义且清晰的变量名称的最佳实践（并且范围通常是指另外一个电子表格单元格，而不是字符串值。

Dictionary<string, string> langaugeOutputMap = new Dictionary<string, string>();
languageOutputMap.Put("Java", "Java9 is coming soon");

private string concatString(string: userChosenString) {
   if (languageOutputMap.containsKey(userChosenString) {
      return languageOutputMap.getValue(userChosenString);
   }
   return string.Empty()
}

如何使用输入框将数据输入到多个表

2 个答案: