Excel VBA 質問スレ Part63

レス数が1000を超えています。これ以上書き込みはできません。
2019/09/16(月) 19:34:59.04ID:emfTAhXr0
!extend:checked:vvvvv:1000:512

ExcelのVBAに関する質問スレです
コード書き込みや作成依頼もOK

※前スレ
Excel VBA 質問スレ Part62
https://mevius.5ch.net/test/read.cgi/tech/1561303297/
VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured
2019/12/01(日) 08:33:22.24ID:IUtc26dY0
PasteSpecialの戻り値が何なのか知らないけど、
範囲だったら使い道があるんじゃないの。
貼り付けた後に、そのまま書式を変更するとかさ。
915デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 08:37:40.53ID:Mv7XM2680
>>913
メンバとオブジェクトの違いって何?
2019/12/01(日) 08:37:49.15ID:BdsW8ng60
>>909
名前付き引数で指定するなら
.End(Direction:=xlUp)
って書ける
917デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 08:39:31.79ID:Mv7XM2680
>>916
なんでカッコがいるんだ…
end direction :=xlupじゃダメなのか…
こういうのって気にする人いる?
エラー出たらかっこつけるとかメソット、プロパティの引数指定にはとりあえずかっこつけるとかしてる?
2019/12/01(日) 08:48:55.22ID:lg6qJlYj0
>>909>>917
今回はプロパティ。さっきのはメソッド
vbaは見た目が一緒だから死ぬほどややこしいけど、まぁいつも通りに書いてればいいよ
俺もendはメソッドと思ってたけど問題なかったし

>>910
そうそう、その辺り考え出すとまぁ例外もあるよな〜って思ってたけどアホらしくなって考えるのを止めた

>>911
このレベルの事を聞きたいなら最低限クラスは覚えないとついていけないぞ
ただそれを理解すれば一気にレベルアップする
2019/12/01(日) 08:53:45.63ID:IUtc26dY0
実際、クラスを自作すると、プロパティとメソッドを同じように使うことも出来るから、
どっちでやりゃあいいんだ? ってなるときはある。
2019/12/01(日) 08:57:20.31ID:qadFHjVDx
>>917
自分で調べるといいよ
2019/12/01(日) 09:02:35.06ID:qadFHjVDx
VBAのプロパティのアクセサやセッターも実体はただのプロジージャだからね
クラス外から見たらただの関数でしかない
2019/12/01(日) 09:04:09.45ID:lg6qJlYj0
>>921
そこら変がちょっとキモイよなー
完全に挙動が一致してればいいんだけど、見た目が同じで処理が分かれるとなんだこれってなる
2019/12/01(日) 09:04:20.04ID:qadFHjVDx
>>915
RangeオブジェクトとPasteSpecialメソッドの違いを考えたらわかる
924デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 09:04:29.40ID:Mv7XM2680
なんかイマイチな答えしかこないな

俺は、プロパティ、メソッドで()がつく場合とつかない場合の違いは何?
全部()つけるでいいの?どう意識してるの?ってきいてる

これに対してクラスガーとか言われてもわからん
2019/12/01(日) 09:04:33.88ID:BdsW8ng60
>>917
プロパティの引数の括弧は省略できなかったと思う
メソッド(関数)呼び出しで、戻り値を使わない場合は括弧がなくてもいい

この辺は、大昔の文法との見た目を合わせるための仕様
慣れれば自然と使い分けれるようになるから頑張れ
926デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 09:05:35.25ID:Mv7XM2680
>>923
RANGEもコレクションだろ
RANGE(a1)でメンバーだろ
2019/12/01(日) 09:05:40.19ID:J+qwPBxd0
北海道のハゲはここにこないのー?
2019/12/01(日) 09:07:25.33ID:BdsW8ng60
>>924
ああ、もちろん引数指定は全部括弧つけるって自分ルールでも問題ない

正直自分でもこのへんの使い分けは感覚で、明確な基準が説明できん
929デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 09:09:06.82ID:Mv7XM2680
>>928
君はどうしてるの?
2019/12/01(日) 09:20:24.90ID:BdsW8ng60
>>929
俺は
名前付き引数は使わない
括弧を省略できるときは省略する

