[過去ログ]
Excel総合相談所 136 (1002レス)
Excel総合相談所 136 http://mevius.5ch.net/test/read.cgi/bsoft/1564217249/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
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サムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.007s