Excel VBA 質問スレ Part51

[842 デフォルトの名無しさん (ﾜｯﾁｮｲ ef9d-/oj5) 2018/01/04(木) 16:20:08.23 ID:pGh8JphK0]

>>841
For i = 1 To 18
With Me.Controls("OP_" & CStr(i))
If .Value = True Then
TUR1 = .Caption
Exit For
End If
End With
Next