[過去ログ]
Excel総合相談所 136 (1002レス)
上
下
前
次
1-
新
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
800
: 2019/09/19(木)20:02
AA×
https://docs.microsoft.com/ja-jp/office/vba/excel/concepts/cells-and-ranges/fill-a-value-down-into-blank-cells-in-a-column
[
240
|
320
|
480
|600|
100%
|
GIF
|
べ
|
レス栞
|
レス消
]
800: [sage] 2019/09/19(木) 20:02:01.15 a列だけhttps://docs.microsoft.com/ja-jp/office/vba/excel/concepts/cells-and-ranges/fill-a-value-down-into-blank-cells-in-a-column Sub FillCellsFromAbove() ' Turn off screen updating to improve performance Application.ScreenUpdating = False On Error Resume Next ' Look in column A With Columns(1) ' For blank cells, set them to equal the cell above .SpecialCells(xlCellTypeBlanks).Formula = "=R[-1]C" 'Convert the formula to a value .Value = .Value End With Err.Clear Application.ScreenUpdating = True End Sub http://mevius.5ch.net/test/read.cgi/bsoft/1564217249/800
列だけ
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 202 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
ぬこの手
ぬこTOP
1.681s*