dポイントプレゼントキャンペーン実施中!

Selection.PasteSpecial で非表示行を飛ばして実行する方法はあるでしょうか。

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

  • コピー、ペースト付近のコードです。
    i2 = Range("Y2").End(xlDown).Row
    Range("Y3:Y" & i2).Select
    Selection.Copy
    Range("B3").Select
    Selection.PasteSpecial
    貼り付け時に非表示行にデータが入らないようにしたいです。
    よろしくお願いいたします。

      補足日時:2020/03/07 07:59
  • Qchan1962様のNo.9、No.10の通り試した結果正常に動作しました。
    私が使用するファイルはA列からO列にフィルタがかけられており、C列の空白欄を非表示にしてあります。
    同じ条件にして試したところ、図の結果になりました。

    「vba の Selection.Past」の補足画像2
      補足日時:2020/03/08 12:01

A 回答 (11件中11~11件)

こんにちは!


具体的な操作が判らないのですが、一例です。

 Dim c As Range
  For Each c In Selection.SpecialCells(xlCellTypeVisible)
   '//表示されているセルの操作//
  Next c

のような感じではどうでしょうか?m(_ _)m
    • good
    • 0
この回答へのお礼

回答ありがとうございました。
実行してみたところ、応答なしになってしまいました。

お礼日時:2020/03/06 14:49

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!