Excelプログラミング。現在コピーされているセルを取得する

Question

現在、変更中のセルが証明基準を満たしているときに、いくつかのセルの値を変更する必要があるAddInを開発中です。私が持っている問題は、セルをコピーしてそれを複数回貼り付ける能力を失うことです。現在のコピーされたセルを取得しようとしているので、必要なセルの値を変更した後にコピーを再実行できます。

とにかくコピーされたセル/範囲を取得できますか？

Answer 1

私はこれに似たサブルーチン作成します。

Sub Foo(rngRange as Range, rngOutputRange as Range) 

    Dim varVariant as Variant 
    Dim lngCounter as Long 

    varVariant = rngRange 'Assuming rngRange is one column here 

    For lngCounter=lBound(varVariant,1) to uBound(varVariant,1) 
     If varVariant(lngCounter)=TRUE 'or whatever your criteria are 
      'Do whatever you need here 
     End If 
    Next lngCounter 

    rngOutPutRange=varVariant 

End Sub