基本はこんな感じ
でもそう書かないときもある
あと複数人でソース見るときは事前にルール決めることもある
931デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 09:27:30.25ID:Mv7XM2680
>>930
なるほど!
名前付き引数を使わないときや戻り値を使うときには()がいる
名前付き引数を使うときは:=で()不要
この認識でいい?
2019/12/01(日) 09:30:09.60ID:qadFHjVDx
>>926
全然違う
RangeクラスとRangeプロパティを混同してはいけない

Range("A1")の式はWorksheetクラスのメンバのRangeプロパティを引数つきで呼び出している
このプロパティ式で参照を取得しているのが、Excelのオブジェクトモデルで定義されたRangeクラスの実体(インスタンス)、つまりA1セルになる
要するに、Range("A1").Valueと書いた場合、.Value以下がRangeオブジェクトのメンバになる

Rangeクラスがセル範囲のコレクションとして自己再帰的に実装されているのは確かだけどね
2019/12/01(日) 09:34:33.47ID:lg6qJlYj0
>>929
俺は
名前付き引数は使わない
括弧はなるだけ省略しない

かな。括弧なしで空白スペースは見辛い
2019/12/01(日) 09:46:42.50ID:BdsW8ng60
>>931
名前付き引数と括弧の省略は別
戻り値使うなら名前付き引数でも括弧は必要
935デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 09:47:10.20ID:Mv7XM2680
>>932
中級者ならわかるけど
初心者にはまったくわからんな
そこらへんの文法を初心者向けに解説してるサイトある?
2019/12/01(日) 09:52:34.84ID:bUbToLVg0
カッコ有無でエラー出るときあるの勘弁してほしいわ
2019/12/01(日) 09:52:45.12ID:qadFHjVDx
>>931
戻り値を使う場合には()が必須、
名前付き引数を使おうが使うまいが()の要否には影響しない、
が正解
括弧つけてても名前付き引数の指定はできるので
2019/12/01(日) 10:01:28.01ID:lg6qJlYj0
更にcallの絡みもある
2019/12/01(日) 10:05:48.08ID:qadFHjVDx
>>935
緑川吉行っていうOffice/VBA界の有名人が初心者向けに書いた記事
https://allabout.co.jp/gm/gc/297719/

これはコンパクトで分かりやすい。ただし初心者向けにわざとSheetsをオブジェクト名とかコレクション名とか言っているのは問題がある

正確な知識を得るならこっち

インストラクターのネタ帳 -
「オブジェクト名.プロパティ」という解説はウソですよ
https://www.relief.jp/docs/excel-vba-that-is-not-object-name.html
2019/12/01(日) 10:12:50.14ID:qadFHjVDx
>>938
Callの引数として引数付き関数を呼び出す場合、呼び出される側の引数を特定して先に評価してCallに渡さなきゃいけないから括弧必須なんだよな
しかも戻り値が取れないという
2019/12/01(日) 10:18:48.73ID:lg6qJlYj0
>>939
>「オブジェクト名.プロパティ」という解説はウソですよ
あーそういやそうだな。vbaは色々省略できるから勘違いしていた
new rangeは出来ないわな
942デフォルトの名無しさん (ワッチョイ b1f1-uW/g)
垢版 |
2019/12/01(日) 10:21:01.02ID:19U1wNi50
>>939
どう間違ってるのですか?
2019/12/01(日) 10:21:51.97ID:qadFHjVDx
>>942
記事を読めば分かる
2019/12/01(日) 10:25:54.76ID:qadFHjVDx
>>941
組み込みオブジェクトはそもそも仕様としてNewできなさそうだけどな
要は As ActiveCell とか As Cells とかいう型指定が出来ないってことだわ、そういうクラスが存在しないわけだから
2019/12/01(日) 11:08:22.23ID:tARyXBCrd
NEWと言えば何でintegerとかstringは宣言した段階で使えるのに
オブジェクト型はインスタンス化しないと使えんないの?
2019/12/01(日) 11:19:32.90ID:SqfEoEmMM
面倒だから
integerは値型だからとかもっともらしい説明を付けることもできるが、それは結果論に過ぎない
2019/12/01(日) 11:27:41.76ID:lg6qJlYj0
インスタンスという概念が無いとそれが新規のオブジェクトなのか既存のオブジェクトかの見分けが付かないよ
他の言語だとstaticとかインスタンス化せずに使えるクラスもあるけどね
2019/12/01(日) 11:52:45.15ID:tARyXBCrd
インスタンス化は実体化するため=メモリ領域確保するためって解釈だけど
integerだろうがstringだろうがメモリ確保してるわけだし

