エクセル散布図グラフで値が未記入のセルを飛ばして、
その前後の値間で線を引く方法が確かあったように記憶しているのですが
忘れてしまいました。
空白セルに何か記号を入れたらよかったような気がするのですが。

このQ&Aに関連する最新のQ&A

A 回答 (1件)

こんにちは!



>未記入のセルを飛ばして
完全な空白であれば、グラフを選択後 
 メニューの ツール オプション グラフタブ
 空白セルのプロット 「補完してプロット」

数式で=""等が入っているデータ値の場合
 =NA() でOKです。
    • good
    • 0

このQ&Aに関連する人気のQ&A

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

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

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

Q入力セルが空白の時 隣りと隣のセル(こちらも入力セル)を空白にできるかどうか?

こういったことできないでしょうか。

 A1  B2  C3
9:00  ~  10:00 と場合に

A1とC3に直接値を入力しています。

A1セルに値がはいらないとき B2のチルダも C3の値も 空白になってくれると
よいなと思うのですが 良い方法はありますでしょうか。

ご存知の方ご教示いただければ助かります。

Aベストアンサー

こんばんは!

>C3のセルのことを B2に入力した式で
>管理できないかと思っているのですが・・・

関数では無理だと思います。
VBAになりますが一例です。

画面左下の操作したいシート見出し上で右クリック → コードの表示 → VBE画面のカーソルが点滅しているところに
↓のコードをコピー&ペースト → Excel画面に戻り(VBE画面を閉じて)
A1・C3セルにデータを入力してみてください。

Private Sub Worksheet_Change(ByVal Target As Range) '//この行から//
If Intersect(Target, Range("A1,C3")) Is Nothing Then Exit Sub
If Target.Count = 1 Then
With Target
If .Row = 1 Then
If .Value <> "" Then
If Range("C3") <> "" Then
Range("B2") = "~"
End If
Else
Range("B2,C3").ClearContents
End If
Else
If .Value <> "" Then
Range("B2") = "~"
Else
Range("B2").ClearContents
End If
End If
End With
End If
End Sub '//この行まで//

※ A1セルがC3セルより大きな値になった場合などの細かいエラー処理はしていません。

こんな感じをお望みなのでしょうか?m(_ _)m

こんばんは!

>C3のセルのことを B2に入力した式で
>管理できないかと思っているのですが・・・

関数では無理だと思います。
VBAになりますが一例です。

画面左下の操作したいシート見出し上で右クリック → コードの表示 → VBE画面のカーソルが点滅しているところに
↓のコードをコピー&ペースト → Excel画面に戻り(VBE画面を閉じて)
A1・C3セルにデータを入力してみてください。

Private Sub Worksheet_Change(ByVal Target As Range) '//この行から//
If Intersect(Target, Range("A1,C3")) ...続きを読む

Qマクロによって、既に値の入っているセルや空白のセルに値を追加して入れたい

こんにちは

宜しければお力をお貸しください。
A1などのセルにユーザー定義によって数字の1を(1)として入力してあり、B1も(2),C1が空白のセルだとします。

この時、A1:C1の範囲を選択しマクロを実行することで、A1=(1)①、B1=(2)②、C1=③と指定の範囲の既に入力されている値を変えずに追加で丸数字で連番を振る方法を教えて頂きたいです。

Aベストアンサー

No7です。
>条件2の設定で選択したセル1が”(2)”や”(3)”の時でも同様に(2)①、(3)①と表示されるのでしょうか?あまり詳しくないためバカなことを聞いていたらすみません…。

はい。そうなります。
以下のマクロを標準モジュールで登録し、実行してください。
---------------------------------------------------
Option Explicit

