質問を簡略化します。
次のような処理(実処理は割愛)で、★なら正常終了しますが、☆の場合、
「RangeクラスのSelectメソッドが失敗しました」というエラーダイアログが出ます。
なぜでしょうか？
ちなみにマクロを記述するシートは、Sheet1としているのがNGなのでしょうか？あとはGeneralやWORKBOOKの選択なども気になっています。
Private Sub CommandButton1_Click()
For i = 9 To 100
Sheets(”Sheet1”).Select
If Cells(i, 10).Text <> ”” Then
Sheets(”Sheet1”).Select
Rows(i).Select
Sheets(”Sheet2”).Select’☆
’ Sheets(”Sheet1”).Select’★
Rows(i).Select
End If
Next
End Sub
No.1
385
1
40pt
URLはダミーです。
Sheets(”Sheet2”).Select後の
Rows(i).Select
を
ActiveSheet.Rows(i).Select
にしてみてください。
| 回答者 | 回答 | 受取 | ベストアンサー | 回答時間 | |
|---|---|---|---|---|---|
| 1 |  akibare |
157回 | 152回 | 5回 | 2005-11-29 22:29:40 |
333
323
3
1
2
解決しました。
助かりました。ありがとうございます。