>>947
dim x as classtest
dim y as classtest
みたいなので見分けってつかないの?
2019/12/01(日) 12:08:59.14ID:qadFHjVDx
正確に言うと値の代入もLetステートメントで行うのがBasic系言語の本来の姿
それを規約上で略記できるようにしているにすぎない
逆にSetステートメントは言語設計上、変数用に確保されたスタックメモリに格納される値がヒープへの参照ポインタであることを示す役割を持っているものと思われる
Variant型変数にオブジェクトを代入するときもこのSetがあるおかげで、スタックの値を参照アドレスとして解釈できるようになっているはず
2019/12/01(日) 12:55:42.14ID:lg6qJlYj0
>>948
サチコ、それインスタンス化や
2019/12/01(日) 12:56:49.87ID:lg6qJlYj0
>>949
そう、setは文法上無いと何かとバッティングしたはず。だからどうしても必要なんだけど、
何だっけな、何でもいいや
2019/12/01(日) 14:45:17.26ID:qadFHjVDx
>>951
Letとのバッティングだろう
推測だが、VB6/VBAのコンパイラは、代入演算子と等価演算子がともに'='であることを前提とした仕様になっているんだと思う
プリミティブ型の値の代入はスタックの値のコピーに他ならないので、代入演算子を等価演算子と混同しても論理矛盾が起きない

オブジェクトの場合はそうはいかないので、オブジェクト変数として型宣言した変数へのインスタンス代入の際にはSetの識別子付与を強制するようにしてるんじゃなかろうか

VB.NETではSetが要らなくなってるからコンパイラの仕様だよなこれは
2019/12/01(日) 15:01:32.65ID:pJZuHPp00
参照カウント型GCの都合だよ
Setで左辺のオブジェクトの参照カウントが+1されて変数に束縛される
左辺がNothingだったら束縛していたオブジェクト参照カウントを-1する
変数がemptyやNothingだったら何もしない
見た目以上に重い代入処理
関数や手続きの戻りまで行ったら全てのローカル変数に対してSet 変数 = Nothing相当の処理をする
だから関数の最後でNothingの代入は不要
ただし
2019/12/01(日) 15:36:05.55ID:qadFHjVDx
>>953
知らなかった、ありがとう
代入値の評価をして変数スコープ内で参照カウンタを管理するためのステートメントなのか
確かにそれだとLetと違って省略不可だな
2019/12/01(日) 15:43:44.55ID:BdsW8ng60
>>951
Setが省略できないのはデフォルトプロパティとの絡み
SetもLetもないと、デフォルトプロパティへの代入なのかインスタンスそのものの代入なのか区別がつかないから
文法解釈の問題で、GCや参照カウンタの問題ではないよ

>>952
VB.Netではデフォルトプロパティという概念を変えて
一部条件以外でのデフォルトプロパティの省略を禁止した
コンパイラは文法を解釈してるわけで、言語仕様の問題

ちなみに=が等価演算子か比較演算子かの解釈に、値型か参照型の区別は関係ない
VB.Netがそうだろ
2019/12/01(日) 15:47:47.95ID:qadFHjVDx
>>955
なるほどそういうことか
ありがとう納得した
ここは勉強になるな
2019/12/01(日) 15:49:14.68ID:lg6qJlYj0
>>955
あーそれだ、ありがとう
setが無いと、
foo = cells(1,1)


