たびたびすみません。 このファイルを開くアプリケーションを選んでください。 と出たのですが、どれを選べばよいのかわかりません。 ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

PikaTool203.XLSがきちんと出来ていますか？ アプリケーションは、もちろんエクセルです。

通りすがりのヨコレスですみません・ 超初心者さんへ ＞このファイルを開くアプリケーションを選んでください。 もしかして圧縮ファイル（拡張子が.zip）の解凍をしていないのでは？ そうであれば圧縮ファイルの解凍ツールを導入しないと始まりません。 ＜定番解凍ツール＞ http://www.vector.co.jp/soft/win95/util/se026842.html

ぴかるさん、通りすがりさん、すみませんです。 会社のパソコンなので何がどうなっているのかわかりません。 今回はあきらめます。 ご迷惑をおかけしてすみませんでした。

諦めが早いですね（汗 祝日一覧の範囲に名前の定義をしてあげれば、条件付書式でも出来ると思いますけど。

あれれ、なんか残念です。お試しだけでも、出来たら良かったんですけどネ(^^;)

> =IF(ISERROR(MATCH(A2,祝日$A$1:$A$30,0)),FALSE,TRUE) > と入力しました。すると、 > 『抽出条件　条件付き書式で、他のワークシートまたはブックへの参照は使用しません。』 > と、エラーメッセージが出ます。 =IF(ISERROR(MATCH(A2,INDIRECT("祝日!$A$1:$A$30"),0)),FALSE,TRUE) で出来ますよ。 って、もう見てないかな・・・？

Sub データー削除() ' ' データー削除 Macro ' マクロ記録日 : ' ' ActiveWindow.SmallScroll ToRight:=-4 ActiveWindow.SmallScroll Down:=4 Range("P7:Q43").Select ActiveWindow.ScrollRow = 1 Range("P7:Q43,S7:T43").Select Range("S7").Activate ActiveWindow.ScrollRow = 1 Range("P7:Q43,S7:T43,V7:W43").Select Range("V7").Activate ActiveWindow.ScrollRow = 1 Range("P7:Q43,S7:T43,V7:W43,Y7:Z43").Select Range("Y7").Activate ActiveWindow.ScrollRow = 1 Range("P7:Q43,S7:T43,V7:W43,Y7:Z43,AB7:AC43").Select Range("AB7").Activate ActiveWindow.ScrollRow = 1 Range("P7:Q43,S7:T43,V7:W43,Y7:Z43,AB7:AC43,AE7:AF43").Select Range("AE7").Activate ActiveWindow.ScrollRow = 1 ActiveWindow.SmallScroll ToRight:=5 Range("P7:Q43,S7:T43,V7:W43,Y7:Z43,AB7:AC43,AE7:AF43,AH7:AI43").Select Range("AH7").Activate ActiveWindow.ScrollRow = 1 Range("P7:Q43,S7:T43,V7:W43,Y7:Z43,AB7:AC43,AE7:AF43,AH7:AI43,AK7:AL43").Select Range("AK7").Activate ActiveWindow.ScrollRow = 1 ActiveWindow.ScrollColumn = 1 ActiveWindow.SmallScroll ToRight:=11 Selection.ClearContents ActiveWindow.ScrollColumn = 1 ActiveWindow.SmallScroll ToRight:=12 Range("Z4").Select End Sub のマクロをシート保護をしてあるシート内で実行できません。 セルのロックはチェックをはずしているのですが どうして実行できないのでしょうか 保護をしない状態だと実行できるのですが？？？ この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

失礼します。 　 マクロのことなら版違いでしょ？ なぜ、隣で聞かないのですか？ 　 このくらい簡単になるはずです。 　 Sub データー削除() Range("P7:Q43,S7:T43,V7:W43,Y7:Z43,AB7:AC43,AE7:AF43,AH7:AI43,AK7:AL43").ClearContents End Sub 　 「実行できない」というのがどのような状態なのか、こちらには分かりません。 エラーが出るのですか？ それともエラーなしに実行できても結果がともなわないのですか？ この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他

読み取り専用になっています。 保護を解除してくださいと言った内容のメッセージが出ます。 デバックボタンをクリックすると Selection.ClearContentsの所が黄色い網掛けになっています。 質問場所間違っているみたいですね。 すみません、質問しなおした方がいいでしょうか

こんにちは。 >すみません、質問しなおした方がいいでしょうか の方が良いとは思いますが たぶんシートを保護した状態で｢ロック｣の掛かったセルの内容を >.ClearContents でクリアしようとしているからでは？ 選択されたセルの｢ロック｣が不要でシートの保護状態で変更を許可するなら シートを保護する前に｢ロック｣のチェックをはずしておくとか。 ｢ロック｣が必要なら ich habe hunger さんのコードをお借りして Sub データー削除() ActiveSheet.Unprotect Range("P7:Q43,S7:T43,V7:W43,Y7:Z43,AB7:AC43,AE7:AF43,AH7:AI43,AK7:AL43").ClearContents ActiveSheet.Protect End Sub シートの保護を解除して セルをクリア シートを再び保護しておけば良いのでは？ ※パスワードを設定している場合は ActiveSheet.Unprotect Password:="****" ActiveSheet.Protect Password:="****" の **** の部分にパスワードを入れてください。 この記事にはVBAのコードが含まれています。 'green'>緑の太文字→注釈 'brown'>茶色の太文字→条件分岐 'red'>赤の太文字→ループ 'BLUE'>青の太文字→その他 この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他

ありがとう、1度試してから、できないときに質問場所を変更します。

A7行のAQ列までとA43行のAQ列とA79行U列の範囲で A・D・G・J・M・P・S・W・Z・AC・AF・AI・AL・AO列に氏名が書いてあります。 その名前と同じ行の C・F・I・L・O・R・U・Y・AB・AE・AH・AK・AN・AQ列の値を AT6からAT26内にある同一氏名があればAU列に合計したいのですが A7行のAQ列までとA43行のAQ列とA79行U列の範囲で 名前の列1列開けて値となっています。 Uの値の列とWの氏名の列の間に V列を空白セルであけています。 何とか同一氏名の値の合計を求める方法はないのでしょうか。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

別の質問なのでネームを変えました。 なんか変なので質問しなおします。 質問が変わっても同一名でいいのかな？？？

こんにちは。 kkk さんとあ〜やさん が同一人物でHMを変えたと云う事でしょうか？ いずれにしても別な質問の場合や一度解決になった質問への再質問の場合は 新規にご質問を立てられる事をお勧めします。 解決マークの付いた質問は、回答者の方々の目に留まらない場合も在りますし 類似の質問を捜している方々の混乱を招く場合も在ると思いますので・・・。 ※新規質問の際には、文章のみでは状況が把握しにくいので「図表モード」に 　チェックしてこんな↓感じで簡単な例を提示されてください。m(__)m A B ･･･ AC 1 2 3 4 5 ･ ･ 75

ありがとうございます。 利用の仕方が良くわからなくてご迷惑をおかけ致します。 新規に質問いたします。 ご指導のように書き込み致します。

前から不思議だったのですが、 DATEDIFはなぜ関数一覧にないのですか？ 知っている方がいたら教えてください。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2002 ++++++++++++++++++++

こんにちは。 Excelのヘルプに｢DATEDIF｣と入れて｢Enter｣で表示されますが、 >Lotus 1-2-3 関数との互換性を保つために用意されています。 のための関数なので一覧には無いが、手入力すれば使えると云う事です。

そうなんですか。初めて知りました。 boyさんありがとうございます。

お世話になります。 ページのリンクをクリックして表示されるまでの時間を 集計して変動係数を求めたいのですが Excelの関数式？が解らず変動係数を求める事が出来ません。 ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

ページのリンクをクリックして表示されるまでの時間はどうやって計測するかわかりませんが、そのデータが表にしてあるとすれば、 変動係数＝標準偏差/平均値なので ＝STDEV(範囲)/AVERAGE(範囲)*100 でいいのではないでしょうか。

A・Bという2つのシートがあり、 Aのシートのセルへ、Bのシートの複数行へ条件別に入っている数値の合計を入れる方法を探しています。 Bのシートは複数のぎ行に「a」「b」「c」という条件ごとの数値があり、その数値をAの別々のセルへ条件aの足し算、bの足し算というように合計数を入れたいんですが・・・。 わかる方いらっしゃいましたら御願いいたします。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2002 ++++++++++++++++++++

こんにちは〜＾＾ SUMIF関数は使えませんか？

解決しました、ありがとうございました！！