Public Sub Macro1()
Dim maru As Variant
maru = Array("○", "①", "②", "③", "④", "⑤", "⑥", "⑦", "⑧", "⑨", "⑩", "⑪", "⑫", "⑬", "⑭", "⑮", "⑯", "⑰", "⑱", "⑲", "⑳")
Dim sh1 As Worksheet
Dim shw As Worksheet
Dim sName As String
Dim sa As String
sName = ActiveSheet.Name '選択されているシート名
Set sh1 = Worksheets(sName) '選択されているシートをsh1で参照する
sa = Selection.Address '選択されたセル領域を取得
Worksheets.Add after:=Worksheets(Worksheets.Count) '作業用のシートを末尾に追加(作業完了後削除する)
Set shw = Worksheets(Worksheets.Count) '作業用のシートをshwで参照する
shw.Activate '作業用のシートをactivateする
Dim tmp As Variant
Dim i As Long
tmp = Split(sa, ",") 'セルは複数選択されているので","で分割する
For i = 0 To UBound(tmp)
Range(tmp(i)).Value = True '選択されたセルの該当箇所へTRUEを設定(但し作業用シートへ設定)
Next
ActiveCell.SpecialCells(xlLastCell).Select '選択されたセルの最後のセルへ移動
Dim row, col, endRow, endCol, ctr As Long
endRow = Selection.row '選択されたセルの最後のセルの行を取得
endCol = Selection.Column '選択されたセルの最後のセルのカラムを取得
ctr = 0
For row = 1 To endRow '1列から最後のセルの行まで繰り返し
For col = 1 To endCol '1カラムから最後のセルのカラムまで繰り返し
If Cells(row, col) = True Then '選択されたセルの位置なら
ctr = ctr + 1 '番号をカウントアップ
If ctr <= UBound(maru) Then '番号が20以内なら
If ctr = 1 Then '番号が1(先頭のセル)なら
sh1.Cells(row, col) = sh1.Cells(row, col) & maru(ctr) 'そのセルの内容+①を設定
Else
sh1.Cells(row, col) = maru(ctr) '②~⑳を設定
End If
Else
sh1.Cells(row, col) = maru(0) '番号が20を超えているので○を設定
End If
End If
Next
Next
Application.DisplayAlerts = False 'シート削除時の警告を出さないようにする
Worksheets(Worksheets.Count).Delete '作業用のシートを削除
Application.DisplayAlerts = True 'シート削除時の警告を出すようにする(元に戻す)
sh1.Activate '選択されたシートに戻す
End Sub
--------------------------------------------------------------
セルを選択した状態で、上記のマクロを実行してください。
セルの書式は標準にしておいてください。
選択したセルの最初のセルは(1)、(2)、(3)などの文字を格納しておいてください。
入力時、(1)と入力すると-1になってしまうので、'(1)と入力してください。
(1)の前にシングルクオート「'」を付けます。そうすれば、-1と表示されません。

No7です。
>条件2の設定で選択したセル1が”(2)”や”(3)”の時でも同様に(2)①、(3)①と表示されるのでしょうか?あまり詳しくないためバカなことを聞いていたらすみません…。

はい。そうなります。
以下のマクロを標準モジュールで登録し、実行してください。
---------------------------------------------------
Option Explicit

Public Sub Macro1()
Dim maru As Variant
maru = Array("○", "①", "②", "③", "④", "⑤", "⑥", "⑦", "⑧", "⑨", "⑩", "⑪", "⑫", "⑬", "⑭", "⑮", "⑯", "⑰", "⑱", "⑲", "⑳")...続きを読む

Qあるセルの値が空白の時は空白に

いつもお世話になります。
WINDOES XP EXCELL2003

G2のセルに下記の数式を入れています。
=SUM(B2*D2)

