「dポイント」が最大20倍になるお得な情報

エクセル2010で、和暦の月単位で連番を作りたいのですが
連番にすると日付まで入ってしまいうまくいきません、
H20年1月 H20年2月のように連番を作成したいです

よろしくおねがいします

A 回答 (6件)

A1に =DATE(2010,ROW(),1)


第2行目から始めるときはROW(),をROW()-1とする。日を1日に統一する。2日でも良いのだが。
これを下方向に式複写。
12月の次の行は年を繰り上げて2011年1月になる。
ーー
そこで表示形式をユーザー定義でgee"年"mm"月"に設定する。
例 結果
H22年01月
H22年02月
H22年03月
H22年04月
ーー
A1、A2に
2010/1/1
2010/2/1
と入れて、A1:A2を範囲指定し、+ハンドルを下方向にヒッパ手もよい。後は表示形式は上記と同じ。
ーー
ある列で、適当なセル範囲を指定し
編集ーフィルー連続データの作成ー(増加単位)月
デモできる。
ーー
1日が気に食わないと
その場合A列に値に対し=TEXT(A1,"gee年mm月")で値を出し、その列に値複写し、式を消して使う。
ツールーオプションーユーザー設定リストで自分でH20年1月・・の文字列を作れば、セルにこれらの値をセットは簡単
その場合A列に値に対し=TEXT(A1,"gee年mm月")で値を出し、その列に値複写し、式を消し、
ツールーオプションーユーザー設定リストー(上記列を指定し)インポート
すると、繰り返し使える。
    • good
    • 0

一番上のセルに「1/1」と入力して、セルの書式設定で表示形式をユーザー定義にして「ge"年"m"月"」として、このセルを右クリックでオートフィルし、「連続データ(月単位)」を選択するのが簡単だと思います。

    • good
    • 0

No.2です!


たびたびごめんなさい。

投稿した後で気づきました。

セルの表示形式は
ge年m月 に訂正してください。

そして、数式はもっと簡単にできます。

最初のセルに
=DATE(2010,ROW(A1),1)

として下へオートフィルでコピーしてみてください。

どうも何度も失礼しました。m(__)m
    • good
    • 0

表示形式をユーザー定義で ge"年"m"月" とすればよいです。

    • good
    • 0

こんにちは!


外していたらごめんなさい。

行方向に表示させるとします。
とりあえず今年の1月からの表示とします。

最初のセルに
=EDATE(DATE(2010,1,1),ROW(A1)-1)

という数式を入れて、セルの書式設定の表示形式はユーザー定義から
gge年m月
としておきます。

これをオートフィルで下へコピーではどうでしょうか?

尚、EDATE関数を使用するに当たって、当方使用のExcel2003以前のバージョンだと、
メニュー → ツール → アドイン から「分析ツール」にチェックを入れておく必要があります。

以上、参考になれば良いのですが
的外れならごめんなさいね。m(__)m
    • good
    • 0

セルの書式設定で、ユーザ定義を選んで、


[$-411]ggge"年"m"月"
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qエクセルで年月を連続で表示させる関数

エクセルの関数については簡単なものしかわからない者です。

実は、借入金の支払予定表というかシミュレーションをしようと思いその表を作成しているのですが、借入実行月や返済回数等を入力した時点で金利と元金の返済予定を数十ヵ月にわたり表示させたいのです。

調べたところ「=DATE(YEAR(A1),MONTH(A1)+1,DAY(A1))」という計算式で表示できることがわかりました。

ところが確かに今年については
 2013/10
 2013/11
 2013/12
と表示されるのですが、年が変わると
 #NUM!
#NUM!

とエラー表示になってしまいます。

これがきちんと 2014/01、2014/02..2020/01...と連続した年月が表示されるようにできないものでしょうか?

ご指導よろしくお願いします。

Aベストアンサー

こんばんは!
横からお邪魔します。

