絞り込み条件を変更する
検索条件を絞り込む

すべてのカテゴリ

2 件中 1 - 2 件表示
カバー画像

【Word VBA】日本国旗描画マクロ▽ソースコード

Option Explicit Option Base 0 Public Sub 日本国旗描画マクロ()     Const NAFLGLFT = 100      '描画開始位置X     Const NAFLGTOP = 100          '      Y     Const NAFLGWID = 150      '国旗の幅     '---------------------------------------------------------------------------     '旗の形は縦が横の3分の2の長方形。     '日章の直径は縦の5分の3で中心は旗の中心。     '地色は白色、日章は紅色。     '「国旗及び国歌に関する法律」(国旗・国歌法)より     Dim intHe As Integer, intRd As Integer     '*白地     intHe = (NAFLGWID * 2) \ 3     With ActiveDocument.Shapes.AddShape(msoShapeRectangle, _          NAFLGLFT, NAFLGTOP, NAFLGWID, intHe)         .Fill.Visible = True: .Fill.ForeColor = vbWhite         .Line.Visible = True: .Line.ForeColor = vbBlack         .Line.Weight = 0.75     End With  
0
カバー画像

今日はソフトバングGが指数を押し上げた!! 高いと言っても・・・

日々是相場 -夕刊-   2023年12月27日(水)   日経平均   33,681.24 円 △375.39円 ≪東証一部≫ 売買高    15億0,024万株 売買代金  3兆5187億72百万 円 値上り銘柄数 1,492 銘柄 値下り銘柄数 132 銘柄 騰落レシオ(25日) 102.32 % 為替 1ドル=142.55 円   ☆ 市況概況 ☆ 米国株高を受けて買い先行、特に材料がないなかで大幅高 米国市場が堅調となったことで夜間取引やシカゴ市場の日経平均先物が高く、本日の日本市場は買い先行となった。寄り付きの買いが一巡となった後も買戻しを中心に指数に影響の大きな銘柄が買われ、さらに個別も材料や需給で指数を押し上げる銘柄も見られ大幅高となった。節目と見られる33,500円をあっさりと抜けたが12月20の高値を意識するような大幅高となるとさすがに上値も重くなった。 昼の時間帯はいったん売られる場面もあったが、後場に入っても引き続き値持ちのいい展開となった。売られないから買戻しが入ると言う状況で値持ちが良い一方で上値を買い上がるということでもなく、33,700円を超えると売られるという状況だった。さすがに特に材料がないなかでの上昇で買戻し一巡となったものから上値の重さが確認されて上げ幅を縮小したものの、意外に値持ちのいい終値となった。 小型銘柄も買戻しを交えて買い急ぐ動きも見られ総じて堅調だった。グロース250指数やグロース株指数は大幅高だった。先物は指数に先行して日経平均を押し上げるということでもなく、株価が上昇するに連れて買戻しが入るというような状況であり、特に主導
0
2 件中 1 - 2