Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


9910 / 13644 ツリー ←次へ | 前へ→

【24784】グラフのタイトル チンプンカンプン 05/5/10(火) 15:38 質問[未読]
【24785】Re:グラフのタイトル タイトル 05/5/10(火) 15:48 回答[未読]
【24786】Re:グラフのタイトル チンプンカンプン 05/5/10(火) 16:14 質問[未読]
【24791】Re:グラフのタイトル チンプンカンプン 05/5/10(火) 20:06 発言[未読]
【24794】Re:グラフのタイトル つん 05/5/10(火) 20:38 回答[未読]
【24801】Re:グラフのタイトル hirop 05/5/11(水) 9:07 質問[未読]
【24802】Re:グラフのタイトル Jaka 05/5/11(水) 9:17 発言[未読]
【24804】Re:グラフのタイトル hirop 05/5/11(水) 9:41 質問[未読]
【24805】Re:グラフのタイトル つん 05/5/11(水) 9:49 発言[未読]
【24806】Re:グラフのタイトル つん 05/5/11(水) 9:58 発言[未読]
【24824】Re:グラフのタイトル Jaka 05/5/11(水) 12:35 発言[未読]
【24816】Re:グラフのタイトル hirop 05/5/11(水) 10:48 質問[未読]
【24817】Re:グラフのタイトル つん 05/5/11(水) 10:52 回答[未読]
【24818】Re:グラフのタイトル hirop 05/5/11(水) 10:57 質問[未読]
【24819】Re:グラフのタイトル Kein 05/5/11(水) 11:00 回答[未読]
【24820】Re:グラフのタイトル hirop 05/5/11(水) 11:07 お礼[未読]
【24795】Re:グラフのタイトル Kein 05/5/10(火) 20:39 回答[未読]

【24784】グラフのタイトル
質問  チンプンカンプン  - 05/5/10(火) 15:38 -

引用なし
パスワード
   グラフタイトルの一部にセルの文字列を表示するようにしたいのですが教えてください。
ちなみに下記マクロをどう変更すればよいのでしょうか?

.ChartTitle.Characters.Text = "○○○○△△○○"

ただし、△はセルの文字列。

回答をお願いします。

【24785】Re:グラフのタイトル
回答  タイトル  - 05/5/10(火) 15:48 -

引用なし
パスワード
   >.ChartTitle.Characters.Text = "○○○○△△○○"
.ChartTitle.Characters.Text = .Cells(a,b).value

【24786】Re:グラフのタイトル
質問  チンプンカンプン  - 05/5/10(火) 16:14 -

引用なし
パスワード
   ▼タイトル さん:
回答ありがとうございます。
教えていただいたやり方はあるセルの文字列をグラフタイトルにする方法であると解釈します。
しかし、私がやりたいやり方はグラフタイトルの中でセルの文字列とセル(シート)に存在しない文字が混在する場合のやり方です。
下の"○"はセル(シート)に存在しない文字、△はあるセルの文字列です。
回答をお願いします。

>>.ChartTitle.Characters.Text = "○○○○△△○○"
>.ChartTitle.Characters.Text = .Cells(a,b).value

【24791】Re:グラフのタイトル
発言  チンプンカンプン  - 05/5/10(火) 20:06 -

引用なし
パスワード
   誰か教えてください。

>▼タイトル さん:
>回答ありがとうございます。
>教えていただいたやり方はあるセルの文字列をグラフタイトルにする方法であると解釈します。
>しかし、私がやりたいやり方はグラフタイトルの中でセルの文字列とセル(シート)に存在しない文字が混在する場合のやり方です。
>下の"○"はセル(シート)に存在しない文字、△はあるセルの文字列です。
>回答をお願いします。
>
>>>.ChartTitle.Characters.Text = "○○○○△△○○"
>>.ChartTitle.Characters.Text = .Cells(a,b).value

【24794】Re:グラフのタイトル
回答  つん E-MAIL  - 05/5/10(火) 20:38 -

引用なし
パスワード
   >
>>>.ChartTitle.Characters.Text = "○○○○△△○○"
>>.ChartTitle.Characters.Text = .Cells(a,b).value

.ChartTitle.Characters.Text = "○○○○" & .Cells(a,b).Value & "○○"

かな

【24795】Re:グラフのタイトル
回答  Kein  - 05/5/10(火) 20:39 -

引用なし
パスワード
   >セルの文字列とセル(シート)に存在しない文字が混在する
.ChartTitle.Characters.Text = .Cells(a, b).Value & "文字列"

というように & で連結するだけです。コード内での文字列は "" で括ります。

【24801】Re:グラフのタイトル
質問  hirop  - 05/5/11(水) 9:07 -

引用なし
パスワード
   回答ありがとうございました。

.ChartTitle.Characters.Text = _
    "○○○" & Chr(10) & "○○○" & .Cells("G6").Value & "○○"
としましたが、コンパイラエラーが発生してしまいました。
どうしてでしょうか?

また、ご説明いただいた
.ChartTitle.Characters.Text = .Cells(a,b).value
の構文の中の(a,b)は何を表すのでしょうか?

