Excel VBA質問箱 IV

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

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


22862 / 76732 ←次へ | 前へ→

【59245】Re:フィルタをかけたシートのコピーで、連番列の値が#VALUE!
発言  ON  - 08/12/3(水) 16:01 -

引用なし
パスワード
   追記です


>できなければ
>元シートをいったん値コピーしてから実行したいと思います

ですが

  Sheets("moto").Select
  Sheets("moto").Copy Before:=Sheets(3)
  ActiveSheet.Name = "tmp_moto"
  ActiveSheet.Calculate  'これを入れないと数式部が#VALUE!になる

  Cells.Select
  Selection.Copy
  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
  Application.CutCopyMode = False

上記のように
ActiveSheet.Calculate  'これを入れないと
次の値コピーで連番が #VALUE! になってしまいました


'test03 SpecialCells Copy → Past
時では
ActiveSheet.Calculate
入れるところがないと思われ無理な気がしてきました


ちなみに
Sheets("moto")は
?ActiveSheet.EnableCalculation
True
となっていました


何かありましたらよろしくお願いいたします
0 hits

【59244】フィルタをかけたシートのコピーで、連番列の値が#VALUE! ON 08/12/3(水) 14:45 質問
【59245】Re:フィルタをかけたシートのコピーで、連... ON 08/12/3(水) 16:01 発言

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