No.4ベストアンサー
- 回答日時:
例データ(A、B列が元データ)
A列 B列 C列
1600160 <--第2行目から始めること
2300230
3600360
・・・
C列の式は =TRIM(TEXT(A2,"000")&TEXT(B2*10,"00"))
A列やB列はその桁数によってTextの書式000などを適当な桁数にしていしてください。データに小数点があれば、整数になるよう10の整数乗をかけて整数化してください。
ーー
A,B列で
散布図のグラフを描き、データラベルをありにする。
コードはSheet1のSelectionChangeを使う。
Sheet1のタブ部を右クリックし出てきた「コードの表示」をクリック。それで出てきたVBEに下記をコピペする。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
If mr = "" Then GoTo p1
MsgBox mr
ActiveSheet.ChartObjects(1).Activate
ActiveChart.SeriesCollection(1).Points(mr).DataLabel.Select
Selection.Interior.ColorIndex = xlNone
'--
p1:
'x = Trim(Format(Range("e1"), "000") & Format(Range("f1") * 10, "00"))
x = Cells(Target.Row, 3)
MsgBox x
'---
Range("c2:c30").Find(What:=x, LookIn:=xlValues, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
r = ActiveCell.Row
MsgBox "行" & r
'---
ActiveSheet.ChartObjects(1).Activate
ActiveChart.SeriesCollection(1).Points(r - 1).DataLabel.Select
Selection.Interior.ColorIndex = 5
mr = r - 1
ext:
Application.EnableEvents = True
End Sub
ーーーーーー
グラフ上で、見つけたい、当該のデータ行をクリック。
するとその行のデータのラベル部分が色がつく。
他の行をクリックするとまえのものの色h消え、今回選択したその行のデータのラベル部分が色がつく
===
苦労したが、もしエラーが起こると、質問者でコードを修正してもらえないだろうから、エラーが出たら、上記回答は捨ててください。
Msgbox のコード行は抹消してもらってもよい。
No.3
- 回答日時:
特異な作業だと思います。
目的はなんですか?
セル番地を知ってどうするのですか?
とりあえず、該当セルを選択するマクロを組んでみました。
プロットされたマーカーをひとつだけ選択しておいてマクロを実行してください。
マーカーを2回クリックすればひとつだけ選択できます。
Sub Test1()
Dim myPoint As Point
Dim myFormula As String
Dim myPDLname As String
Dim myWsName As String
Dim x As String
Dim y As String
Dim n As Integer
If TypeName(Selection) <> "Point" Then Exit Sub
If TypeName(Selection) = "Point" Then
Set myPoint = Selection
myFormula = myPoint.Parent.Formula
With myPoint
.HasDataLabel = True
myPDLname = myPoint.DataLabel.Name
.HasDataLabel = False
End With
n = Split(myPDLname, "P")(1)
x = Split(myFormula, ",")(1)
y = Split(myFormula, ",")(2)
myWsName = Split(x, "!")(0)
End If
MsgBox myWsName & "!" & Range(x)(n).Address & ":" & Range(y)(n).Address
Sheets(myWsName).Select
Sheets(myWsName).Range(Range(x)(n), Range(y)(n)).Select
End Sub
No.1
- 回答日時:
どのセルに対応しているかが直ちにわかるようにはできないでしょう。
プロットの点で右クリックして「データラベルの追加」を選択することで数値が表示されますね。
その数値をもとにセルを探すことになるでしょう。
そのためには「ホーム」タブの「検索と選択」をクリックして「検索」を選択し「検索する文字列」にグラフで表示された数値を入力して「すべて検索」を選択すればそのデータのセルが選ばれるでしょう。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
初めて自分の家と他人の家が違う、と意識した時
子供の頃、友達の家に行くと「なんか自分の家と匂いが違うな?」って思いませんでしたか?
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
エクセルグラフからセルを特定する方法
Excel(エクセル)
-
エクセルのグラフで値を求める方法
Excel(エクセル)
-
エクセル グラフはあるけれどデータがないBOOKにおいて、データを抽出することは出来ますか?
Excel(エクセル)
-
-
4
VBA 散布図の点の元セルを取得したい
Excel(エクセル)
-
5
グラフのX,Y座標を取得したい
Excel(エクセル)
-
6
エクセルのグラフ読み取りについて
その他(Microsoft Office)
-
7
Excel2010 グラフの元データを表示するには
その他(Microsoft Office)
-
8
EXCEL グラフ 散布図の数値取得
Excel(エクセル)
-
9
エクセルの散布図のX軸に文字を表示したいのですが、どうしたらよいのでしょうか?
Excel(エクセル)
-
10
Excel VBAでグラフをクリックした時走るイベントありますか?
その他(プログラミング・Web制作)
-
11
Wordでこのような三角が出てくるようになってしまったのですがどうやったら消せますか?
Word(ワード)
-
12
グラフ要素のセルを参照したいのですが・・・
Visual Basic(VBA)
-
13
Excel MATCH関数で検索範囲内に同じ値の検索値が複数ある場合
Access(アクセス)
-
14
標準曲線から座標を求めるには…
Excel(エクセル)
-
15
手軽に曲線の平滑化をしたい
Excel(エクセル)
-
16
エクセルにおける、グラフの指数表示に関して
Excel(エクセル)
-
17
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
18
Excelの近似曲線で外れ値(異常値)を除外したい
Excel(エクセル)
-
19
EXCELで式からグラフを描くには?
Excel(エクセル)
-
20
エクセルで、重力加速度
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで特定の文字列が入っ...
-
[EXCEL]ボタン押す→時刻が表に...
-
エクセル マクロで数値が変っ...
-
特定の文字がある行以外を削除...
-
エクセルのセルに指定画像(.jpg...
-
【Excel関数】UNIQUE関数で"0"...
-
Excel グラフのプロットからデ...
-
VBAで色の付いているセルの行削除
-
Excel2007で、指定範囲の行高さ...
-
Excel ウインドウ枠の固定をす...
-
EXCEL 「最後のセル」のリセット
-
セルの色によって条件文をつけ...
-
完全一致したら代入するマクロ...
-
エクセル 上下で列幅を変えるには
-
excelのデータで色つき行の抽出...
-
アクティブになっている行をマ...
-
excel 同じ番号のデーターを横...
-
電話番号の入力方式が違うデー...
-
Excelでカタカナ・ひらがな・英...
-
エクセルマクロで偶数行(又は...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで特定の文字列が入っ...
-
【Excel関数】UNIQUE関数で"0"...
-
特定の文字がある行以外を削除...
-
エクセル マクロ オートフィ...
-
[EXCEL]ボタン押す→時刻が表に...
-
AのセルとB行を比較して、一致...
-
VBAで色の付いているセルの行削除
-
Excel グラフのプロットからデ...
-
エクセル マクロで数値が変っ...
-
excel 小さすぎて見えないセル...
-
エクセル 上下で列幅を変えるには
-
罫線の斜線を自動で引くマクロ
-
結合されたセルをプルダウンの...
-
セルの色によって条件文をつけ...
-
エクセルのマクロで意図しない...
-
エクセルVBA 最終行を選んで並...
-
excelのデータで色つき行の抽出...
-
Excelのフィルター後の一番上の...
-
エクセル 時間の表示形式AM/PM...
-
Excelでカタカナ・ひらがな・英...
おすすめ情報