No.3ベストアンサー
- 回答日時:
こういうことですか?
例えば、
D2~D30まで値が入力されていたら
E2の式をE30までコピーしたい
D2~D99まで値が入力されていたら
E2の式をE99までコピーしたい
なら、次のようにします。
●シートactiveがアクティブになってない場合
即ち他のシートがアクティブな状態で実行する場合は
With Sheets("active")
.Range("E2").Copy .Range("E2", .Cells(Rows.Count, "D").End(xlUp).Offset(0, 1))
End With
●シートactiveがアクティブな状態で実行する場合は
Range("E2").Copy Range("E2", Cells(Rows.Count, "D").End(xlUp).Offset(0, 1))
シート名がactiveなんて説明がしにくいなぁ。。。(^^;;;
それから、
>E2に
>IFERROR(VLOOKUP($D2,AAA!F:H,3,FALSE),"")
>という関数があります。
これ実際の式をコピペしたものではないですよ。
式の態をなしてないので。
以上です。
No.2
- 回答日時:
再度の登場、myRangeです。
>「Rangeメソッドは失敗しました:'_Global'オブジェクト」
これは、D2に値が入っていないからです。
D2に値が入っているか確認してください。
------------------------------------------------
D2に値が入っているにも拘わらず、エラーがでるというのであれば
下記のことを補足願います。
最初の質問
>E2に関数の結果が入っています。(D2に検索値、範囲は別シート)
>E2をD2にデータが入っている行まで下にコピーするようなマクロ
この「範囲は別シート」の文言で、当方は、
E2とD2は別シートにある、と受け取りました。
ところが、補足では、
>D2、E2は"active"という名前のシートにあります
とのこと。
これでは、最初の質問の「範囲は別シート」は意味不明です。
式をどのシートのどのセルにコピーするのか分かりません。
そから辺りをシート名、セル番地など具体的に提示してくさい。
以上です。
この回答への補足
わかりづらくてすみませんでした。
D2,E2はシート"active"にあります。
E2に
IFERROR(VLOOKUP($D2,AAA!F:H,3,FALSE),"")
という関数があります。
VLOOKUPの検索範囲でシート"AAA"をみています。
どうか宜しくお願い致します。
No.1
- 回答日時:
セルD2は、Sheet2として。
(1)式も書式もコピーする場合
Range("E2").Copy Range("E3:E" & Sheets("Sheet2").Range("D2").Value)
(2)式のみコピーする場合
Range("E3:E" & Sheets("Sheet2").Range("D2").Value) = Range("E2").Formula
但し、上記は式のあるシートがアクティブの場合です。
他のシートアクティブなときに実行するのであれば
Range("E3:~)、Range("E2")の前にシート名付けてやるか
Sheets("Sheet1").Range("E3~
最初に、式のあるシートをアクティブにしてやります。
Sheets("Sheet1").Select
以上です。
この回答への補足
myRangeさんありがとうございます。
早速(1)の方法で実行してみました。
D2、E2は"active"という名前のシートにあります。
Sub copy()
'
' copy Macro
'
'
Range("E2").copy Range("E3:E" & Sheets("active").Range("D2").Value)
End Sub
しかし、
「Rangeメソッドは失敗しました:'_Global'オブジェクト」
と表示されてしまいます。
シート名を変えただけなのですが。。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) マクロだと数式が表示される 2 2022/09/10 14:48
- Visual Basic(VBA) 顧客ごとに違う点検案内を作成するマクロ 4 2022/09/16 05:34
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2023/02/26 13:19
- Excel(エクセル) 表示形式、文字列セル(列)に数式を入力するには マクロ 1 2022/09/18 10:53
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/25 11:55
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 12:30
- Excel(エクセル) ExcelのVBAコードについて教えてください。 1 2022/06/20 09:22
- Excel(エクセル) エクセルのマクロについて教えてください。 3 2023/02/07 14:47
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/03 11:27
- Visual Basic(VBA) Excelのマクロについて教えてください。 1 2023/03/12 12:16
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
別のシートから値を取得するとき
-
Excel マクロについての相談
-
別のシートを参照して計算する方法
-
エクセルのマクロについて教え...
-
ブック名、シート名を他のモジ...
-
VBA 最終行まで数式をコピーする
-
【ExcelVBA】全シートのセルの...
-
特定の文字を含むシートだけマ...
-
エクセルのマクロについて教え...
-
VBA 入力月で該当シートを選択...
-
一括印刷マクロ シート名を数字...
-
【ExcelVBA】動的にボタン、ボ...
-
VBA 存在しないシートを選...
-
同じ作業を複数のシートに実行...
-
ListViewの画面の更新
-
実行時エラー1004「Select メソ...
-
シートが保護されている状態で...
-
エクセルで通し番号を入れてチ...
-
【VBA】指定した検索条件に一致...
-
ユーザーフォームに入力したデ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
別のシートから値を取得するとき
-
ユーザーフォームに入力したデ...
-
【ExcelVBA】全シートのセルの...
-
同じ作業を複数のシートに実行...
-
Excelマクロのエラーを解決した...
-
excelのマクロで該当処理できな...
-
XL:BeforeDoubleClickが動かない
-
ExcelVBA シート名を複数セルか...
-
実行時エラー'1004': WorkSheet...
-
VBA 存在しないシートを選...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
ブック名、シート名を他のモジ...
-
【Excel VBA】Worksheets().Act...
-
ExcelのVBAのマクロで他のシー...
-
エクセルのシート名変更で重複...
-
特定の文字を含むシートだけマ...
-
シートが保護されている状態で...
-
Excel マクロについての相談
-
VBA 検索して一致したセル...
おすすめ情報