Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

71895 / 76733

←次へ　｜　前へ→


	【9329】Re:こんな時は？（無駄コードが・・）

ichinose - 03/11/28(金) 20:49 -


	引用なし

	パスワード

>>'====================================================================
>Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'　 Dim m_rng As Range
'　 Dim crng As Range
'　 Set m_rng = Nothing　これ、削除して下さい
>　 Select Case mergechk(Target)
>　　 Case 0
>　　　 Target.Value = "単一セル選択"
>　　 Case 1
>　　　 Target.Cells(1, 1).Value = "複数セル選択"
>　　 Case 2
>　　　 Target.Cells(1, 1).Value = "結合セル選択"
>　　 End Select
>End Sub

3 hits

▼

【9321】結合セルのSelectionChangeイベント ぴかる 03/11/28(金) 16:53