はじめまして（＾＾）今行き詰まっているのでよろしくお願いしますm(_ _)m シート１にこのような↓表を作りました。 A　　　　　B　　　　C　　　　D　　　　　E　　　　F　　　　　G　　 氏名　　　会社名　　肩書き　　住所　　使用場所　使用目的　使用期限 あああ　　A株式会社　部長　　○○○　　A室　　　会議　　　３月３１日 あああ　　A株式会社　部長　　○○○　　B室　　　イベント　３月３１日 あああ　　A株式会社　部長　　○○○　　C室　　　会議　　　３月３１日 あああ　　A株式会社　部長　　○○○　　D室　　　会議　　　３月３１日 あああ　　A株式会社　部長　　○○○　　E室　　　集会　　　３月３１日 いいい　　B株式会社　課長　　×××　　F室　　　説明会　　３月３１日 いいい　　B株式会社　課長　　×××　　G室　　　イベント　３月３１日 ううう　　B株式会社　課長補佐×××　　H室　　　パーティー３月３１日 えええ　　C株式会社　所長　　□□□　　I室　　　会議　　　３月３１日 おおお　　C株式会社　室長　　□□□　　I室　　　集会　　　３月３１日 おおお　　C株式会社　室長　　□□□　　I室　　　事務所　　３月３１日 シート１の表からシート２に（氏名）を選ぶだけで（会社名）（肩書き）それと 複数ある（使用場所）（使用目的）を自動的に表示させたいと思っています。 （会社名） 　（肩書き）（氏名）　様 　 　　　　　３月３１日に使用期限が切れますので更新してください。 　　　　　　　　使用場所　　使用目的 　　　　　　　　　○室　　　　○○○ 　　　　　　　　　○室　　　　○○○ 　　　　　　　　　・　　　　　　・ 　　　　　　　　　・　　　　　　・ 　　　　　　　　　・　　　　　　・ なお、選ぶ氏名は同じ会社の一番最後に書かれている氏名を宛先として選びます。 このような説明でいいのかわかりませんが（＾＾；教えてください。よろしく お願いします。 　　 ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

「（氏名）を選ぶだけで」とありますが 世の中 同姓同名さんもいると思うの ですが。それを考えないでよいのなら 会社名： =INDEX(Sheet1!B:B,LOOKUP(10^17,(0/(Sheet1!A$1:A$100=氏名セル))+ROW($1:$100))) [氏名セル]には 該当する 氏名を入力したセル名を入力 [肩書き][住所]は最初の列番地だけ変更 [使用場所][使用目的]はピボットテーブルで求めれば良いでしょう。個数が付 いてしまいますが その列の文字色を白にするか非表示にすれば 問題ないと思 います。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

Chiquilinさん、ありがとうございます（＾＾） ネットにつなげる時間がこの時間なので、遅くなって すみません。 さっそく挑戦してみたのですが、うまくいきません(ToT) 関数、入れてみたのですが INDEX([シート名]!B:B,LOOKUP(10^17,(0/('シート名'!B$1:B$100=氏名セル))+ROW ('シート名'!:$100)))といれてみたのですが、一番最後の$100でひっかかってし まいます（＾＾； それからピポットテーブルですが、個数は表示されるのですが、肝心の文字列の 表示ができません。ピポットテーブルのところ、もう少し詳しく教えていただけ ませんか？よろしくお願いしますm(_ _)m

この記事は削除されました

ピポットテーブル、何回か挑戦していたら偶然にもうまくいきました♪ ありがとうございました。 あとは氏名、会社名、肩書きの表示なんですけど、関数が苦手で（＾＾； 見るだけでわからなくなってしまうのですが、がんばりますので引き続 きご指導くださいm(_ _)m ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

この記事は削除されました

こんにちは Rinです 失礼します。 ＞あとは氏名、会社名、肩書きの表示なんですけど、関数が苦手で（＾＾； 氏名は、手入力して会社、肩書きを表示させるのですよネ。 ですから ＞INDEX([シート名]!B:B,LOOKUP(10^17,(0/('シート名'!B$1:B$100=氏名セル)) ＞+ROW('シート名'!:$100)))といれてみたのですが、一番最後の$100でひっかかっ ＞てしまいます（＾＾； (1)りすさんの最初の表の説明ですと�Asheet2の例えばA1に氏名を入力 　するのでしたら。 　式の氏名セルの箇所にA1と入れます。 (2) ＞一番最後の$100でひっかかっる。は 　Chiquilinさんの式そのままにします。 　これは、氏名セルに入れた名前が、A列のどの行(番号）に在るかのための 　式ですから。 　変更しないようにして下さい。 　+ROW($1:$100))) のまま。 　A列の名前が、200位あるのでしたら、 A列のデータ数(行数)に合わせて 　($1:$200)とか、($1:$300) 　等に変更してください。 (3)Chiquilinさんの式が 　(Sheet1!A$1:A$100=氏名セル))+ROW 　　　　　　　↓ ('シート名'!B$1:B$100=氏名セル))+ROW 　 A列が、B列に変わっています。 　氏名をA列から探す式ですから 　ここも、そのままにして下さい。 (4)Chiquilinさんが、 ＞[肩書き][住所]は最初の列番地だけ変更 と、言われている様に 　会社名の表示は、会社名の列はB列ですから 　　=INDEX(Sheet1!B:B,LOOKUP 　肩書きは、C列ですから、 　　　　B:BをC:C 　に、変更するだけです。 なお、私の説明は、最初のりすさんの表を 前提にしました。 カン違いならすみません。 Chiquilinさん、お節介でゴメンナサイ Chiquilinさん回答は、いつも拝見しています。 まだ、まだ未熟な私には いつも大変、参考になっています。 今回は、勉強のため、説明させて頂きました。 これからも、ご指導おねがいします。・・・Rin この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他

Rinさん いつもお世話になっております。 今日は 忙しくて全く見にくることができませんでした。ご丁寧なフォロー頂きま して 大変助かりました。ありがとうございます。 > いつも大変、参考になっています。 LOOKUP(10^17,0/配列)」こんな方法 私では思いつきません。去年の４月に別の サイトで ts777 さんという方が回答したものを応用しているだけですよ。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

Rinさん、ありがとうございます。変えちゃいけないところを変えてしまってたん ですね（＾＾； さっそくRinさんの説明どおりにしてみたら、最初は「循環参照云々」というのが でてあせってしまいましたが、氏名セルのところをいろいろためしてみたらうまく いきました！ Chiquilinさん、せっかく教えていただいたのに、勝手にいろいろ間違えててすみ ませんでした（＾＾；Chiquilinのおかげで私が作りたかったシートが出来上がり ました（＾＾）感謝しています。 Chiquilinさん、Rinさん、本当にありがとうございましたm(_ _)m ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

元号を1明治、2大正、3昭和で年月日を区切らず半角数字で入力されたデータを日付データ（2XXX/XX/XX)に変換するにはどうすればできるでしょうか？ 入力されているデータは 3220614 3290813 といった連続した数字で入力されています。 よろしくお願いします。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2002 ++++++++++++++++++++

色々な式ややり方がありますが、とりあえず以下ではどうでしょう。 式は改行無しで続いてます。 =TEXT(IF(LEFT(A1,1)="1","M",IF(LEFT(A1,1)="2","T",IF(LEFT(A1,1)="3","S"))) & MID(A1,2,2)&"/"&MID(A1,4,2)&"/"& RIGHT(A1,2),"YYYY/MM/DD")

A1に変換したいデータがあるとして =DATEVALUE((MID("MTS",LEFT(A1,1),1)&MID(A1,2,2)&"."&MID(A1,4,2)&"."&RIGHT(A1,2))) で、セルの書式を、yyyy/mm/dd　とします。 ただし、明治33年(1900年)以降が対象となります。

ありがとうございます。 aiai さん Excel_Oyaji さん おかげで手作業で変換せずにすみました。

セルに“数式”を入れた際に、そのセルを指定すると 打ち込んだ数式が表示されます。 （SUN=(1A:10A)・・・などの式の表示が出ないように 出来ますでしょうか？ ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

こんばんは〜＾＾ セルの書式設定の保護で表示しないにチェックを入れて シートの保護を掛ければokです＾＾

ｋ＠自転サン有難う御座います。 ＞シートの保護をする。 表示はされなくなり、数式も変更できなくなりましたが・・ 最上段に“オートフィルター”を設定して有るのですが、 その”▼”も効かなくなります。 ・数式を設定したセルの表示をなくし、変更できなくし、 　　オートフィルターが出来ることは可能でしょうか？ すいませんお手数です。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

おはようございます＾＾ 一般機能では無理のような気がしますが。。。

