2016-04-25 10 views
-1

コードを書きましたが、今ではExcelのテンプレートが変更されています(最初の列はもはや必要ではありません)、エントリコード1列を修正の左瞬間に移動する方法がありますそれはステップバイステップですか?例えばコードを左に1行移動する

(これは古いコードである):

.Range( "H1:I1")

.Range("I1:J1") = Array("CHECK", "KEY") 

今、私はそれを変更する必要があります=配列( "、 "CHECK" KEY ")

しかし、それは非常に長いコードであり、それに簡単な方法があるかどうかを知りたいのです。

ありがとうございました。

答えて

2

私は単に組み込みの検索&置換機能(Ctrl + f)を使用することをお勧めします。フィールドとフィールド "置換後の文字列" に

.Range("H1:I1")

"何検索" へ

.Range("I1:J1")

のようなものを入れてください。
本当に怠けている場合は、[すべて置換]ボタンを押すことができますが、これは変更したくない部品を変更する場合など、危険です。ただし、Replaceボタンを使用してすべてのエントリを処理すると、長いコードであってもかなり高速になります。この方法では、実際に変更するのが正しいかどうかを各エントリで確認できます。

+0

これは本当に良いです、私はそれのことさえしませんでした。 –

+0

ありがとう、私は数式のために何ができますか? ( "B2:B"&lr).FormulaR1C1 = "= VLOOKUP(RC1、 'CSI Plan ww'!C10)のように、' .Range( "A2:A"&lr) :C14、2、0) " .Range(" C2:C "&lr).FormulaR1C1 =" = VLOOKUP(RC1、 'CSI計画ww'!C10:C14,3,0)」 .Range( "D2 ( "E2:E"&lr).FormulaR1C1 = "= VLOOKUP(RC1(C 1、C 2、C 4) 、 'CSI Plan ww'!C10:C14,5,0)」「 –

+0

あなたは少し創造的で、あなたの検索を変更し、それに応じて基準を置き換える必要があります。 RC1を「Find What」に置き、RC2を「Replace With」などに置きます。あなたが取り組むべき多くの異なるケースがあるなら、それは少し仕事を取るかもしれません。 – Icebear

関連する問題