エクセルの学校：全文検索：Hyper Estraier：セルの幅単位

Results of 1 - 1 of about 44 for セルの幅単位 (0.006 sec.)

セルの幅 (324), 単位 (3434)

[[20200816181429]]: #score: 9641; @digest: 1d2a7ea9209c797279b82b3736366aa8; @id: 84794; @mdate: 2020-08-16T11:34:01Z; @size: 1415; @type: text/plain; #keywords: r1000 (14214), 算張 (7323), 列掛 (7005), 行設 (3598), 算() (2788), evaluate (2189), 降か (1780), け算 (1743), カバ (1127), ト") (1109), e3 (1060), 81 (871), 、形 (762), operation (678), 目以 (656), 稲葉 (643), 列全 (557), テス (547), 掛け (535), 日) (514), マナ (476), 演算 (450), unknown (440), 終行 (429), シン (414), 82 (406), 張り (341), 貼付 (317), 最終 (306), 以降 (303), 行ま (291), workbooks (258); 『VBA 列掛け算』（ゆう）
VBAにR列の2行目以降から最終行まで-1倍の掛け算をしたいのですが、どのようにしたらよいでしょうか? R列全てを掛け算は下記で出来たのですが、2行目以降からするにはどのようにしたらよいでしょうか? Sub 掛け算() With Workbooks("テスト").Worksheets("テスト") .Range("R:R").Value = .Evaluate("R:R*-1") End With End Sub ＜使用 Excel:unknown、使用 OS:unknown ＞ ---- 最終行はEnd(xlup)で取得できます。 https://www.sejuku.net/blog/28929#:‾:text=Excel%20VBA%E3%81%A7%E6%9C%80%E7%B5%82%E8%A1%8C%E3%82%92%E5%8F%96%E5%BE%97%E3%81%99%E3%82%8B%E5%9F%BA%E6%9C%AC,-%E3%82%AD%E3%83%BC%E6%93%8D%E4%BD%9C%E3%81%A7&text=%E3%80%8CCtrl%20%2B%20%E2%86%93%E3%80%8D%E3%82%AD%E3%83%BC%E3%81%A7,%E3%81%93%E3%81%A8%E3%81%8C%E3%82%8F%E3%81%8B%E3%82%8A%E3%81%BE%E3%81%99%E3%81%AD%E3%80%82 その場合、Evaluateより、形式を選択して張り付けで、 -1を演算張り付けのほうが、コードをシンプルにできそうですが、いかがでしょうか? http://kokoro.kir.jp/excel/paste-operation.html （稲葉） 2020/08/16(日) 19:04 ---- 最大でも、1000行までとして .Range("R2:R1000").Value = .Evaluate("if(R2:R1000<>"""",R2:R1000*-1,"""")") （マナ） 2020/08/16(日) 19:40 ---- 稲葉さんありがとうございます。 Evaluateより、形式を選択しての貼付け頭にありませんでした。色々な方法があるのですね! マナさんありがとうございます。確かに10000行設定すればすべてカバーできます! （ゆう） 2020/08/16(日) 20:34 ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/202008/20200816181429.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