部下になった柴田勝家が失敗したら昔受けた屈辱を倍返しだ！！

【太閤立志伝】

おすすめYouTube動画の紹介　

チャンネル名【しずか日記】

高評価・チャンネル登録して頂ければ動画更新の励みになります。

部下になった柴田勝家が失敗したら昔受けた屈辱を倍返しだ！！

 

 

 

 

 

 

長期間にわたる鬼畜な兵糧攻めを行った城の様子を見に行く秀吉。

【太閤立志伝】

おすすめYouTube動画の紹介　

チャンネル名【しずか日記】

高評価・チャンネル登録して頂ければ動画更新の励みになります。

長期間にわたる鬼畜な兵糧攻めを行った城の様子を見に行く秀吉。

城には兵が１名しか残っていないが敵もまだ諦めいていない。

 

 

キタサンブラック役 矢野 妃菜喜さんのサポートカードイベントの声を集めてみました

【ウマ娘プリティダービー】

おすすめYouTube動画の紹介　

 

チャンネル名【しずか日記】

 

動画を見て高評価・チャンネル登録して頂ければ動画更新の励みになります。

 

キタサンブラック役　矢野 妃菜喜さんのサポートカードイベントの声を集めてみました

 

 

全てのシート名を取得する

エクセルVBAで全てのシート名を取得する   

　Dim i As Long
    Dim mySheetC As Long
    Dim mySheetNa As String

  mySheetC = ThisWorkbook.Sheets.Count
For i = 1 To mySheetC
     mySheetNa = Sheets(i).Name
       Sheets("Sheet1").Cells(i, 2).Value = mySheetNa
    Next i

ブック名を指定してシート名を取得したい場合は下記内容に変更する

Workbooks("Book1.xlsx").Activate
mySheetC = ActiveWorkbook.Sheets.Count

ははっ！ 大名や織田家の重臣に簡単な仕事をさせて優越感に浸る秀吉

【太閤立志伝】

おすすめYouTube動画の紹介　

チャンネル名【しずか日記】

高評価・チャンネル登録して頂ければ動画更新の励みになります。

ははっ！　大名や織田家の重臣に簡単な仕事をさせて優越感に浸る秀吉