| |
またまた質問させていただきます。
あるシートのＣ列に日付が重複してあります。
それを重複を除去してコンボボックスに加えています。
が、『このキーは既にこのコレクションの要素に割り当てられています』という
エラーが出ます。
何が問題あるのか教えてください。エクセル2007です。
自分的にここがひっかかっているんではないかということをあげます。
1.Ｊ列にも同じような日付の縦列があります。
2.UserForm1とUserForm2があり、ほぼ同じマクロとなっています。
UserForm1はC列をコンボボックスに加えています。
UserForm2はJ列をコンボボックスに加えています。
UserForm1の中
Private Sub UserForm_Initialize()
With Worksheets("対戦表")
Set セル範囲 = .Range(.Range("C2"), .Range("C65536").End(xlUp))
End With
For Each 各セル In セル範囲
On Error Resume Next
リスト.Add 各セル.Value, CStr(各セル.Value)
If Err.Number = 0 Then
Cmb開催日.AddItem Format(各セル.Value, "m/d")
End If
On Error GoTo 0
Next
Cmb開催日.ListIndex = 0
Cmb開催日.ColumnWidths = Cmb開催日.Width - 3
End Sub
|
|
レッズ命
- 12/3/24(土) 22:33 -
