2016-07-28 14 views
0

VBAには新しく、MatlabとPythonを使うのが普通です。私はコードの次のセクションを持っていますリンクされたセル参照で変数を使用するにはどうすればよいですか?

Sub Example 
    Dim num As Integer 

    num = 62 
    ActiveSheet.CheckBoxes.Add(23.25, 595.5, 101.25, 18.75).Select 

    With Selection 
     .Name = "NewCheckBox" 
     Sheets("IPT data").Select 
     .Caption = Cells(num, "C") 
    End With 

    Sheets("IPT Chart").Select 
    ActiveSheet.CheckBoxes("NewCheckBox").Select 

    With Selection 
     .Value = xlOff 
     .LinkedCell = "'IPT data'!$A$num" 
     .Display3DShading = False 
    End With 
End Sub 

私はリンクされたセルがAnumを参照するようにします。これを行う方法はありますか?後でnumがループで使用されるので、スタンドアロンで使用することはできません。

私が言うように、非常に新しいとこれはおそらく基本的なものです、私はapoligse。私は周りに検索し、無駄にセルと範囲の両方を使用しようとしました。

おかげ

+2

これは、Excelのオブジェクトモデルとは何の関係もありません。確かにPythonを使用している場合は、文字列の連結について知っていますか? '=" 'IPTデータ'!$ A $ '&num'。また、「Excel VBAマクロでの選択の使用を避ける方法」(http://stackoverflow.com/q/10714251/11683)を参照してください。 – GSerg

答えて

0

使用

.LinkedCell = "'IPT data'!$A$" & num 

しかし、あなたはすべてのその選択を回避し、書き込むことができます。

Option Explicit 
Sub Example2() 
    Dim num As Integer 

    num = 62 
    With Worksheets("IPT Chart") 
     With .CheckBoxes.Add(23.25, 595.5, 101.25, 18.75) 
      .Name = "NewCheckBox" 
      .Caption = Worksheets("IPT data").Cells(num, "C") 
      .Value = xlOff 
      .LinkedCell = "'IPT data'!$A$" & num 
      .Display3DShading = False 
     End With 
    End With 
End Sub 
+0

@ user6649163あなたはそれを通過しましたか? – user3598756

+0

@ user6649163:あなたを助けようとしている人々にフィードバックを与えるのはうれしいです – user3598756

+0

非常に役に立ちます。ありがとうございました – user6649163

関連する問題