CEL371.代入について

Q：（質問者：北海道backboneさん）
WindowsXP
Excel2002を使用し始めました。
以前はロータスを使用していて数字を入れると別のセルに文字を代入していました。
例）0:現金　1:預金　3:旅費 ・・・
 　A　 B
1　0　現金
2　1　預金
3　2　旅費
　　　・
　　　・
計算式は次の様でした。
@IF(@CELL("TYPE",A1..A1)="b","",@CHOOSE(A1,"現金","預金","旅費"," ・","・","・"))
この様な式をExcelで作るとどうなるでしょう？
どなたか教えてください。お願いします。

？？？？？？？？？？？？？？？？？？？？？？？

Ａ：
あなたの式をコピーして貼り付けました。
すると、
=IF(CELL("TYPE",A1:A1)="b","",CHOOSE(A1,"現金","預金","旅費"," ・","・","・"))　
になりました。
「@」は必要ないのでしょうね。範囲の形式も違いますね。
それから、入力する数字が違います。
1:現金　2:預金　3:旅費　となります。
ロータスの@CHOOSE関数のオフセット？の初期値は、「0」ですが、Excelの=CHOOSE関数のインデックスの初期値は、「1」になります。
少し慣れるまで大変かな、と思いますが、がんばってくださいね。
VLOOKUP関数も、列の数え方が違ったように記憶しています。
ちなみに、【CELL("TYPE",A1:A1)="b"】の部分は、【A1=""】でも良いかと思います。

蛇足ですが、私もロータスからExcelに替えました。
「オプション」で設定を変更すれば、ロータス方式に出来ます。
以前の知識をそのまま使えるのだと思います。
しかし、シート毎にオプションを変更するみたいで結構面倒と感じました。
間違いも起こりやすいのではないかと感じました。
せっかくExcelを使うようにした、あるいは、なったのだから、Excel方式で覚えたほうが、と思います。
本当！蛇足ですね。失礼しました。m(__)m
Excel2002で確認済み。　[質問一覧]／[HOME]

CEL372.年又は年月のみの入力

Q：（質問者：島根県genmaiさん）
WindowsXP
年齢や期間を計算する際に、年だけ又は年と月のみを入力して計算するにはどうすれば良いのでしょうか？
また計算した期間等を、日数ではなく、満年数、または満年月数で表示するにはどうすればよいのでしょうか？
たとえば昭和６０年（１月）から平成１４年（３月）までは、何年（何カ月）かと言った計算です。

？？？？？？？？？？？？？？？？？？？？？？？

Ａ：
genmaiさん今日は。兵庫のhhirochannです。
日付データは1901年1月１日を１としたシリアル値になっています。
日付データとする限り、日まで入力する必要があります。
但し、表示は年のみ、年と月のみ　とする事は可能です。
（入力時　2002/8　と入力しますと、2002/8/1と見なされますが・・）
s60/1/1  h14/3/1 と入力しセルの書式設定でユーザ定義を選択し、種類の所に、ggge"年"m"月"とすれば下記のような表示になります。
年のみであれば　ggge"年"　年増。
次に
Ａ２セルに　昭和60年1月
Ｂ２セルに　平成14年3月
のデータがあり、Ｃ２セルにこの差の年と月を表示したい場合は、
=DATEDIF(A2,Ｂ２,"Y")&"年"&DATEDIF(A2,Ｂ２,"YM")&"ヶ月"
と入力すれば、１７年２ケ月　と表示されます。
なお、特定のセルの日付までではなく、本日までの年月を求めたい時は上記式でＢ２をTODAY()に置き換えすることにより可能です。　[質問一覧]／[HOME]

CEL373.条件付書式について

Q：（質問者：島根県blueさん）
WindowsXP
いつも参考になり勉強させていただいております。
さて、条件付書式で色付けしたデータなどをカウントしたいのですがどのような方法があるでしょうか？

？？？？？？？？？？？？？？？？？？？？？？？

Ａ：
マクロ万年初心者の兵庫yuhkiです。
色に関するご質問は多いですね。
一般機能では、セルの色に関する情報はとれないので、ご希望の内容はできないようです。
ですので、マクロで処理するのはいかがでしょうか？

1）ブックを起動して、ATLキー+F11キーでVBEを起動します。
2）メニューの[挿入]−[標準モジュール]を選択します。
3）真っ白いページが出てきますので、以下のコードを貼り付けてください。

Function mycolor(r As Range) As Double
　　Dim mycell As Range
　　For Each mycell In r
　　　　If mycell.Interior.ColorIndex <> xlNone Then
　　　　　　mycolor = mycolor + mycell.Value
　　　　End If
　　Next
End Function

4）で、EXCELに戻って、=mycolor((セル範囲))とすると、指定した範囲内で塗りつぶしが施されているセルの合計を行います。

上手く良くといいのですが（ちょっと心配です）・・・。
ではでは。　[質問一覧]／[HOME]

CEL374.セルの保護

Q：（質問者：広島県yumi-yumiさん）
WindowsMe
セルに入力したことを書き換えられないように保護したいのです。
ひとつのセルだけの保護ができますか？教えてください。

？？？？？？？？？？？？？？？？？？？？？？？

Ａ：

広島県yumi-yumiさん、こんにちは。

まず、Ctrl + A を押して、「書式」→「セル」→「セルの書式設定」の「保護」タブの「ロック」のチェックをはずし、「ＯＫ」を押す。

次に、保護するセルを選択し、同じように進んで「ロック」にチェックを付けて、「ＯＫ」を押す。

次に、「ツール」→「保護」→「シートの保護」と進み、パスワードが必要なければそのまま「ＯＫ」を押すと、必要部分だけ保護されます。　[質問一覧]／[HOME]

CEL375.セルの書式設定の表示形式について

Q：（質問者：東京都aliceさん）
windows95
いつも大変参考にさせていただいております。
ところで、セルの書式設定の表示形式に関する事なのですが・・・。
数字2桁を入力する際に、01とか08等、先頭に「０」が表示される様にしたいのですがどのようにしたらよいのでしょうか？
2つの試験の結果を合せて0115の様に4桁表示をしなければならないので、どうしても2桁で表示したいのです。
また、この数字を元にランク分けを関数で別の行で行っているため文字列にする訳にもいかず困っております。
わかりづらい質問で申し訳ございませんが、よろしくお願いいたします。

？？？？？？？？？？？？？？？？？？？？？？？

Ａ：
文字列でも大丈夫です。

文字列を数値に変えます。掛算を利用します。
ただし、数値に変えた後も、0115の様に4桁で表示しなければならない場合は、セルの書式設定が必要になります。

セル範囲を選択して、右クリックします。セルの書式設定を選択します。
「セルの書式設定」で、「表示形式タブ」をクリックします。

《分類》でユーザー定義を選択し、《種類》のテキストボックスに、0000　と入力します。
これで、4桁の設定は、済みます。2桁の場合は、00ですね。

例は、A列2行目からで、1つ目の試験の結果があり、B列2行目から2つ目の試験の結果があるとしています。
随時変更をお願いします。

式を【セルC2】に入力します。この列が、2つの試験の結果の列になります。

式は、　=(TEXT(A2,"00")&TEXT(B2,"00"))*1
この式は、それぞれの試験の結果の列が、文字列でも、数値でもOKです。
数値がお勧めです。

Excel2002で確認済み。　[質問一覧]／[HOME]