No.5
- 回答日時:
表示方法の問題ではなく、データ数の問題だったようですね。
日付が無い箇所に自動的に必要数の空白行を挿入します。
日付が入力された列の、一番上の日付を選択状態にして実行します
標準モジュールに貼り付けて下さい。
Public Sub InsertRow()
Dim col As Integer '日付のある列
Dim rw As Long, rwStart As Long, rwMax As Long '行カウンタ、最初と最後の行
rwStart = Selection.Row '日付の最初の行
col = Selection.Column '日付のある列
'空白行があったら面倒なので、あったら削除して詰めてしまう
rwMax = Cells(65536, col).End(xlUp).Row '最終行
For rw = rwMax To rwStart Step -1
'そのセルに入力がなければ行を削除する。最終行から上に向かって実行
If Cells(rw, col) = "" Then
Rows(rw).Delete '削除
End If
Next
'空いた日付分の空白行を挿入する
Dim rwSpc As Integer, rwIns As Integer '挿入する行数とカウンタ
rwMax = Cells(65536, col).End(xlUp).Row '再計算した最終行
For rw = rwMax To rwStart + 1 Step -1
'上のセルとの日付の差を計算。最終行から上に向かって実行
rwSpc = Cells(rw, col) - Cells(rw - 1, col)
If rwSpc > 1 Then
'日付が2日以上空いていたら『空いた日付-1』行を挿入
For rwIns = 1 To rwSpc - 1
Rows(rw).Insert '挿入
Next
End If
Next
End Sub
この回答へのお礼
お礼日時:2002/02/06 21:48
回答ありがとうございます
質問の回答としてはNo6のようなことになってしまいましたが
このマクロはほかの事でも色々と応用ができそうです
No.4
- 回答日時:
こんばんは!
>1/1 1/2 1/4
この入力は文字になっているのでしょうか
それとも日付(数式バーには 2002/1/1と表示されます)
となっているのでしょうか!
日付となっていれば
通常でもX軸は時系列になると思いますが、項目になって
いるようなら
・余白上で右クリック グラフオプション
・軸タブ X/項目軸 時系列 にチェック
・X軸の文字上でダブルクリック
表示形式タブ 日付 3月14日
目盛タブ 日付の表示間隔を指定
・もし間隔内に消したい日付が有る場合
表示形式タブ ユーザー定義
[=37259]"";[=37262];m"月"d"日"
のような指定で2ヶ所までは非表示可能です
[=数値]"";[=数値];m"月"d"日"
数値は、日付のシリアル値で、値を確認するには
適当なセルに日付を入力して、表示形式 標準
にしてみて下さい!
No.3
- 回答日時:
たぶん、横軸を日付にしたいのですね。
このばあい、折れ線グラフみたいのを作られると仮定します。
A列に日付を入力し、B列には数値を入力する時、
A列の一番最初に「1」と言う数字を入れて
右クリックの「セルの書式」から「表示形式」「日付」を選択すると、「1997/3/4」のような表示が種類の欄にあって、それ選択するとサンプルが「1900/1/1」になります。
それでOKを選択してください。
すると、セルには「1900/1/1」と表示されます。
ここで必要な西暦はこのセルの中で変更してください。
A列の日付はこのセルを選択したまま下にドラッグすれば
出てきます。不必要な日付は行ごと削除してください。
あとは数値を入れてみてください。
それで、入力したセルを全て選択してグラフウィザードのグラフの種類から、折れ線または散布図を選択すればできます。
A列の表示が西暦のあるのがいやなら、「セルの書式」から「表示形式」「日付」で「1/1」という種類を選択してください。
なお、ここで「表示形式」「標準」または「数値」を選択
すると、「1900/1/1」からのカウント数値になります。
ここが、日付が飛び飛びになっている場合のグラフを作成する時のミソです。
この回答へのお礼
お礼日時:2002/02/06 21:45
回答ありがとうございます
でも・・・ 私の理解力のせいかおっしゃってることがよくわかりません
日付を表示させ不必要なとこを削除するのと
日付を普通に入力するので何が違うのか理解できません
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelグラフについて 1 2022/06/16 16:06
- Excel(エクセル) Excelで日付のグラフへの表示 2 2022/04/15 11:04
- Access(アクセス) アクセス 有効なフィールド名、または式として認識できませんのエラー 3 2022/08/19 11:53
- Excel(エクセル) エクセルの大きなシートでグラフを見つける 4 2022/07/28 10:07
- 数学 「f(x)とg(x)のグラフで囲まれた面積を求めよ」 という積分の面積を求める典型問題がありますが、 7 2023/06/09 01:16
- 数学 微分の問題です 1 2022/07/31 11:15
- Excel(エクセル) Excel2010 グラフ 横軸目盛線の間隔変更 1 2023/05/09 11:47
- 数学 高校数学で質問があります。 2 2023/02/13 15:49
- Excel(エクセル) Excel 散布図グラフ 外れ値 セル番地参照方法 4 2022/04/19 18:56
- Excel(エクセル) <スプレッドシート>採用進捗 グラフ作成について 3 2022/10/23 15:52
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
31:30:00が1900/1/1 7:30:0
-
入力後に日付順になるように自...
-
Excelで半年後の日付を計算したい
-
エクセルのセルにカレンダーを...
-
エクセルでENTERを押すと数式が...
-
エクセル関数で日付かどうかの...
-
日付だけを変更して印刷(Excel)
-
Excelで8/26等の日付を全てその...
-
ファイルのオープン時に今日の...
-
エクセルで数字列の間に『/』を...
-
日付入力→指定のセルの色を塗り...
-
Excelで更新日時と更新者を表示...
-
【エクセル】日付を表示させた...
-
エクセル 当番表の作り方 エク...
-
日付を入力したセルをファイル...
-
Excelで、年だけの「西暦」から...
-
エクセルのセルにたとえば「756...
-
エクセルで日付入力欄を作成し...
-
☆Excelエクセルで入力した日の...
-
Excelに入力した個々の日付の数...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
31:30:00が1900/1/1 7:30:0
-
日付だけを変更して印刷(Excel)
-
入力後に日付順になるように自...
-
Excelで半年後の日付を計算したい
-
エクセルでENTERを押すと数式が...
-
エクセルで数字列の間に『/』を...
-
エクセルのセルにカレンダーを...
-
エクセル 当番表の作り方 エク...
-
エクセル関数で日付かどうかの...
-
Excelで、年だけの「西暦」から...
-
ファイルのオープン時に今日の...
-
Excelで8/26等の日付を全てその...
-
日付入力→指定のセルの色を塗り...
-
エクセルで日付入力欄を作成し...
-
☆Excelエクセルで入力した日の...
-
EXCELで直近の日付を抽出する関数
-
日付を入力したセルをファイル...
-
◆ EXCEL自動入力日付を自動で...
-
ワード差込について
-
WORDで翌日や翌々日の日付を表...
おすすめ情報