Excel ﾌｨﾙﾀｰで抽出した状態でﾏｸﾛを実行

ﾌｨﾙﾀｰで抽出した状態で下記ﾏｸﾛ(数式を値に変える)を実行すると､
一部の行で見当違いな値に変わってしまいます｡
何度か試行しましたが法則がつかめませんでした…

Sub 値に変える()
With Selection
.Value = .Value
End With
End Sub

なぜ抽出した行で上記ﾏｸﾛを実行すると一部の行で見当違いな値に変わって
しまうのでしょうか｡また､抽出した行で実行しても正しく値に変えるために
は､どのようなﾏｸﾛを登録すればよいでしょうか｡

詳しい方 何卒よろしくお願い申し上げます｡

質問者からの補足コメント

• 〉くんこば 様
  
  小職が行った操作について補足させていただきます｡
  
  何卒 よろしくお願い申し上げます｡

    補足日時：2021/11/03 17:48

No.2 ベストアンサー 回答者： fujillin 回答日時： 2021/11/03 17:04

こんにちは

手操作で、まとめてコピペ（あるいは値をペースト）しようとしてもできないのと同様の理由ですね。
（連続していない範囲のコピペはできない仕様）

＞抽出した行で実行しても正しく値に変えるために
＞は､どのようなﾏｸﾛを登録すればよいでしょうか｡
一セルずつ処理するか、area毎に分割して行うかですね。

area毎に処理する方が若干は速いはずですが、選択できる程度のセル範囲なら、ほぼ差はでないでしょうから、以下は一セルずつの例です。
For Each c In Selection.SpecialCells(xlCellTypeVisible)
　c.Value = c.Value
Next c

この回答へのお礼

ご教示いただいた構文に差し替えて正しく実行できるようになりました｡
連続していない範囲に対してのｺﾏﾝﾄﾞにはいろいろと制限があるのですね｡
本当に勉強になります｡
誠にありがとうございます｡

お礼日時：2021/11/03 18:17

No.1 回答者： くんこば 回答日時： 2021/11/03 16:50

それマクロの問題？

数式の問題でなくて？

何にしても情報が少なすぎる。

この回答へのお礼

補足させていただくべく新たに資料作成し補足ｺﾒﾝﾄを利用してｱｯﾌﾟﾛｰﾄﾞしようとしましたが不具合によりできませんでした｡
ｺﾒﾝﾄいただき､誠にありがとうございます｡

お礼日時：2021/11/03 18:19