2016-04-13 5 views
0

私はコンボボックスから左に最初の番号を取得し、最初の番号に関する値に異なる値を追加します。私は下に行ったが、それは私にエラーを与える。vbaコンボボックスのユーザーフォーム値で左操作を行う方法は?

set sh2 = worksheets("sheet2").Listobjects("result") 
MP= Int(Left(CB1.Value)) 
If MP = 2 Then 
    temp = worksheets("sheet1").cells(10,5) 
    sh.Range(2,2).Formula= "=temp+ D2" 
else 
... 
+1

'MP = INT(左(CB1.Value、1))' –

答えて

1

物事のカップル:

  1. 左2つの基準を持っています。

  2. それは引用符

だから、外にでなければならない文字列に変数を使用して:

set sh2 = worksheets("sheet2").Listobjects("result") 
MP = Int(Left(CB1.Value,1)) 
If MP = 2 Then 
    temp = worksheets("sheet1").cells(10,5) 
    sh.Range(2,2).Formula= "=" & temp & " + D2" 
else 
+0

感謝キャッチ@omegastripes –

+1

の最初のポイントを超えて行くにはあまりにも怠惰だった:D –

+0

私はこれらの引用と混乱しているので、私はvlookup Dを追加するのではなく、このようにすることができます:sh.Range(2 、2).Formula = "="&temp& "+ vlookup(....)"? – amy

関連する問題