set foo = cells(1,1)
なのか
foo = cells(1,1).value
なのか、
見分けが付かないって事だね
2019/12/01(日) 16:05:54.42ID:BdsW8ng60
>>942
ちょっとリンク先見てみたけど、微妙な説明してるなぁ
混乱する一番の原因は、
オブジェクトを返すプロパティには、そのオブジェクトの型と同じ名前を使う
っていう指針があるから

Dim r As Range
のRangeは型名(=オブジェクト名)

Set r = ActiveSheet.Range("A1")
のRangeは文法的にはWorksheetオブジェクトのRangeプロパティ
RangeプロパティはRange型のインスタンスを返す

ActiveSheetなんてオブジェクトはないが、これは
Set r = Application.ActiveSheet.Range("A1")
の省略形とみなされるので、ApplicationオブジェクトのActiveSheetプロパティだと解釈される
ActiveSheetプロパティが返しているものがWorksheetオブジェクト(のインスタンス)

Worksheet型じゃなくてSheet型だろとかいう突っ込みとか
Rangeのデフォルトプロパティだろとかいう突っ込みは勘弁な
2019/12/01(日) 18:07:13.10ID:Enyr5Fgf0
>>958
> 混乱する一番の原因は、
> オブジェクトを返すプロパティには、そのオブジェクトの型と同じ名前を使う
> っていう指針があるから
違うよ
オブジェクトなんて曖昧な用語を使うから混乱するの
型(クラス)と実体(インスタンス)をきちんと区別すればいいだけ
2019/12/01(日) 19:22:42.00ID:y7nKgQdu0
Select CaseステートメントでLong型変数の判定がおかしいのですがなぜですか?
@では5000未満と判定されているのに、Aではきちんと12500と判定されます

https://i.imgur.com/TmJ2jHa.png
https://pastebin.com/LvSb9cmT
2019/12/01(日) 19:27:45.01ID:y7nKgQdu0
自決しました
String型で値渡ししてました…
2019/12/01(日) 19:43:10.04ID:oxdJbHeB0
値型はNewしないで参照型はNewするというルールに従うと
別言語でStringは参照型なのに何でNewしなくていいのかと悩んだな
結局参照型でもNewしなくていい場合があるってスルーするのが一番だけど
2019/12/01(日) 19:55:09.73ID:lg6qJlYj0
stringは今となっては値として何も考えずに使えるよね
昔は配列だの何だの意外とめんどくさかった。更に文字コードやなんやでそれはもう
https://docs.microsoft.com/ja-jp/dotnet/api/system.string?redirectedfrom=MSDN&;view=netframework-4.8#constructors
2019/12/01(日) 20:17:07.69ID:Ta8YhOMq0
え、プロパティの引数って絶対に()つけないといけないの?
そこら辺の文法が謎だわ
本でも説明されてないし
ネットで検索しまくってもプロパティの引数には()をつけろなんて書いてないし
どこでそんな知識仕入れてきたの?
2019/12/01(日) 20:27:51.07ID:lg6qJlYj0
そもそもプロパティに引数ってのがよーわからん
getterなんだろうけど
966デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 20:35:21.31ID:Mv7XM2680
>>965
endとかだよ
2019/12/01(日) 20:44:53.15ID:wgaB7PE60
ActiveSheet.Range("A1") = "TEST"
とか
str = ActiveSheet.Range("A1")
とかの()内のことを言っているんだろうか?
2019/12/01(日) 21:06:45.20ID:qadFHjVDx
>>964
RangeクラスのValueプロパティのアクセサは引数いらないよね
アクセス時に引数を要求されるプロパティとそうじゃないプロパティがあるだけ
969デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 21:14:55.98ID:Mv7XM2680
>>968
プロパティの引数に()いるの?に対してその答えはおかしい
2019/12/01(日) 21:23:50.92ID:qadFHjVDx
>>969
ひょっとしてまだメソッド/プロパティの引数指定の丸括弧記法の話をしていたのか?メゾット君
プロパティのアクセサの引数指定は丸括弧必須
戻り値を取得するための命令だから当たり前
2019/12/01(日) 21:51:43.86ID:lg6qJlYj0
>>966
いや、うん。そこじゃないんだ
普通に考えると「プロパティに引数がいるの?」なんだ
プロパティに引数は普通は不要。プロパティは「セルの内容」「列幅」など、取り出すだけのもの
プロパティてのは大体「設定]的な意味

