将值从一张纸推送到另一张?

时间:2015-05-15 23:42:57

标签: excel excel-vba excel-formula excel-2013 vba

我有一个“主表”,我想要查看某些键值,但我还想通过按下按钮通过更新字段向“数据表”添加更多/新数据。我想要更新的单元格是动态的,但我在单元格S4中有单元格地址。

示例:

如果我想要“Tyrion Lannister”的新评论,我想:

  1. 在“名称”字段(D3)中写下全名,这会在“数据表”中为我提供行
  2. 通过数据验证列表(Q4)选择我想要更新的字段,为我提供“数据表”中的列。
  3. 在单元格P5中键入新注释
  4. 点击更新按钮
  5. 如果可能,我还要确认所有更新,以免出错。
  6. 解决 使用此代码:

    def show
      @page = Page.find_by(id: params[:id])
      @next = Page.where("id > ?", params[:id]).order(:id).first 
    end
    

1 个答案:

答案 0 :(得分:0)

解决 使用此代码:

Sub Test1()

x = Range("rad")
y = Range("kolumn")
Z = Range("update")

Sheets("Data").Cells(x, y) = Z

End Sub