【視聴数 421981】
【チャンネル名 HikakinGames】
【タグ hikakingames,hikakin,beatbox,game,gameplay,ヒカキン,ヒカキンゲーム,ヒカキンゲームズ,ひかきん,ひかきんげーむず,ビートボックス,ボイパ,ゲーム,ゲーム実況,実況プレイ,実況,youtube,youtuber,ユーチューバー,ゆーちゅーぶ,ユーチューブ,スマホ,スマホゲー,PCゲー,PC,スプラ3,スプラトゥーン3,splatoon3,昇格戦,ウデマエ】
switchゲーム-youtebe動画まとめたサイト switchゲームのyoutube動画のリンクをまとめました!switchゲームのチャンネル探しに便利です!最新の役立つswitchゲーム情報があります!
【視聴数 421981】
【チャンネル名 HikakinGames】
【タグ hikakingames,hikakin,beatbox,game,gameplay,ヒカキン,ヒカキンゲーム,ヒカキンゲームズ,ひかきん,ひかきんげーむず,ビートボックス,ボイパ,ゲーム,ゲーム実況,実況プレイ,実況,youtube,youtuber,ユーチューバー,ゆーちゅーぶ,ユーチューブ,スマホ,スマホゲー,PCゲー,PC,スプラ3,スプラトゥーン3,splatoon3,昇格戦,ウデマエ】
「これするだけでおこずかい7000円ゲット!?」中学生でもスマホがあればできる期間限定キャンペーンを利用して7000円分ポイントをゲットする方法がこちらw
【また爆益キター!!】TikTokキャンペーンを利用して簡単に3200円貰う方法がこちらw【期間限定】
潜りながらマルチ打ったほうがいいと思いますよ!!😊
周りに見ろ😡😡😡😡😡😡😡
S帯は目の前だ…
乗り越えろ!!!
寝起キンですって言って欲しかった(
ヒカキンさんヒーローモードやらないんですか?
めちゃくちゃ上達しててびっくり!
もう少しルール関与すればさらに勝てるようになりますよ!
スプラトゥーン強くていいな
ヒカキンさんヒーローモードどんどん進めてください!
やっぱHIKAKINのスプラトゥーン実況が1番
HIKAKINさんとコラボしたいスプーラトゥーンスリーで
HIKAKINさん成長しすぎ!!🎉
ホコを安全な場所に運ぶのを優先しないといけない場面で、ホコを無視してミサイルに固執した結果、ただでホコを相手にプレゼントしているような状況が多いかも。
相手の沼ジャンちゃんと狩りましょう。
なんでところどころ黄猿みたいな喋り方になるの笑
あんのー、、、強すぎ
どんどん強くなっていってるのすごいですね
ヒカキンさんのゲーム観てると自分も同じゲームをやりたくなるくらい楽しいです😊
次回の昇格、頑張ってください✨
応援してます(*・ᴗ・*)و🍀
47:10
0:15 キケンな草は草
Sub 対象を指定()
Dim ws As Worksheet
Set ws = Sheets(“Sheet1”)
ws.Shapes(“楕円 1”).Select
End Sub
Sub 位置の取得と設定()
Dim ws As Worksheet
Set ws = Sheets(“Sheet1”)
MsgBox ws.Shapes(“楕円 1”).Left
ws.Shapes(“楕円 1”).Left = 200
ws.Shapes(“楕円 1”).Top = 200
MsgBox ws.Shapes(“楕円 1”).Top
End Sub
Sub サイズの取得と設定()
Dim ws As Worksheet
Set ws = Sheets(“Sheet1”)
MsgBox ws.Shapes(“楕円 1”).Width
MsgBox ws.Shapes(“楕円 1”).Height
ws.Shapes(“楕円 1”).Width = 60
ws.Shapes(“楕円 1”).Height = 60
End Sub
Sub 図形の作成と名前の変更()
Dim ws As Worksheet
Set ws = Sheets(“Sheet1”)
ws.Shapes.AddShape msoShapeOval, 0, 0, 60, 60
ws.Shapes(ws.Shapes.Count).name = “maru”
End Sub
Sub 書式の変更()
Dim ws As Worksheet
Set ws = Sheets(“Sheet1”)
ws.Shapes(“maru”).Fill.ForeColor.RGB = RGB(255, 0, 0)
ws.Shapes(“maru”).Line.ForeColor.RGB = RGB(0, 0, 255)
ws.Shapes(“maru”).Line.Weight = 3
‘線無し
ws.Shapes(“maru”).Line.Visible = False
End Sub
Sub 図形の変更()
Dim ws As Worksheet
Set ws = Sheets(“Sheet1”)
ws.Shapes(“maru”).AutoShapeType = msoShape6pointStar
ws.Shapes(“maru”).AutoShapeType = msoShape10pointStar
ws.Shapes(“maru”).AutoShapeType = msoShape16pointStar
ws.Shapes(“maru”).AutoShapeType = msoShape32pointStar
End Sub
Sub 図形の削除()
Dim ws As Worksheet
Set ws = Sheets(“Sheet1”)
ws.Shapes(“maru”).Delete