すでに色々な方から回答されていますが、どれもちゃんと表示されると思います。
しかし、お礼欄を拝見すると解決していないようなので・・・

別案です。
仮にA1セル以降に表示させるとします。
A列すべてを範囲指定 → 右クリック → セルの書式設定 → 表示形式 → ユーザー定義
→ G/標準 となっているところを消して
yyyy/mm
と入力しOK

A1セルに
2013/1 と入力しておきます。
A2セルに
=EDATE(A1,1)
という数式を入れオートフィルでずぃ~~~!っと下へコピーしてみてください。

※ Excel2003までのバージョンの場合、EDATE関数を使用するにあたり
メニュー → ツール → アドイン → 「分析ツール」にチェックを入れておく必要があります。m(_ _)m

Qエクセルで年、月をカウントする

皆さんこんにちは。
エクセルに関して2つの質問があります。

【1】
   A    B
1  山田  2003/10/5
2  佐藤  2003/11/6
3  鈴木  2005/7/22
4  岡田  2006/2/9
5  松本  2006/4/4   

とあるとき
2003年のセルはいくつあるか? ~
2006年のセルはいくつあるか?
という年別での個数を C1 に出したいのです。
日付の表示はyyyy/mm/ddでお願いします。

また
2003年1月のセルはいくつあるか? ~
2003年2月のセルはいくつあるか?
など月別も D1 に出したいです。

C1、D1にどんな数式を入れればカウントできるでしょうか?

【2】
上記の場合、B列に並ぶyyyy/mm/ddの中から『オートフィルタ』を使い
2003年をすべて 2003年1月をすべて
を出すとき、「オプションの抽出条件の指定」は
何を指定すればよいのでしょうか?

解法をご教示ください。マクロは分かりません。
どうぞよろしくお願い致します。

皆さんこんにちは。
エクセルに関して2つの質問があります。

【1】
   A    B
1  山田  2003/10/5
2  佐藤  2003/11/6
3  鈴木  2005/7/22
4  岡田  2006/2/9
5  松本  2006/4/4   

とあるとき
2003年のセルはいくつあるか? ~
2006年のセルはいくつあるか?
という年別での個数を C1 に出したいのです。
日付の表示はyyyy/mm/ddでお願いします。

また
2003年1月のセルはいくつあるか? ~
2003年2月のセルはいくつあるか?
など月別も D1 に出したいです。
...続きを読む

Aベストアンサー

【1】2006年の個数をカウント
=SUMPRODUCT((TEXT(A1:A100,"YYYY")="2006")*1)
または
=SUMPRODUCT((YEAR(A1:A100)=2006)*1)

2006年2月の個数をカウント
=SUMPRODUCT((TEXT(A1:A100,"YYYY/MM")="2006/02")*1)
=SUMPRODUCT((YEAR(A1:A100)=2006)*(MONTH(A1:A100)=2)*1)

QExcelで日別に入力されたデータを月別に集計するにはどうしたらいいのでしょうか。

Excelで月別の集計をしたいのですが
例えば
  日付    数量
10月25日  200
10月27日  150
10月30日  120
11月 1日  200
11月 3日  150
のように、日付が飛び飛びで連続していなくい日々の数量を、上の行から順番に入力していった場合に(月が替わる行が決まっていない)月別の集計を取る方法はないでしょうか。


 

Aベストアンサー

どのように集計する月を指定するのかが書かれていませんが、例えば11月分の合計を出したいなら

1)11月までの合計から10月までの合計を引く方法
 =SUMIF(A:A,"<=11/30",B:B)-SUMIF(A:A,"<=10/31",B:B)

2)月が「11」のB列を合計する方法
 =SUMPRODUCT((MONTH(A2:A100)=11)*(B2:B100))

なども考えられます。

でもエクセルなら一番オーソドックスな方法はピボットテーブルでしょう。C列に
 =TEXT(A1,"YYYY/MM")
