2016-07-28 3 views
0

Sehr neu in VBA, verwenden Sie in der Regel Matlab und Python. Ich habe den folgenden CodeabschnittWie verwendet man eine Variable in einer verknüpften Zellreferenz?

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 

Ich möchte, dass die verknüpfte Zelle auf Anum verweist. Gibt es eine Möglichkeit, dies zu tun? Spätere num wird in einer Schleife verwendet, so dass ich es nicht allein verwenden kann.

Wie ich schon sagte, sehr neu und das ist wahrscheinlich grundlegende Sachen, also ich apoligse. Ich hatte eine Suche in der Nähe und habe versucht, sowohl Cells als auch Range zu missbrauchen.

Dank

+2

Das hat nichts mit Excel-Objektmodell zu tun. Sicher, wenn Sie Python verwenden, wissen Sie über String-Verkettung? '=" 'IPT-Daten'! $ A $ "& num'. Siehe auch [Wie vermeidet man die Verwendung von Select in Excel VBA-Makros] (http://stackoverflow.com/q/10714251/11683). – GSerg

Antwort

0

Verwendung

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

aber Sie können diese alle Auswahl vermeiden und schreiben:

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 hast du es geschafft? – user3598756

+0

@ user6649163: Es wäre nett von Ihnen, Menschen, die versuchen, Ihnen zu helfen, Feedback zu geben – user3598756

+0

Sehr hilfreich, tut genau das, was ich brauche. Vielen Dank – user6649163

Verwandte Themen