vbaはかなり古く誕生した言語な割に大変長寿で、かなりおかしなことになっているってのはあるけども

>>958に集約されている
2019/12/01(日) 22:00:59.47ID:qadFHjVDx
>>971
クラス側で保持するプロパティという概念自体には引数という観念が成立しないのはその通り
でもこの人が言ってるのは多分プロパティの受け渡しに使うアクセサの引数のことだと思う
973デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 22:13:02.79ID:Mv7XM2680
>>971
設定に引数がなんで必要ないの??
974デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 22:16:58.66ID:Mv7XM2680
アクセサ VBA

はい、なんもヒットしません
初心者に解説する場合、専門用語を使うってどうなの?
2019/12/01(日) 22:25:27.99ID:Enyr5Fgf0
プロパティに引数持てる言語はVB系の言語しかないのでそういうもんだと思うしかないような気がする
976デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/01(日) 22:28:21.62ID:Mv7XM2680
プロパティに引数もてるとか持てないとかはっきりしろよ…
2019/12/01(日) 22:29:04.82ID:lg6qJlYj0
>>972
おう、これは本気で行くしか無いぞ
>>973
そうじゃなくて、逆なんだ。vbaにはわざわざ引数が用意されている

プロパティの場合、引数じゃなく代入で済ませる方が自然なんだ

cells(1,1),value = "これを設定する"
A1に"これを設定する"という文字列が入る
この場合、プロパティに引数は使われていない。プロパティに直接代入している

本来ならこう書くべきだ
cells(1,1),value.setter("これを設定する")

この辺りはずっとsetter/getterを用意しようぜって流れが主流になった
2019/12/01(日) 22:32:32.45ID:pJZuHPp00
Range COMオブジェクト デフォルトプロパティ
でぐぐると良いかも
2019/12/01(日) 22:52:46.61ID:qadFHjVDx
>>974
VBA アクセサで普通にヒットするぞ
980デフォルトの名無しさん (ワッチョイ b1f1-uW/g)
垢版 |
2019/12/01(日) 23:25:29.33ID:19U1wNi50
>>979
「汗臭」で検索してないか?
2019/12/01(日) 23:43:26.99ID:lg6qJlYj0
>>980
君は生きている価値もないかな、と感じた
自分の存在価値を下げるような発言は謹んだ方が良いと思うよ
982デフォルトの名無しさん (ワッチョイ b1f1-uW/g)
垢版 |
2019/12/01(日) 23:46:59.48ID:19U1wNi50
>>981
なんだとこのツルッパゲ!
2019/12/01(日) 23:49:23.02ID:J+qwPBxd0
グラサンのハゲはここにこないのー?
2019/12/02(月) 06:20:27.87ID:jajTU6Llx
このあたりの話は自分でクラスを作ったことがなければ分からないと思う
ともあれ、質問者の意図は引数付きのプロパティ式で丸括弧を省略できるかどうかという話なんだろうから、出来ないという結論で締めて終わり
要するにRange("A1")をRange "A1" とは書けない
これだとRangeという名前のSubプロジージャに引数"A1"を与えるという全くデタラメな構文になる
2019/12/02(月) 10:25:16.60ID:9b18ESq8a
hage("A1")
986デフォルトの名無しさん (ワッチョイ b1f1-uW/g)
垢版 |
2019/12/02(月) 12:07:45.41ID:b+6W/5Or0
Tsuruppage("A1")
2019/12/02(月) 12:58:25.24ID:bEJSdplkd
初心者にとって感覚的に分かりやすいのは戻りを使う場合はカッコを使う。
戻りを使わない場合はカッコを使わない。
Call文だけ例外でカッコを使う。

