• ベストアンサー

ExcelVBAで201411表示を1月ずつ増加

Chiquilinの回答

  • Chiquilin
  • ベストアンサー率30% (94/306)
回答No.5

> ブック名は「いいいい2014-11月.xlsm」とします。ここから、「ああああ201411」に > 変えることは可能でしょうか?無理ならやはりVBAかもしくはブック名を変えること > も検討します。 ="ああああ"&TEXT(REPLACE(LEFT(CELL("filename",G1),FIND("]",CELL("filename",G1))-7),1,FIND("[",CELL("filename",G1))+4,""),"yyyymm") これでどうでしょうか。 > 今の形でやるにしても 先に書いた数式の「+ROW(A1)-1」のところを > 「+1」にしてマクロに組み込めば 年越しにも対応しますよ。 については数式をそのまま使えばいいのではないかという意味です。 Range("A1") = "=""ああああ""&TEXT(DATE(2014,11+1,1),""yyyymm"")" Range("A1") = Range("A1") 例えばですけど。

hinoki24
質問者

お礼

関数の方はばっちりでした。どうもありがとうございます。 マクロの方は参考になりました。ありがとうございます。

関連するQ&A

  • エクセルvbaで月と文字の組み合わせで月を進める

    vbaで月を進めたいのですが、文字と組み合わせると「型が一致しません」というエラーが出ます。 どうすればよいですか? 下記コードでは、 & s1 という部分がなければvba実行の度に1~12を順番に繰り返します。 しかし、文字と組み合わせるとエラーになります。セルの書式設定と組み合わせればやりたいことは実現できますが、vbaのみで行うには、下記のどこを修正すればよいでしょうか? よろしくお願いいたします。 Sub 月を進める() Dim s1 As String s1 = "月" Range("A1") = Format(DateAdd("M", 1, Format(Left(Range("A1").Value, 2), "0-00")), "m") & s1 End Sub

  • ExcelVBAを使った日付の求め方

    ExcelVBAでの質問です。 セルA1に日付2005/07/25と入力されています。 セルB1にその一年後を求めた値を返したいのです。 通常では =DATE(YEAR(A1)+1,MONTH(A1),DAY(A1)) の式で求める事が出来るのですが、VBAで書こうとするとエラーがでてしまいます。 どのようにすれば良いか教えてください。 ※VBAについては殆ど初心者の為、詳しく教えて頂けると有難いです。 宜しくお願いいたします。

  • 月カレンダー作成中。文字の色を変えたい…

    よろしくお願いします。エクセル2010バージョンです。 月カレンダーを作成しています。セルに日付を入力(たとえば2012/08/30)と入力したのち、 カレンダー内の日にち(数字1~31)の文字色を土曜日・日曜日のみ赤に変える手法を教えてください。 セル内の背景色を変えるのではなく、文字の色を赤にしてみたいのです。 ところが、条件付き書式の設定がわからずここで止まってしまいました。 なおカレンダー日付の月初1(日)を表示するセルには、=IF(A1="","",A1) と入力しています。 A1に日付を入力。 カレンダー日付の翌日2(日)は、=IF(A4="","",IF(DAY(A4+1)=1,"",A4+1)) と入力しています。 A4は 日付の1(日)を表示しているセルです。 このように3(日)、4(日)・・・とコピペで作成しています。 ところが、条件付き書式の設定をどのようにするかで止まっています。 条件付き書式の部分をどのように設定したらいいか、ご教示下さい。 この条件書式の設定がどうも苦手なので、この部分は一手一手わかりやすく教えていただければ嬉しいです。 よろしくお願いします。

  • エクセルで日付+時刻の手入力について

    エクセルで通常、キーボードから 2011/12/15 12:15:17 と入力すればエクセルが日付+時刻の入力だと判断し、シリアル値として扱われます(セルの書式設定から標準で見るとシリアル値になる) 質問:会社のパソコンで20台ためしてみたのですが、1台だけ文字として認識されてしまうパソコンがあります。 このパソコンも日付だけもしくは時刻だけならシリアル値として扱ってくれるのですが日付+時刻の場合だけ文字として認識してしまいます。 バージョンは2003です。 どこか設定が必要なのでしょうか? すみませんが、教えて下さい。

  • エクセル 条件付書式の設定

    セルA1、B1、C1、D1を使用します。 セルA1には4桁の番号を入力するものとします。 セルB1、C1、D1には日付を入力するものします。 【1】セルB1に日付を入力すると、セルA1の文字色が赤になるよう設定。     →これは自力で「条件付き書式」で設定できます。 【2】セルB1とC1に日付を入力すると、セルA1の文字色が青になるよう設定。 【3】セルB1とC1とD1に日付を入力すると、セルA1の文字色が緑になるよう設定。 上でも書きましたが、【1】の設定は条件付き書式で設定できました。 【2】、【3】についての設定が、上手くできず困っております。 【1】の設定を条件付き書式にて設定しましたので、【2】、【3】についても できれば条件付き書式で設定したいと思いますので、 可能であれば設定方法を教えてください。 条件付き書式で設定不可能であれば、他の設定方法をご存知であれば 教えてください。 よろしくおねがいします。

  • EXCELでの日付表示で

    EXCELで日付表示する際に、「0208」と入れたら「2/8」となるようにしたいのですが、 「セルの書式設定」の「ユーザー定義」や「日付」では西暦から入力しないと 「2/8」のようにはなりません。 それも「2005/02/08」と入力して初めて「2/8」となるのなら 初めから「2/8」と直接入力した方が早いです。 要は「/」(スラッシュ)をイチイチ入力したくないので、 「0208」→「2/8」となるようにしたいのですが、その場合 どういう書式設定をすればいいのでしょうか? もしかすると、日付というより文字列として考えた方がいいのかも しれませんが、分かる方教えて下さい。

  • 20030203と入力して、平成15年02月03日と表示させたい。 

    エクセル2000の日付の入力と表示について セルに、 20030203 と入力して、 平成15年02月03日 と表示させるには、 「セルの書式設定」をどのようにしたら良いのでしょうか。 よろしくお願いします。

  • Excel2000でのセルの書式設定

    Excel2000でセルに年月日を入力すると、セルを日付に書式設定していないのに、日付に設定され、そのあと標準にもどしてもシリアル値で表現されてしまいます。 セルの書式設定が自動でなされないようにする方法はあるのでしょうか? 'を使えば標準のままでいることは、知っているのですが、書式設定が変わらないほうが便利なのですが…。

  • ExcelVBA セル日付書式を標準に変換したい。

    お世話になります。 「標準書式」の日付データを、「平成25年04月29日」型式に変換して別のセルに保存すると「日付書式」になりました。 この和暦データを手動でコピー&ペーストしようとすると日付が一度、西暦に変換されるので、使い勝手がよくありません。 VBAでこの「日付書式」の和暦を、「標準書式」に変換するにはどうすればよいでしょうか? 「標準書式」セルに和暦を入力した時は、書式はそのままなので、同じ様になればとは思っています。

  • 日付表示で「1/0」となることで

    例えばsheet1のA1セルで2003/6/11と入力し6/11と表示させる書式を設定しています。これをsheet2のA1セルに(=sheet1!A1)と設定し、sheet1の日付表示を転写させる設定をしている場合に、日付を入れている場合はそのまま転写されるのですが、sheet1のセルが無入力の場合にsheet2のセルに1/0と表示されてしまいます。この1/0の表示をsheet1が無入力の時にはsheet2にも空欄にしたいのですが、どのように設定すればよいのでしょうか。助けてください。