で「2008/11」のような文字列を生成しておいてピボットテーブルで集計すれば、シート上にある全ての月の合計が一発で求められます。
ピボットテーブルの使い方はGoogleなどで検索したらたくさん見つかります
http://www.viplt.ne.jp/tomy/pibot.html

QVBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。

マクロを含むエクセル(EXCEL2000)をHTMLのページからハイパーリンクで呼び出しています。そのエクセルでボタン操作に従い罫線やセルの着色を行っています。しかし、着色結果が更新されません。スクロールバー等で画面を移動すると正しく着色されています。このエクセルを通常に起動した場合は、問題なく動作するのですが、シート全体を更新する方法を教えて下さい。
各関数では、以下のスクリーンアップデータの処理を入れています。
Application.ScreenUpdating = False
    (処理)
Application.ScreenUpdating = False

Aベストアンサー

たぶん、EXCEL独特の問題だと思うのですが、HTML の場合、すでに色の部分を表面上で使用しているので、それでメモリが占有させているのではないかと私は思っています。

他にも、

 ActiveWorkbook.HTMLProject.RefreshDocument True

というのがありますね。
ホスト アプリケーション内のブックに含まれる HTML プロジェクトを更新する、というのがありますね。

Qエクセルで、条件に一致した行を別のセルに抜き出す方法

エクセルで、指定した条件に一致するセルを含む行をすべて抜き出す方法が知りたいです。

たとえば、

<A列> <B列> <C列>
7/1 りんご 100円
7/2 ぶどう 200円
7/2 すいか 300円
7/3 みかん 100円

このような表があって、100円を含む行をそのままの形で、
別のセル(同じシート内)に抜き出したいのですが。

7/1 りんご 100円
7/3 みかん 100円

抽出するだけならオートフィルターでもできますが、
抽出結果を自動的に、別の場所に、常に表示させておきたいのです。

初歩的な質問だと思いますが、検索しても分からなかったので、よろしくお願いします。

Aベストアンサー

同じ質問が結構よく出てますが、そんなに初歩的でもありません
別シートのA1セルに「100円」と入力し、そのシートの任意のセルに以下の式を貼り付けて下さい。後は、下方向、右方向にコピー。
日付のセル書式は「日付」形式に再設定してください

=IF(COUNTIF(Sheet1!$C:$C,$A$1)>=ROW(A1),INDEX(Sheet1!A:A,LARGE(INDEX((Sheet1!$C$1:$C$500=$A$1)*ROW(Sheet1!$C$1:$C$500),),COUNTIF(Sheet1!$C:$C,$A$1)-ROW(A1)+1)),"")

データ範囲は500行までとしていますが、必要に応じて変更して下さい

Qエクセルで特定の列にある日付データの中から、指定した日付範囲を抽出する方法を教えてください

例えばこんなデータなのですが、

2002/07/01 99 25 36
2002/07/05 55 33 25
2002/08/01 80 20 51

日付の入っている列を検索して、2002/07/01から2002/07/31
の範囲ならば、その行のデータを別のシートに抽出したいのですが、
日付の範囲は関数でどうすればよいのか分かりません。ACCESSなら
between 9999/99/99 and 9999/99/99って感じで簡単にできるの
ですが。。。エクセルの関数だとIF関数の論理式にAND関数を使って
>=2002/07/01
<=2002/07/31
と入力したので、2002/07/05ならば、いずれもTRUEなので、値を返して
くれると考えたのですが、なぜかダメでした。
(↓こういう入力をしました)
=IF(AND(Sheet2!A1>=2002/7/1,Sheet2!A1<=2002/7/31),Sheet2!A1,"該当月ありません")

Aベストアンサー

こんばんは!

=IF(AND(Sheet2!A1>=2002/7/1,Sheet2!A1<=2002/7/31),Sheet2!A1,"該当月ありません")