で良いんじゃね?
988デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/02(月) 20:27:37.88ID:HFZWrDUD0
>>987
end(xlup)
戻り値ってなんだ?
2019/12/02(月) 20:40:04.97ID:4BXx3P/Mx
>>988
返り値は連続領域の下端のセルを表すRangeオブジェクトだよ
Microsoftの公式のリファレンスくらい読んだら?
2019/12/02(月) 20:41:20.57ID:4BXx3P/Mx
>>988
間違えた、xlupなら上端のセルだな
とにかく仕様理解のためには公式リファレンスに勝るものはないから返り値くらいはちゃんと調べたらいい
991デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/02(月) 21:03:22.49ID:HFZWrDUD0
>>990
ENDの()のどこが戻り値なのかきいてんだよ…
ガイジかよ
2019/12/02(月) 21:21:14.86ID:4BXx3P/Mx
>>991
戻り値の意味が分かってなくて草
Expression.End(Destination)っていう構文全体が戻り値を指し示してるんだが
993デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/02(月) 21:52:36.19ID:HFZWrDUD0
Cells(i, j).Borders(xlDiagonalDown).LineStyle = xlInsideHorizontal

わかりやすくな
プログラム初心者でもわかるように解説しろ
ボーダーには()でラインスタイルには=
どちらもプロパティなはず
なんで?
どれがなにの戻り値なの?ってのを
主語がなかったりテキトーなカタカナでごまかしてるのおおすぎ
2019/12/02(月) 22:05:27.19ID:gEmwbuWH0
日本語崩壊してて草
2019/12/02(月) 22:05:27.56ID:h5Kj2a0d0
北海道でスーパーハゲをしてるグラサンのおっさんこないのー?
2019/12/02(月) 22:13:40.36ID:4BXx3P/Mx
LineStyleプロパティは引数の指定を要求されないプロパティだから()による引数指定は要らない

かつ、Linestyleプロパティは値の読み取りの他に値の設定も可能なプロパティなので、代入演算子の = でxlLineStyle列挙体の定数を設定することにより、罫線の書式を設定できる

プロパティだから()が必要なんだとか=が必要なんだとかっていう単純な捉え方は理解の妨げになるからやめた方がよい

引数による要素の指定を要求/許容しているのか、値の読み取りだけでなく値の設定も出来るのかといった個々のプロパティの仕様の違いにより、式の書き方が変わるだけ
2019/12/02(月) 22:16:41.89ID:gEmwbuWH0
ってかこの一連の問題、すげー難しいよ
初心者を自覚してるならあまり深く考えないほうが良いと思う
得るものは少ない、ぱっと書き方だけ覚えてどんどん次へ進んだほうがいいような
2019/12/02(月) 22:17:27.68ID:4BXx3P/Mx
WorksheetオブジェクトのCellsプロパティなどは引数なしでも引数ありでも使用できるし、=で値も設定できる
()の要不要とか=を用いた代入の可否なんてプロパティの仕様によるとしか
2019/12/02(月) 22:20:20.67ID:ONNaKUnx0
>>993
こう説明したらわかる?

Cellsの戻り値に対して.Borders〜〜って事
Borders(xlDiagonalDown)の.LineStyleに対して = xlInsideHorizontalって事
1000デフォルトの名無しさん (ワッチョイ a901-SL5O)
垢版 |
2019/12/02(月) 22:20:29.46ID:HFZWrDUD0
>>996
引数の要求をされないプロパティ??
linestyleだけではエラーになるのでは?
レンジのラインスタイルです!だけは意味不明でしょ

値の設定?読み取り?
設定 罫線を引く?
読み取り ???
つまりどういうこと?

定数を設定??
bordersの引数も定数では?
10011001
垢版 |
Over 1000Thread
このスレッドは1000を超えました。
新しいスレッドを立ててください。
life time: 77日 2時間 45分 30秒
レス数が1000を超えています。これ以上書き込みはできません。
5ちゃんねるの広告が気に入らない場合は、こちらをクリックしてください。

ニューススポーツなんでも実況