| セル操作 |
|
■講義一覧
 1. セルの選択及びプロパティ
2. セルのクリア
3. 選択しているセルの取得
■1.セルの選択及びプロパティ
'シートの選択
Worksheets("Sheet1").Activate
'セルに値を設定
Worksheets("Sheet1").Range("A1").Value="EXCEL VBA"
'セルの高さ
Worksheets("Sheet1").Range("A1").RowHeight=20
'セルの幅
Worksheets("Sheet1").Range("A1").ColumnWidth=20
'セルに値を設定
Worksheets("Sheet1").Range("A" & 1).Value="EXCEL VBA２"
'シートの選択
Worksheets("Sheet2").Activate
'セルに値を設定
Worksheets("Sheet2").Cells(1,1).Value="EXCEL VBA"
'セルの高さ
Worksheets("Sheet2").Cells(1,1).RowHeight=20
'セルの幅
Worksheets("Sheet2").Cells(1,1).ColumnWidth=20
|
一覧へ
■2.セルのクリア
'アクティブなシートのセルB1〜D3の範囲を全てクリア
Sub ClearCell()
Range(Cells(1,2),Cells(3,4)).Clear
End Sub
'アクティブなシートのセルB1〜D3の範囲の数式、文字列をクリア
Sub ClearCell()
Range("B1:D3").ClearContents
End Sub
'アクティブなシートのセル全範囲をクリア
Sub ClearCell()
Cells.Clear
End Sub
'Sheet1のセルB1〜D3の範囲をクリア
Sub ClearCell()
Worksheets("Sheet1").Activate
Worksheets("Sheet1").Range(Cells(1,2),Cells(3,4)).Clear
End Sub
'Sheet1のセルB1〜D3の範囲の書式をクリア
Sub ClearCell()
Worksheets("Sheet1").Activate
Worksheets("Sheet1").Range("B1:D3").ClearFormats
End Sub
'Sheet1のセル全範囲のコメント文をクリア
Sub ClearCell()
Worksheets("Sheet1").Activate
Worksheets("Sheet1").Cells.ClearComments
End Sub
|
一覧へ
■3.選択しているセルのクリア
'選択しているセルの取得
Sub Select_test()
'選択しているセルの値がすべて"選択中"の文字が設定される
Selection.Value = "選択中"
End Sub
|
一覧へ
|
|
| |
A8ネット
・人気度：★★★★★
・言わずと知れた人気ASP
 |
| |
楽天市場
・人気度：★★★★★
・誰でも安心、楽天市場で
タワーレコード
・人気度：★★★★☆
・CD/DVDならタワレコで
|
|