おしいですね(^^;
日付をそのまま入力してしまうと数式上では
 2002/7/31 → 2002÷7÷31 になってしまいます。
ダブルクォーテーションで括って(文字列)入力して
それを数値化しましょう!

=IF(AND(Sheet2!A1>="2002/7/1"*1,Sheet2!A1<="2002/7/31"*1),Sheet2!A1,"該当月ありません")

文字列 ="10" に対して 乗算 *1 としても数式が
なり立ち文字列の数字が数値化されます。="10"*1

------------余談--------------------------
ご質問の条件例の場合特例で 2002/7でればOKなので

=IF(TEXT(Sheet2!A1,"yyyym")="20027",Sheet2!A1,"該当月ありません")

でも可能ですね!

こんばんは!

=IF(AND(Sheet2!A1>=2002/7/1,Sheet2!A1<=2002/7/31),Sheet2!A1,"該当月ありません")

おしいですね(^^;
日付をそのまま入力してしまうと数式上では
 2002/7/31 → 2002÷7÷31 になってしまいます。
ダブルクォーテーションで括って(文字列)入力して
それを数値化しましょう!

=IF(AND(Sheet2!A1>="2002/7/1"*1,Sheet2!A1<="2002/7/31"*1),Sheet2!A1,"該当月ありません")

文字列 ="10" に対して 乗算 *1 としても数式が
なり立ち文字列の数字が数値化されます。="10"*1

--...続きを読む

Q見積書をエクセルで作成時に連番をふりたい。

見積書をエクセルで作成しています、セルに見積書番号を付けたいのですが自動で連番を書き込む事はできますか?
見積書のエクセルファイルを開いたときに番号が1つ増えて番号が記入されていく様にしたいと思っています。

Aベストアンサー

VBAになりますね。

Private Sub Workbook_Open()
Sheets("見積書").Cells(1, 1) = Sheets("見積書").Cells(1, 1) + 1
End Sub

これでA1に連番がはいります。

Qエクセルで特定の行を削除したいのですが。

エクセルで特定の行を一発で削除したいのですが、やり方がわかりません。
どなたか詳しい方お教えいただけませんでしょうか?

やりたいことは、B列に、特定の文字が有れば、その行全部を削除して上方向にシフトしていきたいのですが、マクロとかを使うのでしょうか?
宜しくお願いいたします。

Aベストアンサー

マクロを使う別の方法です。
XXXの部分を特定の文字に置きかえて実行してください。
また、「特定の文字があれば」というのが、その文字列を含む、というのでなくセルの値がその文字列ならば、というのであれば、LookAt:=xlPart の部分を LookAt:=xlWhole に書き換えてください。

Sub DelLines()
  Dim R As Range
  Do
    Set R = ActiveSheet.Range("B:B").Find(What:="XXX", LookAt:=xlPart)
    If R Is Nothing Then Exit Sub
    R.EntireRow.Delete
  Loop
End Sub

Qエクセルでの指定文字 カウントについて

エクセルで並んだデータでの指定した名前だけの個数をカウントするにはどうすればいいのでしょうか?

山田 高橋 佐藤
高橋 梅田 赤田
 西 山田 梅田
佐藤 山田 梅田

名前が並んだデータで「高橋」という名前が何個あるのかをカウントしたいのですがどうすればいいのでしょうか?

Aベストアンサー

 データは入力されているセルの範囲を「A1:C4」とすれば、

=COUNTIF(A1:C4,"高橋")

Qエクセルでその月ごとにカウントしたいのですが。。。

たとえばこんな感じでエクセルの表があるんですが
B10に今の月が2月の時は「2」と,3月だとすれば「4」件とカウントして表示したいのですが、可能でしょうか?
A B
1 1/1
2 1/2
3 1/3
4 2/2
5 2/5
6 3/5
7 3/6
8 3/7
9 3/8
10 4

Aベストアンサー

こんにちは

=SUMPRODUCT(1*(TEXT(B1:B9,"yyyymm")=TEXT(TODAY(),"yyyymm")))
てな感じ


人気Q&Aランキング