エクセルでこんなことはできないでしょうか？

エクセルでこんなことはできないでしょうか？
いつもこの機能があればもっと使いやすいのにと思っています。

1.罫線固定
罫線を記入してから、それを固定することはできないでしょうか？
データは入れたいので、本当に罫線だけの固定を望んでいます。
保護などしても罫線だけというのはできないようです。

2.数値しか入力できないようにする設定
ここのセルは数値しかいれない！というセルがよくあると思うのですが、
そのセルにいったときに、毎回IMEがかな入力から英数字に切り替わって
くれれば、いちいち切換キーを押さなくていいのになーと思います。
もしくはIME切換はできなくても、強制的に例えば「ぬ」のキーを押せば
1が入力されるという設定は何かないでしょうか。
セルを数値にしてもうまくいかないようです。

以上、よろしくお願い致します。

No.8 ベストアンサー 回答者： table_1969 回答日時： 2003/03/05 18:11

それでは再び^^

1.先ず、そのファイルを開く。
2.「ツール」－「マクロ」－「Visual Basic Editor」を開く。
3.そのウィンドウの左の方にある「ThisWorkbook」をダブルクリック。
4.それで開いたウィンドウに下記をコピペ。
　　Sub Macro1()
　　　Selection.PasteSpecial Paste:=xlPasteAllExceptBorders
　　End Sub
5.Visual Basic Editorを閉じる。
6.「ツール」－「マクロ」－「マクロ」を開く。
7.マクロ名の所にThisWorkbook.Macro1があるのを確認し、「オプション」をクリック。
8.ショートカットの「Ctrl+」の後ろにｖを入力しOKボタンを押す。
9.マクロのウィンドウを閉じる。
以上でCtrl+c,vでコピペ出来るはずです^^

この回答へのお礼

ご親切にありがとうございました。
やっと念願のコピペが実現できました！
とりあえずポイントは発行させていただきたいと思います。

ヘルプをみたところ
Ctrl + 文字キー (小文字の場合) または Ctrl + Shift + 文字キー
で登録できるのですね。
ちなみに、右クリックのコピー⇒右クリックの貼り付けでは無理そうですね。 後は、ctrl+c等をフリーソフトで他のキーに割り当てるとかが有効みたいなかんじですね。
ありがとうございました。<m(__)m>

お礼日時：2003/03/06 00:58

No.9 回答者： 0shiete 回答日時： 2003/03/06 17:37

お礼の書き込み有難うございます。

>ちなみに、他の方々のプログラムとどのように違うのでしょうか？

私が他の方のプログラムを使って、
Excel上でCtrl+C=>他のセルを選択=>マクロを起動
とやってみたのですが、エラーがでて止まりました。
（この操作の順番ではダメなのでしょうか、ちょっとわかりません）

おそらく、Ctrl+Cで保持された情報がマクロの中に落ちていない
のが原因だろうと考え、マクロの中で「コピー元」「コピー先」
の情報を取得するようにしました。

ちなみに、「コピー先」は、「コピー元」と同じ範囲を
選択しなくても、左上となる一つのセルを選択しても動きますね。
（ためしてみて、わかったのですが(^^)

この回答へのお礼

ありがとうございます。
今後マクロ等勉強していくうえでもぜひ参考にさせていただきたいと思います。

お礼日時：2003/03/08 19:01

No.7 回答者： 0shiete 回答日時： 2003/03/05 16:28

以下の方を参考に、改良しました。

Visual Basic Editorのモジュールに貼り付けて
お使いください。


Sub kopi()

Set myRange1 = Application.InputBox(prompt:="コピー元の範囲", Type:=8)
Set myRange2 = Application.InputBox(prompt:="コピー先の範囲", Type:=8)

myRange1.Copy
myRange2.Select

Selection.PasteSpecial Paste:=xlPasteAllExceptBorders, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

End Sub

この回答へのお礼

ありがとうございます。
ちなみに、他の方々のプログラムとどのように違うのでしょうか？
もしよろしければ教えてください。

お礼日時：2003/03/06 00:59

No.6 回答者： table_1969 回答日時： 2003/03/02 09:59

