根据userform中的两个单元格值添加注释

时间:2017-06-20 08:11:30

标签: excel vba dropdown userform

我一直在研究用户形态,但我有一点问题。我想在两个不同的单元格中根据已经添加的值插入注释和测试结果。

  • (SKU)A列是:1-1000
  • (测试编号)列Q为:1-7

因此,根据用户在两个下拉列表中选择的内容(SKU和测试编号),代码必须在数据表中找到所选的sku和测试编号,然后将注释和测试结果放在AB和AA列中,在正确的SKU和测试编号的行中。

我有适用的代码,但将注释放在最后一个空行中:

  'Indsætter comments og test result
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("Data sheet")

'find first empty row in database
iRow = ws.Cells.Find(What:="*", SearchOrder:=xlRows, _
    SearchDirection:=xlPrevious, LookIn:=xlValues).Row + 1

ws.Cells(iRow, 27).Value = Me.ComboBox3.Value
ws.Cells(iRow, 28).Value = Me.Comments_To_Result.Value

提前致谢!

0 个答案:

没有答案