>>677
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count = 1 Then Target.Value = "ここ"
End Sub
クリックした場所に入れるだけならSheet1モジュールにこれで済むけど、コルーチン処理が必要というなら分からん。
いずれにしてもActiveCellとかActiveSheetとかは避けて設計すべき。
Excel VBA 質問スレ Part51
■ このスレッドは過去ログ倉庫に格納されています
679デフォルトの名無しさん (ﾜｯﾁｮｲ cfb9-bqMz)
2017/12/23(土) 07:46:11.28ID:8SavP0Th0■ このスレッドは過去ログ倉庫に格納されています
