■ちょっとずつ進めているが、「小ロンドの遺跡」で死にまくっている。何回か通っているルートのはずなのに、コツを忘れてしまっているのか、あっちで死に、こっちで死にという感じで、もう無茶苦茶。 ■レイスにスピアが相性があまり良くないのが、苦戦する最…

Sub 複数条件の検索() Dim WS1 As Worksheet Dim WS2 As Worksheet Dim Date1 As String Dim Date2 As String Dim TERM As String Dim MaxRow As Long Dim MaxRow2 As Long Dim i As Long Dim ii As Long Set WS1 = Worksheets("Sheet1") Set WS2 = Workshee…

Sub MaxRowMaxColumn() Dim MaxRow As Long Dim MaxCol As Long ‘ MaxRow=Range(“A1”).End(xlDown).Row ’ MaxCol=Range(“A1”).End(xlDown).Column ‘ MaxRow=Range(“A65535”).End(xlUp).Row ’ MaxCol=Range(“IV1”).End(xlToLeft).Column End Sub

Sub VBA Sample01() '2行目が項目 '1列目が主キー(商品コードなど) '2列目が日付、3列目が時刻、4列目～BF列までが各項目 Dim Wsht1 As Worksheet Dim MxRw As Long Dim ix As Long Set Wsht1=Worksheets("Sheet1") MxRw=Wsht1.Range("A65535").End(xlUp).Ro…

■iPhoneのイヤフォンが壊れてしまったので、カナル型のイヤフォンを購入。初めてのカナル型のイヤフォンだったので、装着感に違和感があったが、使っている内にそれはほとんど感じなくなった。ただ、デフォルトもiPhoneのイヤフォンの開放型とは違うので、耳…

迷った挙句に「飛竜の谷」に行くことにする。「地下墓地」はもう一度挑戦する気には今はなれない。「病み村」はやはり難易度が超絶に高そうなので、後回しにしたい。なので、消去法で「飛竜の谷」に行くことにする。 「飛竜の谷」では結構サクサクと狩ること…

途中で止めてしまっていたDarkSoulsを再開。「地下墓地」の入り口付近の焚火で中断していた。何処まで進めたのか完全に忘れてしまっていた。ボスを攻略した記憶がないので、「地下墓地」の下層のどこかまで行って、何かの理由で引き返して来ていたはず。この…

『偽物語』 力作ではあると思う。シャフトが力を入れているのが良く分かる。作画とか背景とか演出が凄い凝っている。だが、何故かワクワク感がない。ファイヤーシスターズは可愛いけど。 『Another』 ホラー？最近はワンシーズンに1作くらいホラーモノがある…