スイマセン、ちょっと訂正(^^ゞ

Selection.PasteSpecial Paste:=xlPasteAllExceptBorders
　　　　　　　　　　　　　↑スペース入れてください。

この回答への補足

ありがとうございます。
こちらも試してみましたが、やはりマクロの登録等、うまくできませんでした(TT)
ありがとうございました。

補足日時：2003/03/05 01:56

No.5 回答者： table_1969 回答日時： 2003/03/02 09:56

罫線の固定は無理っぽいので、マクロをショートカットに登録してしまうってのはどうでしょうか？

Sub Macro1()
　Selection.PasteSpecialPaste:=xlPasteAllExceptBorders
End Sub

これで形式を選択してコピーの罫線以外と同じことが出来ます。
そしてこれををCtrl+ｖに登録してしまえば、Ctrl+ｃ,ｖでペースト出来ますよ^^

No.4 回答者： Hageoyadi 回答日時： 2003/03/02 09:27

#1のはげです。

1.について、そういうことでしたか。誤解してたようです。マクロで可能ですね。
『罫線がコピーされなければいい』ということでしたら、罫線は書式に情報がありますから、書式を貼り付けなければよいということになり、『ツール→マクロ記録→新しいマクロを記録』の後、セルをコピーしたあと『編集→形式を選択して貼り付け→「数式」にチェックオンしてOK』という操作で記録された、下の記述を応用して使えると思います。
（アクティブセルが A1 のときにコピー。A2 にカーソルを持っていって『形式を選択して貼り付け』という作業をコピーしました。）

Sub Record1()
Selection.Copy
Range("A2").Select
Selection.PasteSpecial Paste:=xlFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End Sub

しかし、例えば、上の例でセル A2 にはいろいろな書式が設定されていて、
『フォントの大きさや色や表示形式、配置なども含めてコピーしたい。でも、罫線だけは元のセル B1 のものを活かしたい。』ということでしたら、
もっと複雑な記述になるでしょう。

この回答への補足

ありがとうございます。
おっしゃる順番で試してみましたが、うまくできませんでした。
操作終了後、記録終了をすればいいのでしょうか？
その後ステップインで、確かに上のような命令がでましたが、
その後がわかりませんでした・・。
マクロもなぜかその後は選べませんでした。
マクロを勉強してからの方がよいかもしれませんね・・・。
ありがとうございました。

補足日時：2003/03/05 01:49

No.3 回答者： 0shiete 回答日時： 2003/03/02 00:42

１についてですが、

どういう状況でそのようなことが必要になるのでしょうか？
罫線をわざわざ消す操作を行うユーザーがいるのですか？
もっと具体的な説明をされれば、別の解決法が見つかるかも
知れません。

補足お願い致します。

この回答への補足

補足します。
例えば、列によりばらばらな線種な表があるします。
その表で、列違いのコピーペーストをした場合、線種が変わって
しまいます。

今は、いちいち右クリックして、形式を指定して貼り付けを選び、
罫線以外を選択しています。
こうした、補助作業をすることなく、CTR+C,Vでペーストできたら
非常に助かります。
それには、罫線の固定があればベストでした。

これが私の使用している表にあって、使い勝手が悪く、改善できた
らずっといいなーと思っていた次第です。

質問2については、改善されて非常に助かりました。

よろしくお願いします。

補足日時：2003/03/02 00:54

No.2 回答者： tbobi 回答日時： 2003/03/02 00:36

2.数値しか入力できないようにする設定　についてだけ回答します。

入力規則を使えばＯＫです。
入力規則を適用したいセルを選択後、
メニューバーの　データ　＞　入力規則をクリック。
日本語入力を自動的にＯＦＦにしたいだけなら、
日本語入力タブ　の日本語入力を　オフ　にすればよいでしょう。

そうすれば、該当セルにカーソルを移動すると自動的に日本語入力がオフになると思います。数字のみの入力等も「入力規則」のところで、設定可能です。

この回答へのお礼

ありがとうございました。助かりました。

お礼日時：2003/03/02 01:06

No.1 回答者： Hageoyadi 回答日時： 2003/03/02 00:32

1.できないようですね（自信なし）。

2.データ→入力規則→「日本語入力」タブから設定可能です。

参考URL：http://www.sharp.co.jp/mebius/excel/excel27b.html

この回答へのお礼

ありがとうございました。お蔭様で作業効率が上がります。
参考URLも勉強になりますね。

お礼日時：2003/03/02 01:05