2007-05-31

文字列として入力された数字を数値にする:Excel

<一見して数値のように見えるが、文字列として入力されているものを変換する>

1.空白のセルを選択し、クリップボードに貼り付ける。
2.それを「形式を選択して貼り付け」で「値」→「演算」→「加算」を選んでクリック。
*空白のセルは0になっており、それを加算しようとすると、強制的に数値に変換される。


<A1セルの「¥1000 佐藤」から 抜き出す>

=LEFT(A1, FIND(" ",A1)-1) +0

2007-05-18

1行おきまたは1列おきに背景の色をつける:Excel

<条件付書式を使う>
1.セル範囲をドラックする(左上をアクティブにすること)
2.書式(O)→条件付書式(D)
3.条件を「数式が・・・」にして
4.条件に
=MOD(ROW(),2)
を入力

*1列おきにする場合は
=MOD(COLUMN(),2)

2007-05-17

ワークシートの一覧表示:Excel

見出しスクロールボタンを右クリック

複数のWorksheetに同時にデータを入力する

<とりあえず手動で>
「作業グループ」を作成
*グループ化したいSheetをCtrlを押しながらクリック。
(すべてのセルで同時に入力される。)

<VBAコードで>
1.セル(範囲)に名前をつける : セル(範囲)を選択→ 「名前ボックス」内の名前を変更しエンター
2.コードモジュールを表示 : シート見出しを右クリック→コードの表示(V)
3.モジュール入力
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'グループ化する
If Not Intersect(Range("MyRange"), Target) Is Nothing Then
'このコードを入力しているワークシートの名前を先頭に記述します
Sheets(Array("Sheet1", "Sheet2")).Select
Else
Me.Select
End If

'別のアドレスにも入力する
If Not Intersect(Range("MyRange"), Target) Is Nothing Then
With Range("MyRange")
.Copy Destination:=Sheets("Sheet1").Range("A1")
.Copy Destination:=Sheets("Sheet2").Range("B3")
End With
End If
End Sub

2007-05-16

エクセルの作業状態:Excel

<2つ以上のブックを並べて表示する>
ウィンドウ→整列(A)→並べて表示(A):タイルのような表示になる

<この表示を保存>
ファイル→作業状態の保存(W)

*一度に複数のブックを開くことができ、並び替える必要もなくなる。

2007-05-15

グラフ演出:Excel

棒グラフをGraduallyにする


棒グラフに数字を入れる


2007-05-11

ショートカット:Excel

繰り返し作業:F4
上のセルの値をコピー:Ctrl+D
左のセルの値をコピー:Ctrl+R
コメントを入力:[Shift]+[F2]
書式設定:[Ctrl]+[1]

2007-05-03

セルの入れ替え:エクセル

セルをドラック、Shiftを押しながら入れ替え先にペーストする。

分割された記事を1つにする:FireFOX

[GreaseMonkey]PageConcater


何ページかに分かれている記事を1ページで表示する。

[GreaseMonkey]PageConcater