TOP > 一行コード集 1  2  3    4    5    6  

201

列非表示

Columns(i).EntireColumn.Hidden = True

202

列表示

Columns(i).EntireColumn.Hidden = False

203

行非表示

Rows(i).EntireRow.Hidden = True

204

行表示

Rows(i).EntireRow.Hidden = False

205

切上整数化

ROUNDUP(数値, 0)

206

切上公倍数化

CEILING(数値,1)

207

印刷(シート) Worksheets("Sheet1").PrintOut

208

印刷(選択範囲)

Selection.PrintOut

209

印刷(プレビュー表示)

Selection.PrintOut Preview:=True

210

印刷(範囲指定)

ActiveSheet.PageSetup.PrintArea = セル範囲アドレス

211

印刷(範囲)

ActiveSheet.Ranre("A2:C10").PrintOut

212

印刷(シート全部)

ActiveWorkbook.Worksheets.PrintOut

213

印刷(ページ指定)

Selection.PrintOut from:=2 to:=2 Copose:=1

214

印刷(ページ範囲指定)

Worksheets("Sheet1").PrintOut from:=1 to:=3

215

日付

Day(Now())

216

時刻

Hour(Now())

217

インプットボックス

i=InputBox (" ")

218

色指定RGB

RGB(red,green,blue)

219

文字列比較

s=StrComp(String1,String2)

220

列選択(複数)

Range("B:B,D:D").Select

221

セル選択(全部)

Cells.Select

222

行選択(Range)

Range("3:3").Select

223

行選択(Rows2)

Rows(3).Select

224

行選択(アクティブセル)

ActiveCells.EntireRow.Select

225

列選択(リスト範囲の中)

Range("C5").CurrentRegion.Columns(2).Select

226

行選択(リスト範囲の中)

Range("C5").CurrentRegion.Rows(5).Select

227

列選択3

Columns(2).Select

228

コマンドボタン非表示

ActiveSheet.CommandButton1.Visible=False

229

ユーザーフォーム表示位置

User.Form1.StartUpPosition=0〜3

230

ブックをアクティブ

Workbooks("Book1").Activate

231

ブックを開く

Workbooks.Open FileName:="フルパス"

232

ブックを開く2

Workbooks.Open FileName:="カレントフォルダのブック名"

233

Excel終了

Application.Quit

234

ブックのコピー作成

ActiveWindow.NewWindow

235

シート削除

Activesheet.Delete

236

シート削除2

Worksheets("Sheet1").Delete

237

セルデータコピー

Worksheets("Sheet1").Range("A1:A3").Copy

238

セルデータ貼りつけ

Worksheets("Sheet2").Paste

239

ゼロの非表示

ActiveWindow.DisplayZeros=False

240 警告を表示しない Application.DisplayAlerts = False
241 最終のセルアドレス Sheet1.UsedRange.Address
242 アクティブセル範囲選択 Selection.CurrentRegion.Select
243 Book1 を開かずに起動 ".........\Microsoft Office\Office\Excel.exe" /e
244 最大化で起動 ".........\Microsoft Office\Office\Excel.exe" /i
245 XLstartを使用しないで起動 ".........\Microsoft Office\Office\Excel.exe" /s
246 読み取り専用モード起動 ".........\Microsoft Office\Office\Excel.exe" /r "フルパス"
247 メニューバーの削除 Application.CommandBars("名前").Delete
248 数式の非表示 Selection.FormulaHidden = True
259 セルのロック Selection.Locked = True
250 セル表示形式 Range("A1").NumberFormat =

TOP   codepar6