Post-Admin:
Date:
Subject: タグ:Excel ( 26 ) タグの人気記事

Post-Admin:
Date: 2006年 07月 11日
Subject: 列全体
{=SUM(ISBLANK(A:A)*1)}
{=SUM(ISBLANK(A1:A65535)*1)}
で結果が違いすぎる
[PR]
by noaccess | 2006-07-11 08:50 | メモ

Post-Admin:
Date: 2006年 07月 02日
Subject: 誤差の丸めが
=1.333+1.225-1.333-1.225
=(1.333+1.225-1.333-1.225)
答えが異なる
[PR]
by noaccess | 2006-07-02 05:38 | メモ

Post-Admin:
Date: 2006年 06月 30日
Subject: 最後のデータ
ワークシート関数だけで最後のデータを取得ってできるかどうか

Excel2000
=OFFSET(B1,MAX(IF(ISERROR(MATCH(MAX(B:B)+1,B:B)),1,MATCH(MAX(B:B)+1,B:B)),IF(ISERROR(MATCH(REPT("黑",255),B:B)),1,MATCH(REPT("黑",255),B:B)),IF(ISERROR(MATCH(REPT("¥",255),B:B)),1,MATCH(REPT("¥",255),B:B)))-1,0)

環境依存かな?
[PR]
by noaccess | 2006-06-30 03:58 | メモ

Post-Admin:
Date: 2006年 06月 12日
Subject: 最後のデータ
Function GetLastDataRow(c As Range) As Range '指定されたセルから見てROW方向に最後のデータの入ったセルを返す
Set GetLastDataRow = c.Parent.Cells(c.Parent.Rows.Count, c.Column).End(xlUp)
End Function
[PR]
by noaccess | 2006-06-12 18:29 | メモ

Post-Admin:
Date: 2006年 06月 08日
Subject: 例のあれ
=COMBIN(9,3)
=INT(A1-83)

でもなるのね、入れ子にしないと出ないと思ってた。
[PR]
by noaccess | 2006-06-08 10:20 | メモ

Post-Admin:
Date: 2006年 05月 10日
Subject: Excelでセル内の全体を表示する
セルの書式で「折り返して全体を表示する」と「縮小して全体を表示する」に両方チェックが入っている場合にそれを同時に実現する。

5/10 11:00 変更した

Private Sub Worksheet_Change(ByVal target As Range)
Dim c
Dim orgHeight, orgWidth, orgSize
Dim tmpSize, minSize, maxSize
'On Error GoTo lErr
On Error Resume Next
Application.EnableEvents = False
For Each c In target
If c.WrapText And c.ShrinkToFit Then
orgHeight = c.Height
orgWidth = c.Width
orgSize = c.Font.Size
minSize = 1
maxSize = orgSize
If maxSize < 11 Then maxSize = 11
tmpSize = (minSize + maxSize) / 2
Do While Abs(maxSize - minSize) > 0.1
c.Font.Size = tmpSize
c.Rows.AutoFit
If c.Height > orgHeight Or tmpSize > orgWidth Then
maxSize = tmpSize
Else
minSize = tmpSize
End If
tmpSize = (minSize + maxSize) / 2
c.Rows.RowHeight = orgHeight
Loop
c.Font.Size = minSize
End If
Next
lErr:
Application.EnableEvents = True
End Sub

強引だし細かい調整をしていないのでいまいち。
[PR]
by noaccess | 2006-05-10 15:35 | 実験

Page select: |

Profile:
ほんとうかなあ?
by noaccess
プロフィールを見る
画像一覧

Calender:
S M T W T F S
1 2 3 4 5
6 7 8 9 10 11 12
13 14 15 16 17 18 19
20 21 22 23 24 25 26
27 28 29 30 31

*: 検索




*: 最新のトラックバック
うげ!
from ぶろぐ、ぶろぐとき、ぶろげば..
えーと
from ぶろぐ、ぶろぐとき、ぶろげば..
あれ
from ぶろぐ、ぶろぐとき、ぶろげば..

*: メモ帳
ぎゃふん状態にある


*: ブログジャンル
つぶやき

*: 画像一覧