[過去ログ]
Excel総合相談所 136 (1002レス)
Excel総合相談所 136 http://mevius.5ch.net/test/read.cgi/bsoft/1564217249/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
719: 名無しさん@そうだ選挙にいこう [sage] 2019/09/16(月) 02:27:13.65 つづき・・・ End With With Selection.Borders(xlEdgeRight) .LineStyle = xlContinuous .ColorIndex = xlAutomatic .TintAndShade = 0 .Weight = xlThin End With With Selection.Borders(xlInsideVertical) .LineStyle = xlContinuous .ColorIndex = xlAutomatic .TintAndShade = 0 .Weight = xlThin End With With Selection.Borders(xlInsideHorizontal) .LineStyle = xlContinuous .ColorIndex = xlAutomatic .TintAndShade = 0 .Weight = xlHairline End With http://mevius.5ch.net/test/read.cgi/bsoft/1564217249/719
742: 名無しさん@そうだ選挙にいこう [sage] 2019/09/16(月) 15:09:27.82 >>739 速度無視単純さ重視 dim r as range for each r in range("a1:a10") if r.value like "*行程?*" then >>719のSelection.をr.に変えたやつ end if next http://mevius.5ch.net/test/read.cgi/bsoft/1564217249/742
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
1.389s*