[[20070402142230]]　『数式のみ削除』（こも）　ページの最後に飛ぶ

『数式のみ削除』（こも）

検索してはみたのですが、うまくひっかからなかったので、教えて下さいm(__)m

あるデータに数式で参照した値(数値や文字)があるのですが、値はそのままで数式だけ削除と言うのは出来るのでしょうか？

Windows2000 Excel2003

 コピー→形式を選択して貼付→「値」にチェック

 (Ohagi)

 数式セルを一発で選択する方法です。

 編集→ジャンプ→「セル選択」クリック→「数式」にチェック→ＯＫ
 あとは、選択されている状態で「削除」を行います。
 セルの中身を消すならDeleteキーで消えます。
 (MARBIN)

 私のは早とちりのような・・・。
 (MARBIN)

素早い解答ありがとうございます！

MARBINさんの削除とはその値自体消してしまう削除でしょうか？

数式のみで数式で表示された文字は残したいんです…

やはりOhagiさんの言うように一度コピーしないとイケナイのですかね？

(こも)

 セル範囲を選択してコピーするのが面倒なら、VBA化してみてはいかがでしょう？
 以前、値で貼り付けるのを自動化したい、というような質問があったような。
 一応探してみます。
 (MARBIN)

VBAですか？

VBAは初心者なので…すみませんがよろしくお願いします。

自分でも勉強してみます。

(こも)

 一応、↓でいけるようです。
 もっとスマートな方法があるような気がします・・・。

 Dim myad As String
  myad = ActiveCell.Address
  With ActiveSheet.UsedRange
  .Copy
  .PasteSpecial Paste:=xlValues
  End With
  ActiveSheet.Range(myad).Select
  Application.CutCopyMode = False

　↓では、日付がおかしくなりました。

 With ActiveSheet.UsedRange
 .Value = .Value
 End With
 (MARBIN)

あ、ありがとうございます！！

なりました！

が、もしこれを範囲選択した中でってことはできますか？
例えばA1:C10まで…

(こも)

 UsedRange
 を
 Selection
 に変えてみてください。
 (MARBIN)

 訂正です。
 ActiveSheet.UsedRange
 を
 Selection
 に変えてみてください。
 (MARBIN)

出来ました！！ありがとうございましたm(__)m

(こも)

コメント返信：

[ 一覧(最新更新順) ]

[[20070402142230]] 『数式のみ削除』（こも） ページの最後に飛ぶ

[[20070402142230]]　『数式のみ削除』（こも）　ページの最後に飛ぶ