Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

70178 / 76732

←次へ　｜　前へ→


	【11065】Re:なぜでしょう(>_<")

Kein - 04/2/26(木) 0:26 -


	引用なし

	パスワード

>A1のセルの値が入力されてる部分までを
A列の最終入力行まで、という意味でしょうか ?
例えば相対参照で数式を入れていくとするなら

Sub Test_MyFomula()
　 If Range("B2").HasFormula = False Then Exit Sub
　 Range("A2", Range("A65536").End(xlUp)) _
　 .Offset(, 1).Formula = Range("B2").Formula
End Sub

てなコードで出来ると思います。A2 に 1 を入力し、A10 までフィルコピー、
B2 に =SUM($B$2:B2) という数式を入れて、上のマクロを実行してみて下さい。
・・そーいうことではないのかな ?

1 hits

▼

【11011】なぜでしょう(>_<") 初心者 04/2/24(火) 1:56