Excel 2002/2003ならできるんですけどね(^^; 保護機能が強化されてますから、保護したシートでオートフィルタが使えます。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

EnableAutoFilterはどうでしょうか？ ヘルプで調べてみてください。

なるほど・・・2002・2003ですが・・ 色々レス有難うございました。 検討してみます。

本日からVBAをはじめようと思った者です。 シート間の比較を行い差異があるセルを”赤”で塗って表示したいと思い、朝から教本を見ながら格闘していますがどうしていいのかわかりません。 どなたかお教えいただけないでしょうか？ EX）比較元：シート1 　　比較先：シート2　差異があればこちらの該当セルを塗りつぶす。 よろしくお願い致します。 ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

申し訳ございません。こちらはエクセル一般操作用の掲示板でした。 VBAの掲示板と勘違いして質問をUPしてしまいました。ご迷惑おかけして申し訳ありません。 削除の仕方がわからないのですが、この質問をVBAの方に移させていただきます。スミマセン。。。

一つのファイルにシートが沢山あります。各シートに名前をつけているのですが、そのシートを五十音順に簡単に並べる方法はありませんか？現在は新しいシートを作成し名前をつける度にシートをつかんで、移動させていますがシートが沢山あり結構大変です。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

こんばんは〜＾＾ 別案です。 シートを並べ替えるのではなく、目次シートを作っておきそれに シート名を50音順で並べておく。 その目次にシートをハイパーリンクさせては如何でしょうか＾＾

ありがとうございます。 実はその方法も作成済みなのですが、上記のファイルは自分が一人で使用するのではなく、パソコンを数ヶ月に一度程度しか触らない人たちも利用するファイルなので、その人達から「使いづらい」と不評なのです。「五十音順に並べてほしい」と希望され仕方なく作業している状況です。同様の事情のファイルをいくつも作らねばならず、大変なため何か方法はないかと思っての質問でした。

何がどう使いにくいのでしょうか？ それが分かれば、他にもレスが付くと思いますが。。。 シートがどのくらいあるか分かりませんが、 シートを50音順に並べ替えただけで使いやすくらるとは思えませんが。。。

ひとつのファイルにシートが大体３０〜４０です。（非効率的な方法です） 他の人がパソコンの使い方を殆ど知らない人たちで、本人の立場からすれば操作方法を覚えるのが嫌なので、「使いづらい」と表現しているのです。 一人一人に説明して理解してもらう努力をしない自分も悪いとは思いますが。

こんにちは Rinです ＞シートを並べ替えるのではなく、目次シートを作っておきそれに ＞シート名を50音順で並べておく。 ＞その目次にシートをハイパーリンクさせては如何でしょうか＾＾ ｋ＠自転さんの方法に、私も賛成です。 各シートに、どんな名前が付いているのか わかりませんが、シートの並べ替えは、VBAなら 出来ると思います。 ただ、並べ替えてもシートを探すのは、同じ事では ないでしょうか。 ｋ＠自転さんの方法で、 目次シートに、シート名を書き出すのは、 関数を使って出来ますので。 ご存知でしたら、ゴメンナサイ。・・・Rinでした。

失礼します。 　 レスしようかどうか迷ってました。 というのももともとシート名で５０音順に正確に並べるのは無理だからです。 と言うのは、シート名には「ふりがな」情報が欠落しているからです。 　 ふりがながないので、漢字のシート名などはこちらの意図したとおりにならない 可能性大です。 それでも良ければ、VBAであれば可能です。 　 考え方は、 　 ある作業用のシートのある列に、すべてのシートのシート名を取り出す その列を昇順ソートする（よみがなとおりに並ぶとは限りません） 並び替えた順にシートを並び替える 作業用のシートを削除する 　 という流れです。

ich habe hungerさんのおっしゃるように「ふりがな順」では無理ですが コード順なら、私が開発中にシートを並べ替えるのに使用している「チョイト 並べ替え」のVBAを参考までにどうぞ！ Sub シート並替え() Dim n As String, m As String Dim s_count As Integer, i As Integer, j As Integer s_count = Worksheets.Count For i = 1 To s_count n = Worksheets(i).Name For j = i + 1 To s_count m = Worksheets(j).Name If AscW(n) > AscW(m) Then Sheets(m).Move Before:=Sheets(i) n = Worksheets(i).Name End If Next j Next i End Sub AscW(n)>AscW(m)のところが怪しいのですが、参考までに(^^); この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他

付け加えるの忘れてました！ これは最初の一文字だけを見て行います。 頭に同じものが並んだ場合(Sheet1,Sheet2････等) には対処してません。悪しからず！ いったん、ワークシート上で並べ替えたものをVBA で処理する方法もありますが、VBAの板ではないので そちらの方に移られてはどうですか？ でも、これってあんまりメリットは無い見たいですけどネ??

よそで回答したコードですけど、ここでも使わせていただきます。 　 Sub test() Dim WS As Worksheet Dim i As Integer Dim MyC As Range Set WS = Worksheets.Add(After:=Worksheets(Worksheets.Count)) With WS For i = 1 To Worksheets.Count - 1 .Cells(i, 1).Value = Worksheets(i).Name Next With .Range("A1").CurrentRegion .Sort Key1:=.Parent.Range("A1"), Order1:=xlAscending, Head er:=xlNo For Each MyC In .Cells Worksheets(MyC.Value).Move After:=Worksheets(Worksheet s.Count) Next End With Application.DisplayAlerts = False .Delete Application.DisplayAlerts = True End With End Sub この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他

うわー！！！　難しそう。沢山教えて貰って大変恐縮ですが、自分の能力ではできなさそう。印刷させて貰って将来の課題にさせていただきます。 いつもパソコンを全く知らない人に囲まれて仕事をしているので、こんな自分でも「知っている内」に入っていると錯覚していました。（恥！

1900年〜2004年までに入力しているデータの中から １月〜１２月までの月ごとに幾つあるか集計したいのですが、教えてください。 例： 1900/1/25 1900/1/26 1905/1/2 2004/1/15 という感じで、この間、２〜１２月までのデータもあって その中から、上記のように１月〜１２月までの月ごとに 幾つデータがあるか集計したいんです。 宜しくお願いします。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

MONTH関数で隣の列に月だけを表示してCOUNTIF関数で月ごとに集計する というのはいかがでしょうか。

ありがとうございます。 月だけを表示するのは、MONTH関数を1つずつ入力していかないとだめなんですか？ それだと、意味がないですよね。 一括で、１月なら１月だけ取り出したいんですが・・。 すみません、宜しくお願いします。

そうですか。 こんな方法しか思いつかないもので、お力になれずすみません。

データがA1:A100にあるとして（１月の場合） =SUMPRODUCT((MONTH(A1:A100)=1)*1) ２月の場合 =SUMPRODUCT((MONTH(A1:A100)=2)*1) 但し、途中に空白がある場合、空白は１月と見なされます。

＞しげちゃんさん ありがとうございます！ できました〜♪本当に嬉しいです！有り難うございます！ ＞見習いさん いえいえ、レスいただけて感謝です。有難うございます！

こんにちわ。 教えて下さい、お願いします。 セルには”○”か”×”しか入力できないようにしたい。 ++++++++++++++++++++ OS      ⇒Windows 98 Version⇒Excel 97 ++++++++++++++++++++

入力規則を設定では如何でしょう

データ→入力規則。 ここでやろうとしたのですが、 文字を直接”○”と”×” このように記入できるとこがないような気がしたのですが。 ありますか？？ ++++++++++++++++++++ OS      ⇒Windows 98 Version⇒Excel 97 ++++++++++++++++++++

>このように記入できるとこがないような気がしたのですが 入力値の種類にリストを選んで 元の値のところで ○,× を設定ではいかがですか

この記事は削除されました

こんにちは。 お邪魔します。m(__)m 「入力値の種類」を「リスト」にして 「元の値」に「○,×」でも良いかも・・・。

おぉぉ（＾＾） 出来ました。 ありがとうございました。 ちなみに、このようなリストから選択しなくても 文字入力でできる設定はないでしょうか？？ ++++++++++++++++++++ OS      ⇒Windows 98 Version⇒Excel 97 ++++++++++++++++++++

こんにちは。 >ちなみに、このようなリストから選択しなくても >文字入力でできる設定はないでしょうか？？ 直接入力で「○」か「×」しか入力させない。 と云う事でしょうか？ A1セルが対象として、入力規則の「ユーザー設定」で 「数式」に「=OR(CODE(A1)=8543,CODE(A1)=8571)」 なんて方法でも良いのかな？

>ちなみに、このようなリストから選択しなくても >文字入力でできる設定はないでしょうか？？ 　　　○か×の入力の判断がわかれば　例えば１を入力すると○、２だと× 　　　などは　ユーザー定義で出来ますが

こんにちは。 mong さんの方法の方がお奨めです。m(__)m

boy さん　おはようございます >mong さんの方法の方がお奨めです。m(__)m 私のは見せかけですで、実際に　○、×をいれるのでしたら　 　　　逆で　boy さん　の方法が　よろしいのでは

ありがとうございました（＾＾） 大変勉強になり参考になりました。 そんで無事解決しました。 どうも！！ ++++++++++++++++++++ OS      ⇒Windows 98 Version⇒Excel 97 ++++++++++++++++++++

こんにちは。 mong さん　こんにちは。 日々の運用と入力の手間を考えたら mong さんの方法の方がお奨めなんですけどね〜。m(__)m

A7行のAQ列までとA43行のAQ列とA79行U列の範囲で A・D・G・J・M・P・S・W・Z・AC・AF・AI・AL・AO列に氏名が書いてあります。 その名前と同じ行の C・F・I・L・O・R・U・Y・AB・AE・AH・AK・AN・AQ列の値を AT6からAT26内にある同一氏名があればAU列に合計したいのですが A7行のAQ列までとA43行のAQ列とA79行U列の範囲で 名前の列1列開けて値となっています。 Uの値の列とWの氏名の列の間に V列を空白セルであけています。 何とか同一氏名の値の合計を求める方法はないのでしょうか。 A7山田太郎　B7　空白　C7　2：00　D7　鈴木孝雄　E7　空白　F7　4：30　G7　氏名H7山田太郎　I7　1：30 J7　氏名　K7　空白　L7　時間と続きます。 S7　氏名　T7　空白　U7　時間の次がWから始まります。 W7　氏名　X7　空白　Y7　時間でAQまで続きます。 AT6山田太郎　AU6　3：30 AT7鈴木孝雄　AU7　4：30 AT8氏名　　　AU8　 AT9氏名 と続きます。AUに合計入れる関数をどうしてよいか分からなくなりました。 分かってもらえるでしょうか心配です。 ブロックアップが使えそうなんですが？？。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

こんにちは〜＾＾ SUMIF関数が使えそうです。 =SUMIF(条件範囲,条件,合計範囲) こんな感じです＾＾

こんばんは Rinです ｋ＠自転さんの ＞SUMIF関数が使えそうです。 を使ってみました。 あ〜やさんの説明を私は、理解出来ていないかも 知れませんが・・・ 出掛ける用事がありますので、 A7からの７行目だけの合計です。 あとは、応用してみてください。 =SUMIF(A7:U7,AT6,OFFSET(A7:U7,0,2))+SUMIF(W7:AQ7,AT6,OFFSET(W7:AQ7,0,2)) どうして、このような表になったのか 解かりませんが、あまり効率の良い 表には思えませんが。 データの加工が、難しくなりますよネ。 エクセルは、最初の表作りが大事な 様に思います。 大変失礼を言ってゴメンナサイ・・・Rinでした。

こんばんは〜＾＾ Rinさんフォローありがとうございます＾＾

合っています、関数を書き込まれると意味を読む事は出来そうです。 SUMIF関数の使い方が少し理解できました。 答えは合いますが全てを完成させる為にはSUMIFを5個+しないといけなくなります。 すごく長くなりますが、短く出来る書き方ってあるのですか。 ＞=SUMIF(A7:U7,AT6,OFFSET(A7:U7,0,2))+SUMIF(W7:AQ7,AT6,OFFSET(W7:AQ7,0,2)) のように　+　方法しかないのでしょうかできれば短くしたいのですが。

おはようございます Rinです =SUMIF(A7:AQ7,AT6,OFFSET(A7:AQ7,0,2)) +SUMIF(A43:AQ43,AT6,OFFSET(A43:AQ43,0,2)) +SUMIF(A47:AU47,AT6,OFFSET(A47:AU47,0,2)) ３つにしました。これ以上は、ムリだとおもいます。 表のレイアウトが、その様になっているので 知識がなくて、ゴメンナサイ・・・Rin

Rinさん ありがとうございました、ややこしい質問でごめんなさいね。 何とか動くように成りました。 SUMIFが少し分かるようになり、ちょっとだけ嬉しくなりました。 この表は見せる為の表だった物をついでに計算もさせたら良いかななんて思って ごめんなさい。

A7:AO79の範囲内に、提示の箇所以外に名前の入力がなければ、 　AT6〜AT26　と同じでなければ問題有りません。 　=sumproduct(($A$7:$AO$47=AT6)*1,$C$7:$AQ$47) 　この式を、26行までコピー で可能では？ 表の構成を完全には理解してないので確証がとれませんが・・・

横から失礼します。 別の方法として（お勧めしませんが・・・） =SUMPRODUCT((A7:AO79=AT6)*(C7:AQ79)*(MOD(ROW(A7:A79),36)=7)) 因みに >SUMIF(A7:AQ7,AT6,OFFSET(A7:AQ7,0,2)) は =SUMIF(A7:AO7,AT6,C7:AQ7) でいいですね >長くなりますが、短く出来る書き方ってあるのですか。 個人的主観になりますが、長いとは思いませんし、 シンプルな式だと思いますが・・・ >AT6からAT26内にある同一氏名があればAU列に合計したいのですが （全てのセルに式を入力するため、長いと感じるのでしょうか?） AU6に =SUMIF(A$7:AO$7,AT6,C$7:AQ$7)+SUMIF(A$43:AO$43,AT6,C$43:AQ$43)+SUMIF(A$79:AO$79,AT6,C$79:AQ$79) といれ　下にコピー 下にコピーとはオートフィルコピーを前提にしています。 オートフィルコピーについては下記参照 http://www.cosmopia.co.jp/IT-FAQ/e-autofill/p1.html http://homepage1.nifty.com/kenzo30/ex_kisonyu/ex_ks_nyumon6.htm#オートフィル（連続データの入力）

>A7:AO79の範囲内に、提示の箇所以外に名前の入力がなければ、 >　AT6〜AT26　と同じでなければ問題有りません。 このような条件の場合 =SUMIF(($A$7:$AO$47,AT6,$C$7:$AQ$47)

> >A7:AO79の範囲内に、提示の箇所以外に名前の入力がなければ、 > >　AT6〜AT26　と同じでなければ問題有りません。 > このような条件の場合 > > =SUMIF(($A$7:$AO$47,AT6,$C$7:$AQ$47) ありゃりゃ、本当に。 何を難しく考えていたのやら。

みなさん、ありがとうございます。 それぞれの式をあてはめて少しずつ勉強します。 関数の意味が少しでも勉強できそうですので。

特定のセルのみをロックする方法を探しています。 ロックしたいセルをセルの書式設定でチェックして、シートを保護する 方法は知っているのですが、 今回教えていただきたいのは、シートを保護しない状態で、 特定のセルをロックする方法を知っていらっしゃるかたはおられますか？ 宜しくお願いいたします。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

>今回教えていただきたいのは、シートを保護しない状態で、 >特定のセルをロックする方法を知っていらっしゃるかたはおられますか シートを保護すると何か支障があるのですか

説明不足で申し訳ありません。 会社で電子伝票を運用しているのですが、大まかな流れは 下記の通りです。 起票者が記入(シートは保護されているので、一般社員はロックしていないセルしか記入できない)→部門長がシート保護を解除して認印を記入し、再度シートを保護→事務処理をする私がシート保護を解除し、受付印を記入する といった流れなのですが、シートを保護した場合、起票者がセルの内容を変更できないようにするためには有効ですが、部門長がセルの内容を改ざんしたり、誤って消してしまったりするケースが多々あるのです。 なのでシートの保護がかかっていない状態でも、特定のセルをロックできれば よいのにな…　と思ったのです。 分かりづらい説明で申し訳ありませんが、よろしくおねがいします。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

一般機能だけでは無理ではなかろうかと･･･。 当方では、シートのScrollAreaプロパティとシートの保護とを 組み合わせて使ってます。 シートの保護は対職員用 ScrollArea指定は検印用 でも面倒なので切り替えはマクロ処理してます。 （マクロのパスワードを設定しておかないとscrollAreaが変更されてしまう） 他にいい方法があればいいんですけどネ〜。

そういうことを防ぐために 「シートの保護」があるのでしょう？ シートの保護の意味を理解していないとしか思えません。

こんばんわ あえて書きましょう。 シートの保護と、セルのロックは関連してはいますが独立しています。 よって　↓　の４つの場合に分けられます。 番号 シートの保護 特定のセルのロック 1 ○ ○ 2 ○ × 3 × ○ 4 × × >今回教えていただきたいのは、シートを保護しない状態で、 >特定のセルをロックする方法を知っていらっしゃるかたはおられますか？ もちろん　知っています。　↑　の{3}がそれに該当します。 ただし、セルの内容は変更できます。 〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜 仕組みとしては、 ｢起票者」「部門長」等の職により、保護するセルを変更すればいいような気がしますが 実現するためには、VBAを使用する必要があるでしょう。 壁は低くないと思います。

みなさん、たくさん教えていただいてありがとうございました！ やはり一般機能だけでは難しいのですね。 VBAに関しては全くの素人なので、今後の課題にしていきたいと思います。 では、失礼いたします。

こんにちは。 SUMIF関数のことで教えてください。 作業日報を作っています。 日報の入力用シートが毎月１枚ずつ増えていきます。 シート名は(１月・２月・・・） 最終シートは集計用です。 日付　伝票番号　開始時刻　 終了時刻 　作業時間 2/1　　100　　　　 9:00　　　10:00　 　　1:00 2/2　　200　　　 10:00　　　12:00　　 2:00 集計シートには伝票番号ごとに作業時間を合計できるように SUMIF関数を使って計算式を入れました。 この集計を、すべてのシートを対象にして行うことはできるでしょうか。 あらかじめ、１年分のシートを作っておき、 SUMIF('１月'!$A$2:$A$4,A2,'１月'!$B$2:$B$4)+SUMIF('２月'!$A$2:$A$4,A2,'２月'!$B$2:$B$4) という風に足していくやりかたしか思いつきません。 もっとすっきりと計算させる方法はありませんか？ VBAを使わないと無理でしょうか？ できれば、あらかじめシートを作る方法でなく、毎月増やしていくやり方が できればいいと思っています。 よろしくご教授お願い致します。 ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

こんにちは。 >あらかじめ、１年分のシートを作っておき 集計シートで =SUMPRODUCT((SUMIF(INDIRECT(COLUMN($A:$L)&"月!$A$2:$A$4"), A2,INDIRECT(COLUMN($A:$L)&"月!$B$2:$B$4")))) では駄目でしょうか？

早速のご回答ありがとうございました。 おかげさまで、うまく計算することができました。 シートを増やしていくやり方については、自分でも勉強していきたいと思います。 まだまだ知らない関数が沢山あり、不勉強を実感しました。 日々精進ですね。。。

=IF(D7<>"",VLOOKUP(D7,項目シート!$E$1:$F$7,2,FALSE),"") 月毎の収支計算をしてます。 この数式が１つのシートの中に600個ほど有り、12ヶ月分、計12シートあるのですが この数式の中の｢項目シート!$E$1:$F$7｣の部分が途中で追加していく事になりそうです 例えば｢項目シート!$E$1:$F$8｣と１つ増えることに600セル×12シート＝720セルを 全てコピーし直すやり方しか分かりません。元の表に追加したら自動で認識出来るように なら無いでしょうか？下記表にて説明します。 給与　　　　　工資 賞与　　　　　奨金 福利厚生費　　福利費 水光熱費　　　水電費 交際費　　　　招待費 医療費　　　　医療費 食費　　　　　餐費 と、日本語に対する中国語があり、左の｢給与｣を入力すると右側の｢工資｣が自動で 入力されます。この、縦列の項目が途中で増えて行きそうです。予め、増えていく 行を予想して、最初から50行くらい定義しておけば良いのでしょうか？上の場合 7行ですので、8行目からは空白のセルですが、それを含めて定義しておけばよいのでしょうか？ お願いいたします。 ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

こんにちは。 「挿入」「名前」「定義」から 「名前」欄に任意の名前（仮に「範囲」）を付けます。 「参照範囲」に =項目シート!$E$1:OFFSET(項目シート!$E$1,0,2,COUNTA(項目シート!$E:$E),1) としてOK。 表示したいセルの数式を =IF(D7<>"",VLOOKUP(D7,範囲,2,FALSE),"") としてはいかがでしょう？

詳細が分かりませんので 憶測で回答します。 予め多めに範囲を取っておいても それほど問題はないです。若干計算が遅く なりますが。もし今後も 項目が増える可能性があるなら 範囲を名前定義し ておきましょう。それなら定義されている範囲だけ変えれば 全て切り替わり ますので。 [挿入]→[名前]→[定義] 名　　前：範囲 参照範囲：=項目シート!$E$1:$F$100 シートを 全て選択 Ctrl + H で置換フォームを起動 検索する文字列：項目シート!$E$1:$F$7 置換後の文字列：範囲 →[すべて置換] でブック全体の 数式内の参照範囲が切り替わるはずです。 ただ 日本語の方の表記を入力規則のリストから入力されているとしたら 定義付けされたリスト名については =項目シート!E1:INDEX(項目シート!E:E,COUNTA(項目シート!E:E)) としておいた方が良いかもしれません。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

Chiquilinさん boyさん ありがとうございました。 解決出来ました。 ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

オートシェイプに種々色をつけたものを大量に作って配置しているのですが あることから色を変更することになりました。 ある指定色を別の指定色に変更したいのですが何か良い方法はありませんか？ 例：●を●に、●を○に等です。 一つひとつ変更していけば良いのですが、何せ量が多いもので・・・ よろしくお願いいたします。　m(_ _)m ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2002 ++++++++++++++++++++

>一つひとつ変更していけば良いのですが 一発という訳にはいきませんが、複数一度に変更することは可能です。 図形描画のツールバーに矢印のアイコン（左から２つ目）ありますから これをクリックして変更が必要な図形を複数囲みます。 複数の図形が選択された状態になりますから、この状態で色を変更します。

例の色が違っていました（コピーしたもので・・・） 　赤を黒、青を白にという感じです。 メジロさん早速の回答ありがとうございます。 しかしながら、各色が清冽に並んでいるわけではなくランダムに、しかも入り組んでいるのです。 従ってCtrlキーを押しながら同じ色をクリックしていき色を変更。というのを色の数だけ繰り返すしかないのかな〜〜と思っているのですが・・・最初にも書きましたが量が多いもので・・・・　(T_T) 最初によく考えて色をつければ良かったのですが・・・ よろしくお願いいたします。　m(_ _)m

ツール→オプション→色 で、シートのカラーパレットそのものを変更しちゃうのはダメですか？ 赤を黒に、青を白に。 それで既に存在するオブジェクトの色が全部変わりますよ。 （変えたくないものまでいっしょに変わっちゃうかもだけど。。）

micさんありがとうございます。 目から鱗で、全然考えていませんでした。・・・が （　）の中の通りで変えたくないものまで変わっちゃいました。 とりあえずは、力仕事でやっつけちゃいましたが ツール→オプション→色は何かの時に使わせていただきます。 この件はこれで解決とさせていただきます。 ありがとうございました。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2002 ++++++++++++++++++++

0を例のようにするにはどうすれば良いのですか。 (例) 255=0255 10=0010 1520=1520 よろしくお願い致します。 ++++++++++++++++++++ OS      ⇒Windows NT Version⇒Excel 2000 ++++++++++++++++++++

セルの書式設定から 表示形式をユーザー定義で「0000」として下さい。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

よく分かりました。 有難う御座いました。 ++++++++++++++++++++ OS      ⇒Windows NT Version⇒Excel 2000 ++++++++++++++++++++

セルの書式→羅線→線→スタイルのなしの下にある 一番細い線の色が変わりません 印刷ビューで見ると変わっているのですが 印刷してみると縦の線と横の線だけが黒色から変わりません どうかよろしくお願いします。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

条件付書式が設定されてたりはしませんか？ ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

これでしょうね。 [XL2002]罫線で色を設定しても黒色で印刷される http://support.microsoft.com/default.aspx?scid=kb;ja;JP400264 「この現象は Excel における制限となります。」とあります。

> これでしょうね。 > > [XL2002]罫線で色を設定しても黒色で印刷される > http://support.microsoft.com/default.aspx?scid=kb;ja;JP400264 > > 「この現象は Excel における制限となります。」とあります。 何とか一番細い線を色付きにして印刷する方法はありませんか？

> 「この現象は Excel における制限となります。」とあります。 Microsoft がそういっている以上 罫線では何ともならないと思います。 オートシェイプで 描くしかないのでは？　Alt 押しながらドラッグすると セルに 合わせて線を引くことができます。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

これで諦めがつきました。 大変ありがとうございました。 また！よろしくお願いします。

シート内の数箇所のセル（数式など設定）を変更できなくするように ロック・保護した際に明細設定にて“オートフィル”が作動するように 設定したファイルを違うＰＣ・・例えばバージョン９７などで 開き記入するとそういった明細な設定機能が付いていないバージョンで 開き作業しても動作不可能なのでしょうか？ ・・新しいバージョンにしても作業が出来ないのなら購入してもダメかな？ 　　と思い書き込みしました。 すいません。宜しくお願いします。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

おはようございます＾＾ > 動作不可能なのでしょうか 不可能だと思います。

やはり・・ 有難う御座いました。 お手数をおかけいたしました。

マップ機能を使用しようと思い、システムディスクからアドインを追加したのですが、microsoft mapが追加されておらず、マップ機能を使うことが出来ません。 どうしたら良いのでしょうか？教えてください。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2002 ++++++++++++++++++++

こんにちは。 >マップ機能 はExcel2000までで Excel 2002には無いと思います。

そうだったんですか･･･ ありがとうございます！

昨日はありがとうございました。 ＞しげちゃんさん、 昨日は１９００年以降でしたが １９００年以前、１０４１年から１８９９年の月ごとの集計は 可能でしょうか？ MONTH以外で、記述して集計する方法はありますか？ それから、１０４１年〜２００４年までで 例えば、２月７日だけ、同一月日だけを集計する方法はありますか？ １９００年以前が無理でしたら、１９００年以降だけでも 方法があれば教えてください。 宜しくお願い致します。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2002 ++++++++++++++++++++

そもそも 1872年以前は 天保暦(陰暦)で計算する必要があり まずもって 月別 データで集計すること自体に意味が なさそうなんですが。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

Chiquilin さんが指摘のように、意味があるのか不明ですが・・・ １９００年以前についてはシリアル値での入力ができません 文字での扱いとなります。 >それから、１０４１年〜２００４年までで >例えば、２月７日だけ、同一月日だけを集計する方法はありますか？ >１９００年以前が無理でしたら、１９００年以降だけでも >方法があれば教えてください １９００年以降限定で =SUMPRODUCT((TEXT(A1:A100,"MMDD")="0207")*1) 0207は２月７日を表しています。

一言書き忘れましたので 名指しでの質問はご遠慮ください。 いつも見ているとは限りませんし、他の回答者が回答しづらくなります。 前回の質問の続きの場合は、前後関係がわかるようにしましょう http://excelfactory.net/excelboard/exgeneral/excel.cgi?mode=all&namber=44234&rev=0

＞Chiquilinさん 意味がない質問ですみません。 ＞しげちゃんさん 名指しで、すみませんでした。 >文字での扱いとなります。 これは、できないという意味でしょうか？ >=SUMPRODUCT((TEXT(A1:A100,"MMDD")="0207")*1) ありがとうございました。

>文字での扱いとなります。 >これは、できないという意味でしょうか？ １９００年以前（文字列）であれば（但し1000年以降） =SUMPRODUCT((TEXT(MID(A1:A100,6,5)*1,"MMDD")="0207")*1) 全て文字列であれば（１９００年以降も文字列で入力の場合） 上記式で可能です

＞しげちゃんさん、何度もすみません。 質問の仕方が悪かったようで、すみません。 >１９００年以前についてはシリアル値での入力ができません >文字での扱いとなります。 についてです。 日付では、1900年以前はできないのは分かっているんですが その日付の所を、 例えば、1899/2/7の「２」だけを集計できるような入力方法がないでしょうか？ つまり、既にあるデータ(年月日)ではなく、「月」にあたる部分が出せるような 入力方法があれば、教えていただきたいのです。 すみません、宜しくお願い致します。

A1に入力されているとして =IF(MID(A10,7,1)="/",MID(A10,6,1),MID(A10,6,2)) こんな感じかな?

邪道ですがこんな方法も・・・ A1に1899/2/7と入力されているとして B1: =MID(A1,6,5)*1 で2005/2/7になります。（シリアル値です）

しげちゃんさん、 ありがとうございます。 どちらかでやってみます。 何度も有り難うございました！

初めまして。まだ本を見ながらエクセルの勉強を始めたばかりなので、 よろしくお願いします。 sheet１からsheet４まで同じ表を作り、それぞれデータを入れます。 sheet５に枠を作り、そのデータが出るようにしたいのですが、 sheet２のデータしか出ません。 sheet１ 部　　番　　名　　　ふりがな　　　性　　　 Ａ　　１　　健　　　　けん　　　　男 Ａ　　２　　桃　　　　もも　　　　女 Ａ　　３　　昭　　　　あき　　　　女 Ａ　　４　　浩　　　　ひろ　　　　男 sheet２ 部　　番　　名　　　ふりがな　　　性　　　 Ｂ　　１　　吉　　　　よし　　　　男 Ｂ　　２　　麗　　　　れい　　　　女 Ｂ　　３　　春　　　　はる　　　　女 Ｂ　　４　　勇　　　　ゆう　　　　男 sheet５ 　　　　　部　　　番 　　　　名　　　　ふりがな　　　　性 　　　　　　 sheet３，sheet４は省きます。 sheet５に部と番を入れるとその人のデータが出ると したいのです。 sheet５ 　　　Ａ部　　１番 　　　　名　　　　ふりがな　　　　性 　　　　健　　　　　けん　　　　　男　 どのようにしたらよいか教えてください。 お願いします。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2002 ++++++++++++++++++++

考え方がえらく違ってきますので質問ですが １つシートには部がＡ､Ｂ、Ｃ、Ｄなどと入り混じっていますか､ それとも提示されているように Ｓｈｅｅｔ１はＡ Ｓｈｅｅｔ２はＢ Ｓｈｅｅｔ３はＣ Ｓｈｅｅｔ４はＤ と部ごとにシートが分かれているのでしょうか？

Ｓｈｅｅｔ１はＡ Ｓｈｅｅｔ２はＢ Ｓｈｅｅｔ３はＣ Ｓｈｅｅｔ４はＤ と部ごとにシートが分かれています。

Ｓｈｅｅｔ５の A1には「Ａ」のみ、　B1には「1」のみが入力されているとして。 A1は全角・半角、大文字・小文字は問いません。 A2: =VLOOKUP($B$1,INDIRECT("Sheet"&CODE(UPPER(ASC($A$1)))-64&"!$B$2:$E$5"),COLUMN(A1),FALSE) 必要数、右にコピーします。

今やってみましたが、REFと出てしまいます。 Ｂ２に =VLOOKUP($D$2,置換え範囲,2) と式を入れ、部を書き、 Ｄ２に 番号が入ると Ｂ４からＥ５にデータが出るようにしていました。 Ｂ４になどには =VLOOKUP($D$2,置換え範囲,3) という式を入れています。 　 Ａ　　Ｂ　Ｃ　Ｄ　Ｅ　　Ｆ　　Ｇ １ ２　　Ａ　部　１　番　 ３　　 ４　　氏　かな　性 ５　　健　けん　男 ６ sheetも置換え範囲とする方が１回、１回指定せず、部の名前を指定するだけで いいと本で読みました。 Ｄ２は関数がないので、いいのですが、Ｂ２には関数があるので部の 名前を書き込むことはできません。 何とかＢ２に部の名前を書き込む方法を探していましたが、発想が悪いのではと 思いました。 今日教えていただいた関数は今の状態で使うとするとできるでしょうか？ 本を参考にしているので、式の意味までは余りよく理解していません。 お願いします。

ちょっと力ずくですが、次のようにしたらできそうです。 Sheet5 A B C D E F 1 b 2 2 名 ふりがな 性 A 1 3 麗 れい 女 B 2 4 C 3 5 D 4 たとえば E2F5 に図のような値を入れておきます。（じゃまなら、これらの列を非表示にしておく） A3〜C3には次の式を入れます。 =OFFSET(INDIRECT(ADDRESS(1,1,,,"Sheet"&VLOOKUP($A$1,$E$2:$F$5,2))),$B$1,2) =OFFSET(INDIRECT(ADDRESS(1,1,,,"Sheet"&VLOOKUP($A$1,$E$2:$F$5,2))),$B$1,3) =OFFSET(INDIRECT(ADDRESS(1,1,,,"Sheet"&VLOOKUP($A$1,$E$2:$F$5,2))),$B$1,4)

失礼しました。"部・番"のついたままのデータでするのでしたか。 Sheet5 A B C D E F 1 B部 2番 2 名 ふりがな 性 A 1 3 麗 れい 女 B 2 4 C 3 5 D 4 表示形式で、A1 を @"部" 、B1 を#"番"ではだめでしょうか。 データそのものは A1 には A とかだけを入れるとします。

>sheetも置換え範囲とする方が１回、１回指定せず、部の名前を指定するだけで >いいと本で読みました。 >Ｄ２は関数がないので、いいのですが、Ｂ２には関数があるので部の >名前を書き込むことはできません。 >何とかＢ２に部の名前を書き込む方法を探していましたが、発想が悪いのではと >思いました。 メジロさんの回答は、部の名前が「A部」、「B部」、シート名が sheet1�Asheet2 であることを前提として回答しています。　 実際には、人事部とか営業部など他の名前なのですね。 そのために、#REF!エラーになったと思われます。 >部の名前を指定するだけでいいと本で読みました。 sheet１ A B C D E 1 部　　番　　名　　　ふりがな　　　性　　　 2 Ａ　　１　　健　　　　けん　　　　男 3 Ａ　　２　　桃　　　　もも　　　　女 4 Ａ　　３　　昭　　　　あき　　　　女 5 Ａ　　４　　浩　　　　ひろ　　　　男 sheet２ A B C D E 1 部　　番　　名　　　ふりがな　　　性　　　 2 Ｂ　　１　　吉　　　　よし　　　　男 3 Ｂ　　２　　麗　　　　れい　　　　女 4 Ｂ　　３　　春　　　　はる　　　　女 5 Ｂ　　４　　勇　　　　ゆう　　　　男 sheet５ A B C D 1　 2 Ａ部　 　　　　　 １ 3 4　　　　　　名　　ふりがな　 性 5　　　　　　　 名前定義を使用します。 sheet1のB2:E5（実際の範囲を指定）をA部（実際の範囲を指定）と名前定義します。 sheet2のB2:E5（実際の範囲を指定）をB部（実際の範囲を指定）と名前定義します。 sheet5の　A2に部の名前、D2に番号が入力されると仮定して sheet5の　B5に =VLOOKUP($D$1,INDIRECT($A$1),COLUMN(B1),FALSE) といれ下にコピー 名前定義については、下記参照 http://homepage1.nifty.com/kenzo30/ex_kisotoku/ex_ks_tokubetu6.htm#名前の利用・利点と付け方 この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他

訂正します。 >sheet1のB2:E5（実際の範囲を指定）をA部（実際の範囲を指定）と名前定義します。 >sheet2のB2:E5（実際の範囲を指定）をB部（実際の範囲を指定）と名前定義します を sheet1のB2:E5（実際の範囲を指定）をA部（実際の部の名前にします）と名前定義します。 sheet2のB2:E5（実際の範囲を指定）をB部（実際の部の名前にします）と名前定義します

本当にみなさん、ありがとうございます。 すごく勉強になります。ただ自分の理解が 追いついてないので、時間をかけてがんばって みます。ホームページも大変よかったです。 こんなに親切に教えていただき、感激しています。 でき次第連絡しますので。

すみません、再度訂正します。 >=VLOOKUP($D$1,INDIRECT($A$1),COLUMN(B1),FALSE) >といれ下にコピー 下にではなく、右にコピーです。

sheetに名前を定義したいのですが、 sheet１の名前をＡ部にしたら、 sheet２もＡ部になります。どうしたら、 変えることができるのでしょうか？ やり方は�Asheet１で名前→定義（Ａ部）→範囲指定→決定 　　　　　sheet２で名前→定義（Ａ部をＢ部に変え）→範囲指定→決定 です。よろしくお願いします。 この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他

範囲指定の部分でシートもきちんと指定しましたか? （1）名前ボックスでつける方法 で定義した方がわかりやすいと思います

ありがとうございました。 なんとか思い通りのことができました。 今回のことでたくさんの勉強ができました。

すみません　並べ替えがどうしてもうまくいかないんです。 　　　Ａ　　Ｂ　　Ｃ　　　Ｄ　　　Ｅ　　　Ｆ　　　Ｇ　　 １　　日付　項目　品名　　備考　入庫数　出庫数　出荷数 ２　　2/1　入庫　あああ　ＡＡ　　100 ３　　2/1　出庫　いいい　ＢＢ　　　　　　100 ４　　2/1　出荷　ううう　　　　　　　　　　　　　　10 ５　　2/2　入庫　かかか　ＣＣ　　100 ６　　・ ７　　・ というような表があります。 日付通りに入力ができればいうことなしなんですが 日報が遅れたりもれがあったりで入力がかなり遅れたりすることがあるのです。 それで月末に1度に並べ替えしてしまえれば。。とおもったのですが 第一基準　日付 第二基準　項目（入庫、出庫、出荷、過不足、等） で並び替えたいのですが　日付はうまくかわるのですが 項目が思うようになりません。（過不足、出荷、出庫、棚卸、入庫と並んだり あるいは　過不足、棚卸　出荷、出庫、入庫と並んだりで　バラバラです） これを　うまく並び替えができる方法がありますでしょうか？ オプションで登録してみたんですが　それでもダメでした。 すみませんが　どなたか教えて下さい。　お願いします。 ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

ちょっと面倒ですがまずオプションを使って「項目」で並び替え（ユーザー設定で登録した 並び順は最優先されるキーにしか効きませんので）後、改めて日付で並び替えてはどうでしょうか？ あるいは作業列を用意してそこに =FIND(B1,"入庫出庫出荷過不足") とでも式を入力し日付を第一キー、作業列を第二キーにしてはどうでしょうか？

文字の並び替えは通常「ふりがな」で行われます。 「入庫、出庫、出荷、過不足」の文字を入れる際の入力文字が一定では ないのでしょうか。 文字そのものの大きさで並び替えれば少なくとも >過不足、出荷、出庫、棚卸、入庫と並んだり >あるいは　過不足、棚卸　出荷、出庫、入庫と並んだりで　バラバラです） こんな現象は出ないと思います。 【データ→並び替え】で表示されるダイアログの下のほうに「オプション」ボタンが ありますからクリックして 方法 ○ふりがなを使わない を選んで並び替えてはどうでしょうか。 ただ、独覚さんの案に賛成です。

おはようございます。 独覚様　メジロ様　ありがとうございます。 ユーザー設定で登録した並び順ってやっぱり最優先されるキーにしか 効かなかったのですね。。教えて下さってありがとうございます。 そして　いろいろ試してみた結果　やっぱりFIND関数を使う事にしたいと思います。 実際に使ってる者が入庫が遅れたりする時に　入るであろう行数をあらかじめ あけていたりとかしてたので（そして削除を忘れてるんです）かなり見た目も 悪かったので、これで遠慮なくつめて入力してもらう事ができそうです。 独覚様　メジロ様　ありがとうございました。

やっていて解らず、こちらで教えていただけたら・・・と思い、 質問させていただきます。 Ａ１のセルに「２」が入ったら、１の行を不表示 Ａ２のセルに「２」が入ったら、２の行を不表示 Ａ３のセルに「１」が入ったら、３の行を表示したまま という風にＡ列に１か２が入ることで、行の表示/不表示を決めたいのです。 関数ＩＦとかをつかってできるのでしょうか？ 何かよい方法があれば、教えてください・・・・ ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

一般操作では難しいと思いますが、何故そのようなことが必要なのでしょうか 　　　　不表示、表示　でなく　文字を白にして　見えなくするのは 　　　　条件付書式で可能ですが

お返事ありがとうございます。 実は、客先ごとの集計表を作っているのですが、 １行目はａ社のデータ ２行目はｂ社のデータという風に入っているのですが、 その月度によって、ｂ社のデータが必要ではなかったり、ｅ社のデータが必要だったりと 違っているのです。 そこで、必要でない客先のデータは不表示にできたら・・・・と思ったのです。 別のシートで、今月はどの客先の集計が必要かをチェックボックスでチェックするように なっていて、チェックボックスがオンになった客先だけのリストが欲しいと思ったのです。 長々とわかりづらい説明ですみません。 難しいようであれば、根本的に考え直してみたいと思います。

>別のシートで、今月はどの客先の集計が必要かをチェックボックスでチェックするように >なっていて、チェックボックスがオンになった客先だけのリストが欲しいと思ったのです A社を選択するとどこかのセルがTRUEになるのですか A,B,Cを選択したことがセル上でわかれば そこに　元の表から　VLOOKUP関数などで一式のデータをそこへ持ってくることは 可能ですが、　そこのところが詳しくわかれば　よろしいのです

mongさん、ありがとうございます。 ＞A社を選択するとどこかのセルがTRUEになるのですか そうなんです・・・。sheet１で、会社名のチェックボックスがオンになると、ＴＲＵＥが入るようになっていて、ＴＲＵＥが入るとsheet2のＡ列に１が、そうでないときは２が入るようになっているのです。 VLOOKUPですか・・・、ちょっと勉強してみます。

または　オートフィルターを使われては　如何でしょう 　　選択された行を　可視セル　コピー、貼り付けも出来ます

mongさん さらにありがとうございます！ オートフィルタで対応できそうです！ ほんとうに助かりました・・・。VLOOKUPも勉強してみたいと思うので、 またどうしてもわからないことがあれば、頼らせてください・・・ ありがとうございました。

すみません、またまた教えていただきたいのですが、 チェックボックスを沢山作りたいのですが、等間隔で複数コピーってできるんでしょうか？ セルのコピーみたいな感じで・・・・ ひとつづつコピーするのが面倒で、さらにきれいに並んでくれないので、 ご存知の方がいらっしゃれば、お願いします。 ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

こんにちは。 下方向の場合、セルの行高が均等な間隔なら 「Alt」キーを押しながらチェックボックスをセルに配置すると セル内に収まる様に配置されます。 このセルをコピーしてセル範囲を選択して貼付けで 等間隔で何個でも貼付けられると思います。 ※ただしリンクするセルの設定などはVBAを使うか 　一個ずつ設定する必要が在ります。

boyさん お返事ありがとうござました。 ＞このセルをコピーしてセル範囲を選択して貼付けで やってみたのですが、例えばセル範囲を５つほど選択して貼り付けても、 チェックボックスは一つだけしか貼り付けされないのです。 やり方がなにか悪いのかな・・・と思いつつ、すみませんが教えてください。

こんにちは。 >例えばセル範囲を５つほど選択して貼り付けても、 >チェックボックスは一つだけしか貼り付けされないのです セルで無く、チェックボックスをコピーしていませんか？ 一旦別なセルを選択して矢印キーで目的のセルに移動して これをコピーしてセル範囲に貼付けてみてください。

boyさん ありがとうございました！ おっしゃる通りでした！ なんだか出来たときには、感動しました。 ありがとうございました。

初めまして、よろしくお願いします。 下表Sheet1のような表があります。A列は名前で、B1:D6には商品の整理番号が入っています。それをSheet2のように商品ごとに分けて、自動で名前が入る表にしたいのです。Sheet2のB1:D9にはどのような数式を用いればよいでしょうか？よろしくお願いします。 Sheet1 A B C D 1 長野 0001 0001 0003 2 太田 0001 0002 3 島野 0002 0003 0006 4 高田 0004 0005 0007 5 益田 0003 0007 6 斉藤 A001 A002 0002 Sheet2 A B C D 1 0001 長野 長野 太田 2 0002 太田 島野 斉藤 3 0003 長野 島野 益田 4 0004 高田 5 0005 高田 6 0006 島野 7 0007 高田 益田 8 A001 斉藤 9 A002 斉藤 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2002 ++++++++++++++++++++

図表モードで入力する時は 自分で改行を入れて下さい。 > どのような数式を用いればよいでしょうか？ できなくはないですが 非常に大変ですよ。どの程度まで理解できるか も疑問ですね。VBA に移行した方が良さそうですが。 データが文字列で入力されていることが大前提です。そうでないなら まずもって無理です。 Sheet1 の AB列間に 1列挿入 ■Sheet1の B1セル：「0」と入力 ■Sheet1の B2セル =COUNTA(C$1:IV1) フィルハンドルをダブルクリック B列全体の 書式設定を「標準」に設定 その上で 数式が表示されるようなら [データ]→[区切り位置]→[完了] Sheet2 のA列に 番号を入力 ■Sheet2の B1セル =IF(COUNTIF(Sheet1!$C:$E,$A1)<COLUMN(A1),"",INDEX(Sheet1!$A:$A,MATCH( SMALL(IF(INDEX(MID(PHONETIC(Sheet1!$C$1:$E$6),(COLUMN(1:1)-1)*4+1,4),0)=$A1, COLUMN(1:1)),COLUMN(A1)),Sheet1!$B:$B))) 配列数式につき Ctrl + Shift + Enter で確定 重いので あまり お勧めしません。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

Chiquilinさん、ありがとうございました。 実際には数百名の名前があったので、指摘の通り重くなりました。 VBAの方に聞いてみたいと思います。 どうもありがとうございました。

エクセルで作成した住所録の名前をエクセルで作成したグラフ付きの表のそれぞれに差込印刷ヘルパーみたいに入れていきたいのですが 何か方法はありますでしょうか？ ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

度々すみませんが、教えてください。 一つのＢＯＯＫに沢山シートが増えてしまい、見出しタブ（画面下のシート名）を スクロールしなくてはいけなくなってしまっています。 この見出しタブをスクロールしなくていいように、二段にすることは 設定などでできるのでしょうか？ 宜しくお願いします！ ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

>一つのＢＯＯＫに沢山シートが増えてしまい、見出しタブ（画面下のシート名）を >スクロールしなくてはいけなくなってしまっています。 シート名が並んでいる　一番左の見出しスクロールバーを右クリックしてみてください

こんにちは。 >この見出しタブをスクロールしなくていいように、二段にすることは >設定などでできるのでしょうか？ 出来ないと思います。 代替案 画面左端下の「▲」右向きや左向きを右クリックして表示から選択する

かぶりました。m(__)m

mongさん、boyさん ありがとうございました。 教えていただいた方法で代用したいと思います。 度々、とても早い回答ありがとうございました。

次のような成績表で、左の選択教科１〜３までの評価を 右のそれぞれの教科成績入力表に転記したいと思っています。 今回お力をお貸し頂きたいのは、一人の生徒がたとえば 数学を２教科選択している場合、その生徒の数学のセルに ２つの評価を入力したいのです。その部分がよくわからないので どなたかお力をお貸し頂けませんでしょうか。よろしくお願いします。 氏名 選1 評 選2 評 選3 評 国 社 数 理 音 美 体 技 英 　　 数　A 技 B 数 A 　　 AA B 国 B 体 A 体 A B AA 　　 社 C 音 B 社 B CB B ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

セル番地が 分かりません。下記の通りだとして A B C D E F G H I J K L M N O P Q 1 氏名 選1 評 選2 評 選3 評 国 社 数 理 音 美 体 技 英 2 数 A 技 B 数 A AA B 3 国 B 体 A 体 A B AA 4 社 C 音 B 社 B CB B ■I2セル =REPT($C2,$B2=I$1)&REPT($E2,$D2=I$1)&REPT($G2,$F2=I$1) これでどうですか？ ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2003 ++++++++++++++++++++

Chiquilinさん、早速試してみたところ、 思い通りの結果が得られました。どうもありがとうございました。

本当に素人質問で恐縮です。 NOW関数を使い、処理日付・時刻を表示させるセルを作っています。 （オプションの中の計算方法は自動になっています） 保存時にVBAで再度「Activecell.value = "=NOW()"」としてわざわざ 再計算させて現在時刻に合わせていますが、可能であれば 常時システム日付とシンクロさせたいと思っています。 「タスクバーの時計を見れば？」というお声はさておいて（笑）、 どうかお知恵を拝借願います。 ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

上記の質問者です。 本文を読み返すと「VBAを使ってどうにかしたい」という風に 感じる方もおられるかも知れませんが、私は一般の関数操作で、 あるいはシステム設定を用いて、というつもりでしたので、 どうか御容赦願いますm(__)m ++++++++++++++++++++ OS      ⇒Windows XP Version⇒Excel 2000 ++++++++++++++++++++

こんにちは〜＾＾ 別のHPですが、↓こちらのgumpoさんのレスです。 http://hpcgi1.nifty.com/kenzo30/a_cbbs/cbbs.cgi?mode=al2&namber=39565&no=0

ｋ＠自転さん、はじめまして！ 早々にアドバイス、有難うございます(^-^) これから早速上記のHPを参考に作業してみます！

A,B,C,D,Eのセルに、どのセルでもいいから○が2つ以上あれば合格。という式にするにはどうしたらよいのでしょうか？ちなみに○は手入力と仮定してです。 ++++++++++++++++++++ OS      ⇒Windows 2000 Version⇒Excel 2000 ++++++++++++++++++++

F1 =IF(COUNTIF(A1:E1,"○")>=2,"合格","") この式を下へコピペ

こんにちは。 こんな感じでしょうか？ =IF(COUNTIF(A1:E1,"○")>1,"合格","不合格")

こんにちは Rinです 　=IF(COUNTIF(A1:E1,"〇")>=3,"合格","不合格") こんな、事でしょうか。 カン違いならゴメンナサイ・・・・Rin〜♪でした。

ありがとうございます(^^ゞmongさん、boyさん、Rinさんm(__)m やっと解決しました。深くお礼申し上げます。

Rinです 間違えてしまいました。 私のは、３つ以上でした・・・m(__)m

こんにちは。 どなたかご存知の方に教えていただきたいです・・・。 セルＡ１に「＝Ｄ１」というＤ１を参照するように設定しています。 このセルＡ１を下方向にコピーしたいのですが、参照元を一つ飛ばしにしたいのです。 Ａ１はＤ１を Ａ２はＤ３を Ａ３はＤ５を・・・・という具合にです。 簡単にコピーできる方法はあるのでしょうか？ ++++++++++++++++++++ OS      ⇒Windows 98 Version⇒Excel 2000 ++++++++++++++++++++

A1 =INDIRECT("D"&ROW()*2-1) これを下へコピペ

ありがとうございました。 解決いたしました。 勉強になりました（＾＾）

未来の年月を計算し表示させたいのですが、 参照セルに”13”（月）と値を入力すると対象セルは現在2005年2月ですが2006年3月と表させたいです。 又、26と入力すると2007年4月となるよう 未来の月数を加算し年月で表示できると大変助かります。 よろしくお願い致します。 ++++++++++++++++++++ OS      ⇒Windows 98 Version⇒Excel 2000 ++++++++++++++++++++

こんにちは。 A1セルに「13」と入力してB1セルに表示する場合 =DATE(YEAR(TODAY()),MONTH(TODAY())+A1,1) 　　　　　　↑もセル参照？ 表示形式は「日付」で年月表示に・・・。

参照セル　A1 対象セル　B1　として B1 =DATE(YEAR(TODAY()),MONTH(TODAY())+A1,DAY(TODAY()))

分析ツールアドインを組み込んで、EDATE関数を使うのがシンプルで いいと思います。 EDATE(開始日,月)です。 開始日が"今日"の場合はTODAY()やNOW()を使って=EDATE(NOW(),13)などとも 出来ますが、1ヵ月後には答えも1ヶ月進むので要注意です。 （その時その時で知りたいだけなら構いません。） 答えを固定した形で保存したい場合は、基準値を確定しなければなりません。 場合によって使い分けてください。 分析ツールは、メニューよりツール＞アドイン＞分析ツール＞OKで組み込みます。

boy 　さん　　　かぶりました　　　失礼いたしました

有難う御座いました。早速確認してみます。

何度も、すみません・・・ 結合されたセルの参照先コピーをしたいのですが、 セルＡ１とＡ２は結合されています。このセルには「＝Ｄ１」と入力されています。 同様に セルＡ３とＡ４は結合されています。このセルには「＝Ｄ２」と入力されています。 上記のような場合、のセルを下にコピーする方法を教えてください♪ 宜しくお願いいたします。 ++++++++++++++++++++ OS      ⇒Windows 98 Version⇒Excel 2000 ++++++++++++++++++++

普通に貼り付けてだめですか

お返事ありがとうございます。 普通に、 セルＡ１とＡ２の結合セルには「＝Ｄ１」と入力し、下方向にコピーすると 同様に セルＡ３とＡ４の結合セルには「＝Ｄ３」と入力されてしまうようです・・・

大変失礼をいたしました　　勘違いでした　　下の式を下へコピペ　では A1,A2 の結合　=INDIRECT("D"&INT(ROW()/2)+1)

mongさん 色んな応用があるんですね・・・・ ほんとにありがとうございました。 勉強になりました♪

こんにちは。 私はこんな方法を使っていますので、参考まで。 A1,A2の結合セル　D1 A3,A4の結合セル　D2・・・とフィルコピーします（つまり＝なしでということ） この場合は1.3.5...とならず1.2.3.4...となると思います。 このあと、 結合セルを範囲指定して、編集→置換で 検索する文字列を　D 置換後の文字列を　=D とするとできると思います。 私もmongさんの方法は勉強になりました。参考にしたいと思います。 私の方法がいい方法とは思えませんが、これでも可能かと。 しかし関数の勉強はしたほうがいいですよね。 今、私も毎日励んでいます。がんばりましょうね。

りすちゃん さん　の方法も　簡単で　いいですね　関数にこだわりすぎかな？？