回答をお願いします。

【24802】Re:グラフのタイトル
発言  Jaka  - 05/5/11(水) 9:17 -

引用なし
パスワード
   ヘルプより

Cells プロパティ

1 つのセルを取得するには、Cells(row, column) プロパティを使用します。引数 row には、行のインデックスを指定します。引数 column には、列のインデックスを指定します。次の使用例は、セル A1 の値に 24 を設定します。

尚、ChartTitle.Characters.Text に改行が使えるのかは未確認。

【24804】Re:グラフのタイトル
質問  hirop  - 05/5/11(水) 9:41 -

引用なし
パスワード
   Cellプロパティについては理解できました。
ありがとうございました。

.ChartTitle.Characters.Text = "○○○" & Chr(10) & "○○○" & .Cells(G6).Value & "○○"

の構文について、コンパイラエラーが発生してしまいます。
上の構文中の『G6』は特定のセルを表します。

どうしてコンパイラエラーが発生するのでしょうか?

【24805】Re:グラフのタイトル
発言  つん E-MAIL  - 05/5/11(水) 9:49 -

引用なし
パスワード
   おはようございます。

Jakaさん、フォローおおきに〜♪

>Cellプロパティについては理解できました。
>ありがとうございました。
>
> .ChartTitle.Characters.Text = "○○○" & Chr(10) & "○○○" & .Cells(G6).Value & "○○"
>
>の構文について、コンパイラエラーが発生してしまいます。
>上の構文中の『G6』は特定のセルを表します。

一度、Cellsプロパティ、Rangeプロパティをヘルプで調べて見てください。

【24806】Re:グラフのタイトル
発言  つん E-MAIL  - 05/5/11(水) 9:58 -

引用なし
パスワード
   Jaka さん〜
>尚、ChartTitle.Characters.Text に改行が使えるのかは未確認。

.ChartTitle.Characters.Text = "AAA" & vbLf & "bbb"

これで改行OKみたいです。
ちなみに、「vbCrLf」 だと2行分改行されて、「vbCr」でも1行改行。
セルだと、「vbLf」だけしかあかんかったよね?

【24816】Re:グラフのタイトル
質問  hirop  - 05/5/11(水) 10:48 -

引用なし
パスワード
   下記のように教えていただいたとおりのやってみたのですがエラーが発生します。

With ActiveChart
 .HasTitle = True
 .ChartTitle.Characters.Text = "○○" & .Cells(6, 7).Value & "○○"
 .Axes(xlCategory, xlPrimary).HasTitle = True
 .Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "aaa"
 .Axes(xlValue, xlPrimary).HasTitle = True
 .Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "bbb"
End With

ちなみにグラフタイトルには特定のセルの文字を入れたいのですが・・・。

【24817】Re:グラフのタイトル
回答  つん E-MAIL  - 05/5/11(水) 10:52 -

引用なし
パスワード
   ええっと・・・・

>With ActiveChart
> .HasTitle = True
> .ChartTitle.Characters.Text = "○○" & .Cells(6, 7).Value & "○○"
> .Axes(xlCategory, xlPrimary).HasTitle = True
> .Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "aaa"
> .Axes(xlValue, xlPrimary).HasTitle = True
> .Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "bbb"
>End With
>
>ちなみにグラフタイトルには特定のセルの文字を入れたいのですが・・・。

.ChartTitle.Characters.Text = "○○" & .Cells(6, 7).Value & "○○"
ここの、「.Cells(6, 7)」の先頭の「.」が要らないんちゃいますか?

【24818】Re:グラフのタイトル
質問  hirop  - 05/5/11(水) 10:57 -

引用なし
パスワード
   「.」をはずしてやってみたのですが、だめでした。

>.ChartTitle.Characters.Text = "○○" & .Cells(6, 7).Value & "○○"
>ここの、「.Cells(6, 7)」の先頭の「.」が要らないんちゃいますか?

【24819】Re:グラフのタイトル
回答  Kein  - 05/5/11(水) 11:00 -

引用なし
パスワード
   .ChartTitle.Characters.Text = "○○" & _
Sheets("Sheet1").Cells(6, 7).Value & "○○"

などと、Cellsの参照対象シートを記述してみて下さい。

【24820】Re:グラフのタイトル
お礼  hirop  - 05/5/11(水) 11:07 -

引用なし
パスワード
   ▼Kein さん:
パーフェクトです。
本当にありがとうございました。

>.ChartTitle.Characters.Text = "○○" & _
>Sheets("Sheet1").Cells(6, 7).Value & "○○"
>
>などと、Cellsの参照対象シートを記述してみて下さい。

【24824】Re:グラフのタイトル
発言  Jaka  - 05/5/11(水) 12:35 -

引用なし
パスワード
   こんにちは。
復帰、おめでとうございます。

上も下も今さらだけど

▼つん さん:
>セルだと、「vbLf」だけしかあかんかったよね?
はい、そのようです。
VbCRがダメみたいですね。

じゃね!じゃね!

9910 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free