0

コードを実行すると、(変数を介して) 正しいセルを使用していると表示されますが、セルをアクティブにしたり、変数値をセルに入力したりしません。

myColumnNumber = 1
Range(myColumnNumber & currentRow1).Activate

Range(myColumnNumber & currentRow1) = FirstName & LastName

myColumnNumber = myColumnNumber + 1
Range(myColumnNumber & currentRow1) = AccNumber
myColumnNumber = myColumnNumber + 1
Range(myColumnNumber & currentRow1) = AccName

実行時に変数はすべて正しい値を表示しますが、シートは変更されません。たとえば、アクティブ シートに Range("a1").Activate を配置すると、そのセルがアクティブになるタイミングを確認できますが、変数は位置の変更に影響しません。

MyColumnNumner は "1" を追加し、現在の行は 2 のままですが、シートには変更がありません。このスニップにエラーが表示されますか、それともさらに情報が必要ですか? ご協力ありがとうございます。

4

3 に答える 3

0

Range(myColumnNumber & currentRow1) は、ワークブックの範囲を参照する必要があります。

Range を使用して参照する代わりに、範囲オブジェクトを追加してみてください。

dim rng as Range
set rng = Activeworksheet.Cells

myColumnNumber = 1 
rng (myColumnNumber & currentRow1).Activate
rng (myColumnNumber & currentRow1) = FirstName & LastName

myColumnNumber = myColumnNumber + 1
rng (myColumnNumber & currentRow1) = AccNumber
myColumnNumber = myColumnNumber + 1
rng (myColumnNumber & currentRow1) = AccName
于 2013-09-19T17:42:04.540 に答える