0

私はそれを取得していません、私はExcel 2003を使用しています、そして私はそれを取得していないので完全に混乱しています...誰か助けてもらえますか?アクティブなシートの列見出しの数でその名前付きの値を確認してから、一致するテキストを保持している列の左側に列を挿入する必要があります。私はビットが非常に難しいと確信しています-しかし、私はここで始めることさえできません...

4

1 に答える 1

1

名前付き値の列(名前付き範囲だと思います...)を取得するには、次を使用します。

ActiveWorkbook.Sheets("mySheet").Range("myRange").Column

したがって、次のようなことができます。

myNamedRange = ActiveWorkbook.Sheets("mySheet").Range("myNamedRange").Value
myCol = ActiveWorkbook.Sheets("myMainSheet").Rows("1:1").Find(myNamedRange).Column
ActiveWorkbook.Sheets("myMainSheet").Cells(1, myCol).EntireColumn.Insert
于 2009-11-23T16:30:48.190 に答える