advanced help
per page, with , order by , clip by
Results of 1 - 1 of about 159 for (素人) (0.000 sec.)
[[20140410174416]]
#score: 10177
@digest: fcdfcc68c2c78e70a0d8e0c016734a4f
@id: 64919
@mdate: 2014-04-11T02:53:49Z
@size: 1540
@type: text/plain
#keywords: 行12 (5728), 可避 (4759), 行25 (4449), 行15 (3461), 件判 (1392), (素 (1171), 決致 (1139), formular1c1 (1090), 素人 (1004), 列1 (861), autofill (847), 列c (845), 己解 (835), 拝借 (722), 列b (681), 規定 (661), トフ (578), 自己 (537), オー (494), destination (488), 人) (485), でオ (468), 。if (427), 文を (417), 記コ (411), 回避 (396), フィ (347), 不可 (338), 加す (331), ィル (330), 知恵 (318), で対 (303)
『最終行までオートフィル』(素人) オートフィルでお知恵を拝借できればと思っております。 A列からB列にデータが入っており、C列に数式を入力したいと考えています。 たとえば A列 B列 C列 1行 12 24 2行 25 13 3行 15 63 というファイルのC1セルに=A1+B1という計算式を入れてC3セルまでオートフィルで埋めようとして下記コードで対応しています。 Selection.AutoFill Destination:=Range("C1:C" & Cells(Rows.Count, "A").End(xlUp).Row) しかし、下記のようにデータが1行しかない場合、 A列 B列 C列 1行 12 24 上記のコードでエラーが出てしまいます。 これを回避する方法はあるでしょうか。 それとも不可避のエラーであって、全く別のコードにしなければならないのでしょうか。 教えていただけると幸いです。 < 使用 Excel:Excel2007、使用 OS:Windows7 > ---- 条件判定してもいいですけれど、こんなんでどうでしょうか。 Range("C1:C" & Cells(Rows.Count, "A").End(xlUp).Row).FormulaR1C1 = "=RC[-2]+RC[-1]" 規定の式を使用するのであれば、Cells(Rows.Count, "A").End(xlUp).Row が 2以上のときだけ実行するように IF 文を追加すればいいのではないでしょうか。 (Mook) 2014/04/10(木) 19:03 ---- ありがとうございます。 Range("C1:C" & Cells(Rows.Count, "A").End(xlUp).Row).FormulaR1C1 = "=RC[-2]+RC[-1]" では上手く動きませんでした。 IF文を追加するしかないんでしょうか。 (素人) 2014/04/11(金) 11:21 ---- すみません。 IFで対応して自己解決致しました。 ありがとうございました。 (素人) 2014/04/11(金) 11:53 ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201404/20140410174416.txt - [detail] - similar
PREV NEXT
Powered by Hyper Estraier 1.4.13, with 97056 documents and 608292 words.

訪問者:カウンタValid HTML 4.01 Transitional