Excel VBA質問箱 IV

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

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


10222 / 13646 ツリー ←次へ | 前へ→

【22960】セルに関する疑問です 小池知博 05/3/8(火) 22:30 質問[未読]
【22963】Re:セルに関する疑問です IROC 05/3/9(水) 1:57 回答[未読]
【23045】Re:セルに関する疑問です 小池知博 05/3/10(木) 18:54 お礼[未読]
【23048】Re:セルに関する疑問です IROC 05/3/10(木) 20:00 回答[未読]
【23050】Re:セルに関する疑問です 小池知博 05/3/11(金) 10:46 お礼[未読]

【22960】セルに関する疑問です
質問  小池知博 E-MAIL  - 05/3/8(火) 22:30 -

引用なし
パスワード
   今晩はお世話になります どうしても調べがつきません教えて下さい
セル毎に入力形態(英数・漢字・カタカナ)の指定をしたいのですが分かりません
そして任意に決めた最終列から改行して列の最初にカーソルを飛ばしたいのですがその
方法も分かりません 宜しくお願いします

【22963】Re:セルに関する疑問です
回答  IROC  - 05/3/9(水) 1:57 -

引用なし
パスワード
   >セル毎に入力形態(英数・漢字・カタカナ)の指定をしたいのですが分かりません
入力規則を使ってはどうでしょう?


「最終列から改行して列の最初」というのがよく分かりませんが、
列ごとの最下行から、次の列の最上行という意味でしょうか?
Worksheet_SelectionChangeのイベントで処理できませんか?

【23045】Re:セルに関する疑問です
お礼  小池知博 E-MAIL  - 05/3/10(木) 18:54 -

引用なし
パスワード
   ▼IROC さん:
>>セル毎に入力形態(英数・漢字・カタカナ)の指定をしたいのですが分かりません
>入力規則を使ってはどうでしょう?
>
>
>「最終列から改行して列の最初」というのがよく分かりませんが、
>列ごとの最下行から、次の列の最上行という意味でしょうか?
>Worksheet_SelectionChangeのイベントで処理できませんか?

IROCさん 入力規則で解決出来ました 有難う御座います
 もう一つの方ですがワードなどで行の任意の箇所でEnterを押すと改行し行頭に
 カーソルが移動しますがそれをEXCELで実行したいのですが 如何なもんでしょう?
 宜しくお願いします

 

【23048】Re:セルに関する疑問です
回答  IROC  - 05/3/10(木) 20:00 -

引用なし
パスワード
   これでどうでしょうか?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Row >= 11 Then Cells(1, Target.Column + 1).Select
End Sub

【23050】Re:セルに関する疑問です
お礼  小池知博 E-MAIL  - 05/3/11(金) 10:46 -

引用なし
パスワード
   ▼IROC さん:
>これでどうでしょうか?
>
>Private Sub Worksheet_SelectionChange(ByVal Target As Range)
>  If Target.Row >= 11 Then Cells(1, Target.Column + 1).Select
>End Sub

有難う御座いました 知識不足で残念ながら思い通りになりませんでした
 もう少し自分なりにも研究してみます今後とも宜しくです

10222 / 13646 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free