この時G2のセルに値が入力されていないと
#NAME?
と表示されます。
私の力で
=IF(=B2””,””,( =SUM(B2*D2))
としましたが
相変わらずうまく行きません。
G2に入力されていないときは値を返したくない数式をどうすればいいかご教授いただけませんか。
宜しくお願いします。

Aベストアンサー

=IF(B2="","",SUM(B2*D2))
ところでSUM(B2*D2)、というのはおかしな式です。ただのB2*D2(積)、かまたはSUM(B2:D2)(総和)、のまちがいでは?

Qエクセルで、ある列に不規則にある「連続した空白セルの最後尾セル」に空白の数を表示したい

エクセル(2003)を使ってます。

下のような表があるとします

   A       B
1  年月日  鈴木太郎
2  2008/1/1   鈴木
3  2008/1/2     
4  2008/1/3   鈴木
5  2008/1/4     
6  2008/1/5     
7  2008/1/6     
8  2008/1/7     
9  2008/1/8   鈴木

      ↓     


   A       B
1  年月日  鈴木太郎
2  2008/1/1   鈴木
3  2008/1/2    1
4  2008/1/3   鈴木
5  2008/1/4     
6  2008/1/5     
7  2008/1/6     
8  2008/1/7    4
9  2008/1/8   鈴木

B2~B9(実際にはB1500くらいまで…)の"鈴木"と"鈴木"の間にある連続した空白セルの
最後尾セルに空白の数を表示したいのです。
※ちなみにB列は同じ名前"鈴木"しか入ってません。

ご指導のほうよろしくお願いします。m(_ _)m

エクセル(2003)を使ってます。

下のような表があるとします

   A       B
1  年月日  鈴木太郎
2  2008/1/1   鈴木
3  2008/1/2     
4  2008/1/3   鈴木
5  2008/1/4     
6  2008/1/5     
7  2008/1/6     
8  2008/1/7     
9  2008/1/8   鈴木

      ↓     


   A       B
1  年月日  鈴木太郎
2  2008/1/1   鈴木
3  2008/1/2    1
4  2008/1/3   鈴木
5  2008...続きを読む

Aベストアンサー

とりあえず、今思い付いた内容を回答します。

「Sheet1」のシートが当質問の変換前の表であるものとします。

・「Sheet2」のシートを準備し、A1セルに下記式を入力後、「Sheet1」にデータがある範囲までA1の式を下及び右にコピーします。
 =IF(Sheet1!A2="","",ROW())

・「Sheet3」のシートを準備し、A1セルに下記式を入力後、「Sheet1」にデータがある範囲までA1の式を右にコピーします。
 =IF(Sheet1!A1="","",Sheet1!A1)

・「Sheet3」のA2セルに下記式を入力後、「Sheet1」にデータがある範囲までA2の式を下及び右にコピーします。
 =IF(Sheet1!A2="",IF(Sheet2!A2="","",Sheet2!A2-MAX(Sheet2!A$1:Sheet2!A1)-1),Sheet1!A2)

・「Sheet3」のA列の書式は、当該の日付形式に設定します。

「Sheet3」のシートが当質問の変換後の表になります。

こんな感じではいかがでしょうか。

とりあえず、今思い付いた内容を回答します。

「Sheet1」のシートが当質問の変換前の表であるものとします。

・「Sheet2」のシートを準備し、A1セルに下記式を入力後、「Sheet1」にデータがある範囲までA1の式を下及び右にコピーします。
 =IF(Sheet1!A2="","",ROW())

・「Sheet3」のシートを準備し、A1セルに下記式を入力後、「Sheet1」にデータがある範囲までA1の式を右にコピーします。
 =IF(Sheet1!A1="","",Sheet1!A1)

・「Sheet3」のA2セルに下記式を入力後、「Sheet1」にデータがある範囲...続きを読む

Qエクセルで空白のセルの場合は上のセルの値を入れて番号をふることはできますか?

またまた質問で申し訳ありません。
-----------------------------------
  A  B  C  D
1 12A
2
3 13A
4
5
------------------------------------
みたいな感じで飛んでいるセルに

  A  B  C  D
1 12A
2 12A_1
3 13A
4 13A_1
5 13A_2

-----------------------------------
上のように番号をふることは可能でしょうか?

Aベストアンサー

こんにちは!

B列に表示させるとします。
B1セルに
=IF(A1="",INDEX(A$1:A1,MAX(IF(A$1:A1<>"",ROW(A$1:A1))))&"_"&COUNTBLANK(INDIRECT("A"&MAX(IF(A$1:A1<>"",ROW(A$1:A1)))&":"&"A"&ROW())),A1)
配列数式ですので、Ctrl+Shift+Enterで確定!
フィルハンドルで下へコピーしてみてください。

※ もっと簡単にできる方法があればごめんなさいね。m(_ _)m


このカテゴリの人気Q&Aランキング

おすすめ情報