-
1
本日の急騰・急落株
コード,銘柄名,市場,株価,前日比,前日比.1,出来高,ＰＥＲ,ＰＢＲ,利回り4583,カイオム,東Ｇ,230.0,50.0,+27.78%,48845500,－,11.95,－5028,セカンドＸ,東Ｇ,392.0,80.0,+25.64%,1220900,25.8,4.31,－4068,ベイシス,東Ｇ,1512.0,300.0,+24.75%,484000,54.6,1.43,－4784,ＧＭＯ－ＡＰ,東Ｓ,761.0,100.0,+15.13%,472200,223,2.40,0.915247,ＢＴＭ,東Ｇ,1942.0,243.0,+14.30%,715500,57.0,4.29,－9009,京成,東Ｐ,4370.0,531.0,+13.83%,17950100,15.1,1.51,0.823321,ミタチ産業,東Ｓ,1270.0,140.0,+12.39%,751600,7.5,0.68,3.948107,キムラタン,東Ｓ,37.0,4.0,+12.12%,8644400,105,9.74,－3494,マリオン,東Ｓ,399.0,43.0,+12.08%,929400,8.7,0.72,1.352743,ピクセル,東Ｓ,66.0,7.0,+11.86%,4355900,－,－,－9006,京急,東Ｐ,1354.5,135.0,+11.07%,9400400,17.3,1.01,1.335578,ＡＲアドバン,東Ｇ,1600.0,157.0,+10.88%,64000,16.2,2.68,－2814,佐藤食品,東Ｓ,2070.0,201.0,+10.75%,28400,14.8,0.41,1.935616,雨風太陽,東Ｇ,937.0,88.0,+10.37%,2233700,－,6.76,－7565,万世電機,東Ｓ,4025.0,375.0,+10.27%,13300,9.0,0.47,－コード,銘柄名,市場,株価,前日比,前日比.1,出来高,ＰＥＲ,ＰＢＲ,利回り2752,フジオフード,東Ｐ,1192,-140,-10.51%,2733500,112,25.75,－7138,ＴＯＲＩＣＯ,東Ｇ,812,-93,-10.28%,158200,－,1.15,－5587,インバＰＦ,東Ｇ,781,-79,-9.19%,32400,14.8,2.24,－7362,Ｔ．Ｓ．Ｉ,東Ｇ,965,-94,-8.88%,529200,13.4,1.15,－3824,メディア５,福Ｑ,600,-50,-7.69%,300,566,1.6,－3540,Ｃｉメディカ,東Ｓ,911,-73,-7.42%,907800,7.4,1.82,－5025,マーキュリー,東Ｇ,699,-44,-5.92%,61600,39.1,2.46,－4255,ＴＨＥＣＯＯ,東Ｇ,666,-41,-5.80%,15400,－,5.08,－7793,イメージＭ,東Ｇ,1347,-83,-5.80%,21900,13.2,1.78,2.236634,ネクスＧ,東Ｓ,118,-7,-5.60%,922300,29.3,1.1,－9212,ＧＥＩ,東Ｇ,500,-28,-5.30%,29400,625,2.86,－9973,ＫＯＺＯＨＤ,東Ｓ,18,-1,-5.26%,481600,－,9.23,－4576,ＤＷセラピ研,東Ｇ,93,-5,-5.10%,4969600,－,3.48,－6736,サン電子,東Ｓ,8280,-440,-5.05%,52900,－,5.52,－9824,泉州電,東Ｐ,5150,-260,-4.81%,62600,12.8,1.69,2.52にほんブログ村
2024年11月25日
閲覧総数 42
-
2
会社四季報 2021年6月発売号の分析 他消費財小売り、総合スーパー
○他消費財小売り 売上高上位５社柄コード 名称 売上高2021 経常利益1 従業員数 年収1 時価総額順位7532 パン・パシフィック・インターナショナルホールディングス 1730000.0 81,000 14615 678.0 3/118社4755 楽天グループ 1650000.0 -125,000 23841 745.0 2/118社9843 ニトリホールディングス 716900.0 138,426 18400 868.0 1/118社7453 良品計画 477000.0 48,600 0 556.0 4/118社3050 ＤＣＭホールディングス 471192.0 29,550 4059 721.0 7/118社パン・パシフィック・インターナショナルホールディングスはドン・キホーテを展開している。楽天やニトリなどがここに入る。↓100社の３ヶ月チャート○総合スーパー 売上高順銘柄コード 名称 売上高2021 経常利益1 従業員数 年収1 時価総額順位8267 イオン 8603910.0 138,801 155578 829.0 1/9社8273 イズミ 679778.0 36,078 4443 556.0 2/9社8276 平和堂 439326.0 15,053 5442 528.0 4/9社2653 イオン九州 348184.0 3,373 0 453.0 7/9社7512 イオン北海道 338456.0 9,297 0 471.0 3/9社8278 フジ 315383.0 8,012 3289 498.0 6/9社2659 サンエー 202767.0 9,554 1773 498.0 5/9社8289 Ｏｌｙｍｐｉｃグループ 107753.0 4,572 1280 489.0 8/9社7646 ＰＬＡＮＴ 97000.0 1,300 0 537.0 9/9社イオンとその系列が入っている。平和堂は滋賀県で圧倒的らしい。イオンは桁が違う。↓9社の３ヶ月チャートにほんブログ村
2021年07月21日
閲覧総数 317
-
3
会社四季報 2021年6月発売号の分析 アパレル・アクセサリー、金融サービス
○アパレル・アクセサリー 売上高上位５社銘柄コード 名称 売上高2021 経常利益1 従業員数 年収1 時価総額順位8014 蝶理 216233.0 4,656 969 867.0 11/69社7762 シチズン時計 206641.0 -4,143 13530 593.0 2/69社8050 セイコーホールディングス 202671.0 633 12092 690.0 3/69社3612 ワールド 180322.0 -22,556 9099 NaN 8/69社8016 オンワードホールディングス 174323.0 -20,174 7498 NaN 9/69社蝶理が1位。東レの子会社。↓50社の3ヶ月チャート○金融サービス 売上高上位５社銘柄コード 名称 売上高2021 経常利益1 従業員数 年収1 時価総額順位8591 オリックス 2292708.0 287,561 33153 858.0 2/50社7164 全国保証 47834.0 38,991 0 717.0 4/50社3769 ＧＭＯペイメントゲートウェイ 40000.0 12,500 625 686.0 3/50社2174 ＧＣＡ 33500.0 3,800 525 NaN 14/50社7169 ＮＦＣホールディングス 28445.0 2,978 1857 NaN 16/50社オリックスが1位。2桁ちがう。↓49社の3ヶ月チャートにほんブログ村
2021年08月07日
閲覧総数 173
-
4
pythonでテトリス
pythonでテトリスを作ろうとするとどうなるのか、検索すると以下のサイトが見つかった。https://kusakarism.info/?p=11314python標準モジュールのtkinterを使用し、わずか140行ほどで書かれていて感動した。リンク先の動画でも丁寧に説明されていて勉強になった。コーディングのキーポイントは、横12、縦21のマス目の状態を空間とブロックに識別し、横の両端1列ずつと下端1列をブロックとして白で表示、その内側を空間として黒で表示することにある。7種類のテトロミノ(T字やL字のブロック)が積み上がるとその場所はブロックとなり、テトロミノがブロックと当たると移動や回転ができないようになっている。1列がすべてブロックとなると、その段を消去して、順次上のブロックが落ちるようになっている。操作性もよくて、快適に遊べる。コードをみると操作方法がわかるが、カーソルキーで左右と下への移動、スペースキーで回転になっている。せっかくなので、Timerと次のブロックが表示されるように改変してみた。-----以下コード、コピー&ペーストで動作したので、よかったらお試しください。#################### Rough TETRIS ##################### https://kusakarism.info/?p=11314# import tkinter as tkimport randomfrom tkinter import messageboxSIZE = 30 #ブロックのサイズmoveX = 4 #テトロミノ表示位置（横）moveY = 0 #テトロミノ表示位置（縦）type1 = random.randint(0, 6) #テトロミノのタイプnext1 = random.randint(0, 6) #次のテトロミノtimer = 800 #ゲームスピードコントロールscore = 0 #スコアcolor = ["magenta", "blue", "cyan", "yellow", "orange", "red", "green", "black", "white"]#テトロミノデータtetroT = [-1, 0, 0, 0, 1, 0, 0, 1]tetroJ = [-1, 0, 0, 0, 1, 0, 1, 1]tetroI = [-1, 0, 0, 0, 1, 0, 2, 0]tetroO = [ 0, 0, 1, 0, 0, 1, 1, 1]tetroL = [-1, 0, 0, 0, 1, 0,-1, 1]tetroZ = [-1,-1, 0,-1, 0, 0, 1, 0]tetroS = [ 0, 0, 1, 0, 0, 1,-1, 1]tetro = [tetroT, tetroJ, tetroI, tetroO, tetroL, tetroZ, tetroS]#フィールドデータfield=[]for y in range(22): sub=[] for x in range(12): if x==0 or x==11 or y==21: sub.append(8) else: sub.append(7) field.append(sub) #落ちるテトロミノを表示する関数def drawTetris(): for i in range(4): x=(tetro[type1][i*2]+moveX)*SIZE y=(tetro[type1][i*2+1]+moveY)*SIZE can.create_rectangle(x, y, x+SIZE, y+SIZE, fill=color[type1])#次のテトロミノを表示する関数def nextTetro(): can_next.delete("all") for i in range(4): x=(tetro[next1][i*2]+1)*SIZE y=(tetro[next1][i*2+1]+1)*SIZE can_next.create_rectangle(x, y, x+SIZE, y+SIZE, fill=color[next1])#フィールドを表示する関数 1が壁、0が空間def drawField(): for i in range(21): for j in range(12): outLine=0 if color[field[i+1][j]]=="white" else 1 can.create_rectangle(j*SIZE, i*SIZE, (j+1)*SIZE, (i+1)*SIZE, fill=color[field[i+1][j]], width=outLine)#テトロミノを動かす関数def keyPress(event): global moveX, moveY afterX=moveX afterY=moveY afterTetro=[] afterTetro.extend(tetro[type1]) if event.keysym=="Right": afterX+=1 elif event.keysym=="Left": afterX-=1 elif event.keysym=="Down": afterY+=1 elif event.keysym=="space": afterTetro.clear() for i in range(4): afterTetro.append(tetro[type1][i*2+1]*(-1)) afterTetro.append(tetro[type1][i*2]) judge(afterX, afterY, afterTetro) #アタリ判定関数呼び出しdef judge(afterX, afterY, afterTetro): #アタリ判定をする関数 global moveX, moveY result=True for i in range(4): x=afterTetro[i*2]+afterX y=afterTetro[i*2+1]+afterY if field[y+1][x]!=7: result=False if result==True: moveX=afterX moveY=afterY tetro[type1].clear() tetro[type1].extend(afterTetro) return resultdef dropTetris(): global moveX, moveY, type1, next1, timer afterTetro=[] afterTetro.extend(tetro[type1]) result=judge(moveX, moveY+1, afterTetro) if result==False: for i in range(4): x=tetro[type1][i*2]+moveX y=tetro[type1][i*2+1]+moveY field[y+1][x]=type1 deleteLine() type1=next1 #次のテトロミノを落とす next1=random.randint(0,6) #can_next.delete("all") moveX=4 moveY=0 can.after(timer, dropTetris) timer-=2 if timer<140: timer=180def deleteLine(): global score for i in range(1, 21): if 7 not in field[i]: for j in range(i): for k in range(12): field[i-j][k]=field[i-j-1][k] score+=800-timer for i in range(1, 11): if 7!=field[1][i]: messagebox.showinfo("information", "GAME OVER!") exit()#################### ゲームループ #################### win=tk.Tk()win.geometry("340x760")win.title("TETRIS")can=tk.Canvas(win, width=12*SIZE, height=21*SIZE)can.place(x=-10, y=130)can_next=tk.Canvas(win, width=4*SIZE, height=4*SIZE, bg="black") #次のテトロミノ表示位置can_next.place(x=110, y=0)var=tk.StringVar()lab_score = tk.Label(win, textvariable=var, fg="blue", bg="white", font=("", "12")) #得点表示lab_score.place(x=0, y=730)var1=tk.StringVar()lab_timer = tk.Label(win, textvariable=var1, fg="blue", bg="white", font=("", "12")) #タイマー表示lab_timer.place(x=200, y=730)lab_next = tk.Label(win, text="Next", fg="black", bg="white", font=("", "15")) #Nextlab_next.place(x=50, y=50)win.bind("<Any KeyPress>", keyPress)def gameLoop(): can.delete("all") var.set(f"score: {score}") var1.set(f"timer: {timer}") drawField() drawTetris() nextTetro() can.after(10, gameLoop)gameLoop()dropTetris()win.mainloop()-----ここまでにほんブログ村
2024年01月07日
閲覧総数 927
-
5
本日の急騰・急落株
コード,銘柄名,市場,株価,前日比,前日比.1,出来高,ＰＥＲ,ＰＢＲ,利回り1382,ホーブ,東Ｓ,2195,400,+22.28%,4400,23.5,2.40,2.287997,くろ工,東Ｓ,897,150,+20.08%,11200,9.3,0.33,2.234583,カイオム,東Ｇ,266,36,+15.65%,108249400,－,13.83,－7075,ＱＬＳＨＤ,名Ｎ,995,116,+13.20%,100300,17.4,5.15,1.016579,ログリー,東Ｇ,382,40,+11.70%,1203100,－,2.23,－4237,フジプレアム,東Ｓ,316,33,+11.66%,2470300,23.6,0.92,1.903976,シャノン,東Ｇ,495,49,+10.99%,175200,157,－,－7003,三井Ｅ＆Ｓ,東Ｐ,1659,163,+10.90%,89428100,4.8,1.05,1.086836,ぷらっと,東Ｓ,3010,287,+10.54%,537400,317,11.82,－4576,ＤＷセラピ研,東Ｇ,102,9,+9.68%,18603000,－,3.81,－5449,大阪製鉄,東Ｓ,3355,295,+9.64%,577800,46.6,0.84,1.016194,アトラエ,東Ｐ,950,80,+9.20%,820800,16.9,4.91,2.635940,不二サッシ,東Ｓ,700,57,+8.86%,120400,5.5,0.43,2.863300,アンビＤＸ,東Ｇ,2379,182,+8.28%,184000,7.3,2.44,4.415950,パワーファス,東Ｓ,427,31,+7.83%,1075400,12.6,2.17,5.85コード,銘柄名,市場,株価,前日比,前日比.1,出来高,ＰＥＲ,ＰＢＲ,利回り2345,クシム,東Ｓ,357.0,-80.0,-18.31%,2757200,－,2.3,－3747,インタートレ,東Ｓ,405.0,-50.0,-10.99%,1850300,291,2.38,－2437,シンワワイズ,東Ｓ,236.0,-29.0,-10.94%,186200,11.8,1.06,－5247,ＢＴＭ,東Ｇ,1747.0,-195.0,-10.04%,78300,51.3,3.86,－4813,ＡＣＣＥＳＳ,東Ｐ,1235.0,-136.0,-9.92%,1389800,221,2.0,－3696,セレス,東Ｐ,2308.0,-235.0,-9.24%,1659500,22.1,2.72,1.735026,トリプルアイ,東Ｇ,1276.0,-127.0,-9.05%,262900,355,12.54,－7721,東京計器,東Ｐ,3400.0,-305.0,-8.23%,617600,18.1,1.54,1.034288,アズジェント,東Ｓ,555.0,-49.0,-8.11%,15500,42.4,3.14,－7111,ＩＮＥＳＴ,東Ｓ,59.0,-5.0,-7.81%,9378100,218,1.33,－7590,タカショー,東Ｓ,441.0,-36.0,-7.55%,251800,87.5,0.62,1.13246A,アスア,東Ｇ,859.0,-67.0,-7.24%,348900,16.8,2.71,0.669229,サンウェルズ,東Ｐ,926.0,-72.0,-7.21%,2183800,11.4,4.0,－5803,フジクラ,東Ｐ,5259.0,-381.0,-6.76%,18895100,23.4,4.17,1.272809,キユーピー,東Ｐ,3370.0,-241.0,-6.67%,2129400,22.6,1.57,1.60にほんブログ村
2024年11月26日
閲覧総数 10
-
6
python sfepy 円孔の応力集中
単位系: mm,N,MPa半径30の円孔がある200x200の平板を1/4対称としてモデル化。これをY方向に20MPaで引っ張る。円孔の応力集中係数は3なので、円の縁に60MPaの最大応力が発生する。↓計算実行時のメッセージpyontaku14@pyontaku14-virtual-machine:~/sfepy/work_dir/plate_hole$ ../../simple.py plate_hole.pysfepy: left over: ['verbose', '__builtins__', '__file__', '__name__', 'stiffness_from_youngpoisson', 'steel', 'data_dir', 'refinement_level', 'young', 'lame_from_youngpoisson', '__package__', 'stress_strain', 'refine_mesh', 'output_dir', 'poisson', '_filename', '__doc__']sfepy: reading mesh [line2, tri3, quad4, tetra4, hexa8] (/home/pyontaku14/sfepy/work_dir/plate_hole/plate_hole.mesh)...sfepy: ...done in 0.00 ssfepy: creating regions...sfepy: Loadsfepy: Omegasfepy: Y-symsfepy: X-symsfepy: ...done in 0.01 ssfepy: equation "balance_of_forces":sfepy: dw_lin_elastic_iso.2.Omega(steel.lam, steel.mu, v, u ) = dw_point_load.0.Load(Load.val, v)sfepy: using solvers: ts: no ts nls: newton ls: lssfepy: updating variables...sfepy: ...donesfepy: setting up dof connectivities...sfepy: ...done in 0.00 ssfepy: matrix shape: (644, 644)sfepy: assembling matrix graph...sfepy: ...done in 0.00 ssfepy: matrix structural nonzeros: 10640 (2.57e-02% fill)sfepy: updating materials...sfepy: steelsfepy: Loadsfepy: ...done in 0.00 ssfepy: nls: iter: 0, residual: 4.358899e+02 (rel: 1.000000e+00)sfepy: rezidual: 0.00 [s]sfepy: solve: 0.01 [s]sfepy: matrix: 0.00 [s]sfepy: nls: iter: 1, residual: 1.465871e-11 (rel: 3.362938e-14)sfepy: equation "tmp":sfepy: ev_cauchy_strain.2.Omega(u)sfepy: updating materials...sfepy: ...done in 0.00 ssfepy: equation "tmp":sfepy: ev_cauchy_stress.2.Omega(steel.D, u)sfepy: updating materials...sfepy: steelsfepy: ...done in 0.00 spyontaku14@pyontaku14-virtual-machine:~/sfepy/work_dir/plate_hole$ にほんブログ村
2015年07月05日
閲覧総数 1053
-
7
VBSでエクセルのVBAに引数を渡す
エクセルVBAに引数を渡してバッチ実行する方法を探したところ、間接的ではあるが、VBSに引数をエクセルのセルに書き込ませ、そのセルの引数をエクセルVBAに読ませて実行する方法があった。↓参考リンクhttp://d.hatena.ne.jp/chaichanPaPa/20060922/1158924629これまで、エクセルVBA内で3500くらいの処理をさせると途中で止まってしまって困っていた。仕方がないので、100くらいのループをバッチ実行させるようにするとうまくいった。にほんブログ村
2015年02月12日
閲覧総数 13072
-
8
python 画像のダウンロードと複数画像を並べる
株価3ヶ月チャート画像をダウンロードして5x10=50個ずつ並べるスクリプトを書いてみた。-----ここから # -*- coding: utf-8 -*-import urllib2from PIL import Image#yahooファイナンスから３ヶ月チャート画像をダウンロードして50個ずつ並べるdef download(url, path): fp = urllib2.urlopen(url) local = open(path + code+'.jpg', 'wb') local.write(fp.read()) local.close() fp.close()def paste(code, h, v, k): img = Image.open(str(code)+'.jpg', 'r') canvas.paste(img, (((k-1)%5)*h, ((k-1)//5)*v))f=open('codes_150926.csv', 'r') #銘柄コードi=0j=1k=0h=512 #水平ピクセルv=310 #垂直ピクセル# マージに利用する下地画像を作成するcanvas = Image.new('RGB', (5*h, 10*v), (255, 255, 255))for code in f: code=code.rstrip() i+=1 k=i-50*(j-1) print code, k url='http://chart.yahoo.co.jp/?code='+str(code)+'.T&tm=3m&type=c&log=off&size=m&over=m65,m130,s&add=v&comp=' download(url, './') paste(code, h, v, k) if i==50*j: # 保存 canvas.save('c'+str(j)+'.jpg', 'JPEG', quality=100, optimize=True) canvas.close() canvas = Image.new('RGB', (5*h, 10*v), (255, 255, 255)) j+=1canvas.save('c'+str(j)+'.jpg', 'JPEG', quality=100, optimize=True)canvas.close()f.close()-----ここまで ↓結果はこんな感じ codes_150926.csvは以下のような銘柄コードのリスト。 1301 1332 1333 … 9995 9996 9997 画像ダウンロードは、以下の関数で実施。def download(url, path): fp = urllib2.urlopen(url) local = open(path + code+'.jpg', 'wb') local.write(fp.read()) local.close() fp.close() pillowというモジュールで画像の編集がいろいろとできる。画像を並べるのは以下の関数で実施。def paste(code, h, v, k): img = Image.open(str(code)+'.jpg', 'r') canvas.paste(img, (((k-1)%5)*h, ((k-1)//5)*v)) ↓参考URLhttp://blog.takkinoue.com/entry/2015/04/04/171000https://librabuch.jp/2013/05/python_pillow_pil/ にほんブログ村
2015年09月26日
閲覧総数 4590
-
9
pythonでpptxのテキストをgoogle翻訳して置換する
大量の英語のパワーポイントを日本語訳する必要があり、このpythonスクリプトを書いてみた。googletransというgoogle翻訳のpythonモジュールがあった。バージョンは4.0.0-rc1指定でないとうまく動作しないようだ。サンプルのpptxは以下https://scholar.harvard.edu/files/torman_personal/files/samplepptx.pptxコードは以下、実質23行。-----"""Apply Google translation to pptxtqdm, googletrans and pptx are necessary in advance.pip install tqdmpip install googletrans==4.0.0-rc1pip install python-pptx"""import timeimport tqdmfrom googletrans import Translatorfrom pptx import Presentationsta=time.time()#driver launchtranslator = Translator()prsname="samplepptx"prs = Presentation(prsname+".pptx")for slide in tqdm.tqdm(prs.slides): for shape in slide.shapes: if shape.has_text_frame: try: changed=translator.translate(shape.text, dest='ja', src='en').text shape.text = shape.text.replace(shape.text,changed) except: passprs.save(prsname+"_JP1.pptx")fin=time.time()print (f"elapsed time:{fin-sta} sec")-----お役に立てれば幸いです。にほんブログ村
2022年01月13日
閲覧総数 776
-
10
パワーポイント 画像挿入 マクロ VBA
大量の画像をパワーポイントに貼付ける必要があり、"ppt 画像挿入 マクロ"でググると以下のサイトが見つかった。https://www.ka-net.org/blog/?p=8228これを少し編集し、タイトルにファイルパス、テキストとして"サンプル"を挿入するようにしてみた。画像はpngのみを対象としている。1つのスライドに1枚の画像が挿入される。-----ここからSub InsertImages()'指定したフォルダ内の画像ファイルを一括挿入 Dim prs As PowerPoint.Presentation Dim sld As PowerPoint.Slide Dim shp As PowerPoint.Shape Dim txt As PowerPoint.Shape Dim tmp As PowerPoint.PpViewType Dim fol As Object, f As Object Dim fol_path As String '開いているプレゼンテーションをprsに格納 Set prs = ActivePresentation 'スライドショー表示になっていたら解除 If SlideShowWindows.Count > 0 Then prs.SlideShowWindow.View.Exit With ActiveWindow tmp = .ViewType 'ウィンドウの表示モード記憶 .ViewType = ppViewSlide End With '画像フォルダ取得 Set fol = CreateObject("Shell.Application") _ .BrowseForFolder(0, "画像フォルダ選択", &H10, 0) If fol Is Nothing Then GoTo Fin fol_path = fol.Self.Path 'フォルダ内のファイル処理 With CreateObject("Scripting.FileSystemObject") If Not .FolderExists(fol_path) Then GoTo Fin For Each f In .GetFolder(fol_path).Files 'PNGファイルのみ処理 Select Case LCase(.GetExtensionName(f.Path)) Case "png" 'スライド追加 Set sld = prs.Slides.Add(prs.Slides.Count + 1, ppLayoutChartAndText) sld.Select '画像挿入 Set shp = sld.Shapes.AddPicture(FileName:=f.Path, _ LinkToFile:=False, _ SaveWithDocument:=True, _ Left:=0, _ Top:=0) With shp .LockAspectRatio = True '縦横比を固定 .Select '画像サイズ変更 .Width = .Width * 0.85 .Height = .Height * 0.85 End With '画像をスライド中央に配置 With ActiveWindow.Selection.ShapeRange .Align msoAlignCenters, True .Align msoAlignMiddles, True End With End Select'スライドタイトルをファイルパスに変更 sld.Shapes(1).TextFrame.TextRange.Text = f.Path 'テキスト挿入 Set txt = sld.Shapes.AddTextbox( _ Orientation:=msoTextOrientationHorizontal, _ Left:=600, _ Top:=50, _ Width:=250, _ Height:=10) With txt .Name = "AddedTextBox" .TextFrame.TextRange = "サンプル" .TextEffect.FontSize = 20 End With Next End WithFin: ActiveWindow.ViewType = tmp 'ウィンドウの表示モードを元に戻すEnd Sub-----ここまでお役に立てば幸いです。にほんブログ村
2018年01月26日
閲覧総数 13433
-
11
両親がうちに来てくれた
両親のツアーの最終日。最初、ぼくが車でホテルまで迎えに行くと言っていたけれど、両親が電車でうちの近くまで来てくれるといってくれて、だいぶ助かった。最寄りの駅まで車で迎えに行き、うちまで来てもらった。うちで1時間ほどお茶をのみ、話をした。帰りの飛行機が早くなり、14:30に空港集合ということだった。10:50に予約していたレストランに車で向かった。11:00から12:00すぎまでコース料理のランチを食べた。どれもとてもおいしかった。12:00すぎにレストランから羽田空港に向けて出発した。拍子抜けするほど渋滞はなく、順調に進み、1時間ほどで空港に着いた。13:10くらいに両親を羽田空港第一ターミナルでおろして別れた。帰りはゆっくり一般道で2時間くらいかかって家に着いた。両親の飛行機は乗客の荷物トラブルで出発が50分遅れたようだけれど、無事に家に着いたということだった。両親と会えるのももうそんなに多くないので、一緒にいる時間を大切にしたい。にほんブログ村
2024年11月23日
閲覧総数 12
-
12
四季報の分析
四季報の情報をエクセルにとりこんで、純利益の増加率=2014年予想/2013年-1の降順でソートしてみました。その結果、以下が期待できそうでした。2488,日本サード,ジャスダック,サービス1939,四電工,東証１部,建設3271,グローバル社,東証２部,不動産今後の参考にしたいと思います。にほんブログ村
2013年06月15日
閲覧総数 37
-
13
エクセルVBAでpdfをダウンロード
以下の74の論文をダウンロードする必要に迫られ、"エクセルVBA pdfダウンロード"でググると参考になるサイトが見つかった。http://www.dynalook.com/9th-european-ls-dyna-conferenceそれを編集して、以下のコードを書き、無事、自動ですばやくすべての論文をダウンロードできた。-----ここからOption ExplicitDeclare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long 'API宣言Sub sample()Dim i As IntegerDim folder As StringDim url As StringDim file As Stringfolder = "C:\test\" '保存フォルダ(最後は\に)For i = 1 To 74 url = Cells(2 * i + 2, 1) file = Mid(url, InStrRev(url, "/") + 1) & ".pdf" 'ファイル名(urlの最後の"/"の後ろ(???.pdf)) URLDownloadToFile 0, url, folder & file, 0, 0 'ファイルダウンロードNextEnd Sub-----ここまでCドライブ直下にtestフォルダを用意する必要がある。ここにpdfが保存される。Sheet1には、上のサイトのpdfのurlを1行おきにコピペしている。↓参考にしたコードはこれ。非常に役に立った。感謝http://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q13101543148にほんブログ村
2013年06月26日
閲覧総数 4030
-
14
アキレス腱手術のための入院 1日目
今日から聖マリアンナ医科大学病院に入院することになった。手術は明日なので、午後からかと思っていたら、朝10:30くらいには来るように、とのことだった。入院のための書類を確認し、上履きと着替えなどをたくさんバッグに詰め込んで、9:20に自宅を出発し、10:15くらいに着いた。入退院フロントで受け付けてもらい、入院病棟に入った。入院病棟の入口にはインターフォンがあり、自由に入れないようになっていた。午前と午後に看護師さんから採血と手術、シャワー、トイレなど設備について説明があった。手術は9:30から2時間30分の予定。全身麻酔で麻酔から覚めるのは午後くらいということだった。明日は、朝、昼、晩、3食とも食べられない。。「入院のご案内」冊子には、上履き、T字体、前開きのパジャマが必要ということだったが、必ずしも必要ないということだった。パジャマ、わざわざ買ったんだけどな。。上履きもバッグに入れるとかさばるし。。↓ランチ↓入院病棟からの景色。退院したら、2度と見ることはないかもしれない。（ないことを願う）↓ディナー。メインは魚のマヨネーズ焼き。退院時期は傷の治り具合によるということで、1~2週間の予定。夕食後、手術を終えたばかりの担当のお医者さんが来てくれて、手術する側の左足の膝にマーキングし(右足とまちがわないように)、左足のアキレス腱の張り具合を確認してくれた。伸びているアキレス腱を縮めて縫い付ける手術とのこと。左足1本でかかとを十分に上げられず、走るのにも支障があることを確認した。これまで、しっかり診てくれてきたので、きっと良くなるはず！↓怪我をしたときの記事https://plaza.rakuten.co.jp/takupin/diary/202304090001/↓MRI画像https://plaza.rakuten.co.jp/takupin/diary/202310160001/にほんブログ村
2023年12月12日
閲覧総数 590
-
15
サッカーの主審
残念ながら自分たちの試合は人数が集まらず不戦敗になってしまったが審判はやらなくてはならない。ほかに空いていいる人がいなかったため、主審をやった。だいぶ主審にもなれてきたが、もう少し審判スキルを上げたい。にほんブログ村
2024年10月14日
閲覧総数 16
-
16
本日の急騰・急落株
コード,銘柄名,市場,株価,前日比,前日比.1,出来高,ＰＥＲ,ＰＢＲ,利回り3275,ハウスコム,東Ｓ,1314.0,300.0,+29.59%,186100,20.2,1.42,0.767603,マックハウス,東Ｓ,230.0,50.0,+27.78%,1674300,－,1.67,－3562,Ｎｏ．１,東Ｓ,1649.0,334.0,+25.40%,1215000,19.5,2.65,2.122715,エレマテック,東Ｐ,2105.0,400.0,+23.46%,69300,14.4,1.24,1.903628,データＨＲ,東Ｇ,437.0,80.0,+22.41%,226000,－,1.78,－7908,ＫＩＭＯＴＯ,東Ｓ,298.0,54.0,+22.13%,17802400,19.1,0.74,2.013844,コムチュア,東Ｐ,2280.0,400.0,+21.28%,604800,22.4,4.29,2.112586,フルッタ,東Ｇ,211.0,37.0,+21.26%,54629600,－,11.16,－269A,Ｓａｐｅｅｔ,東Ｇ,3010.0,500.0,+19.92%,525000,－,27.89,－241A,ＲＯＸＸ,東Ｇ,1406.0,229.0,+19.46%,250800,－,40.1,－3041,ビューテＨＤ,東Ｓ,502.0,80.0,+18.96%,317700,29.2,3.75,1.793793,ドリコム,東Ｇ,886.0,123.0,+16.12%,13648700,－,5.47,－4664,ＲＳＣ,東Ｓ,1100.0,150.0,+15.79%,22900,39.7,1.52,2.002212,山パン,東Ｐ,3092.0,410.5,+15.31%,4904000,16.8,1.55,1.23244A,グロースｘＰ,東Ｇ,3850.0,455.0,+13.40%,613800,27.4,6.58,－コード,銘柄名,市場,株価,前日比,前日比.1,出来高,ＰＥＲ,ＰＢＲ,利回り1485,ＭＸ前向き,東Ｅ,42730.0,-9270.0,-17.83%,2,－,－,－1436,グリーンエナ,東Ｇ,2418.0,-500.0,-17.14%,171600,27.4,1.98,0.542936,ベースフード,東Ｇ,529.0,-100.0,-15.90%,11590100,－,70.91,－3121,マーチャント,東Ｓ,308.0,-54.0,-14.92%,373600,34.7,2.20,0.652175,エスエムエス,東Ｐ,1844.5,-299.0,-13.95%,4422000,19.5,3.47,－4506,住友ファーマ,東Ｐ,537.0,-83.0,-13.39%,16370800,－,1.87,－7205,日野自,東Ｐ,406.1,-62.5,-13.34%,22505300,－,1.29,－7265,エイケン工業,東Ｓ,3175.0,-485.0,-13.25%,30700,16.6,0.56,3.469552,Ｍ＆Ａ総研,東Ｐ,2408.0,-333.0,-12.15%,4322000,20.8,15.60,－7827,オービス,東Ｓ,1456.0,-194.0,-11.76%,103000,6.1,0.48,4.337640,トップカルチ,東Ｓ,145.0,-18.0,-11.04%,255300,－,1.18,－3529,アツギ,東Ｓ,808.0,-94.0,-10.42%,415300,8.1,0.39,－7831,ウイルコＨＤ,東Ｓ,126.0,-14.0,-10.00%,240000,31.0,0.77,1.593936,ＧＷ,東Ｇ,131.0,-14.0,-9.66%,2301900,83.4,5.45,－9251,ＡＢ＆Ｃ,東Ｇ,903.0,-96.0,-9.61%,288800,10.6,1.55,3.11にほんブログ村
2024年10月30日
閲覧総数 32
-
17
北鎌倉の下見
今月下旬に北海道から両親が来るので、北鎌倉、江の島を案内しようと思い、下見をすることにした。自宅を8:37に車で出発し、両親が宿泊予定のアパホテル＆リゾート〈横浜ベイタワー〉に9:45くらいに着いた。ここから北鎌倉に向かった。ホテルから北鎌倉までは、25kmくらいで1時間くらいかかった。北鎌倉には以下のお寺があるようだ。https://kamakuratoday.com/plan/modelplan_3.htmlこのうち、大きな円覚寺と建長寺を見ることにした。円覚寺には駐車場がなく、近くのコインパーキングに駐車した。11:10くらいから円覚寺をみた。↓円覚寺↓建長寺建長寺には駐車場があった。お寺を観光すると、一か所１時間くらいかかった。14:15くらいに建長寺を出発し、江の島に向かった。建長寺から江の島までは10kmくらいだけれど、江の島付近がひどい渋滞で、つくと15:15くらいになり、駐車場も混んでいて、車から降りることなく江の島をあとにした。江の島から再びアパホテル＆リゾート〈横浜ベイタワー〉に向かい、17:00すぎくらいだった。だいぶ、様子がわかったので、これをもとに両親が来たときに観光案内をしようっと。にほんブログ村
2024年11月03日
閲覧総数 29
-
18
本日の急騰・急落株
コード,銘柄名,市場,株価,前日比,前日比.1,出来高,ＰＥＲ,ＰＢＲ,利回り6548,旅工房,東Ｇ,210.0,50.0,+31.25%,466800,－,1.91,－6659,メディアＬ,東Ｓ,102.0,24.0,+30.77%,27200500,425,1.92,－8219,青山商,東Ｐ,1634.0,300.0,+22.49%,122200,9.0,0.47,7.776560,ＬＴＳ,東Ｐ,2211.0,400.0,+22.09%,102100,10.2,2.41,1.364955,アグロカネシ,東Ｓ,1689.0,300.0,+21.60%,7500,29.2,1.02,0.956481,ＴＨＫ,東Ｐ,3080.0,500.0,+19.38%,629000,31.2,1.03,－5139,オープンＷ,東Ｇ,644.0,100.0,+18.38%,392800,20.1,2.13,－269A,Ｓａｐｅｅｔ,東Ｇ,4610.0,700.0,+17.90%,779000,－,3.91,－4448,ｋｕｂｅｌｌ,東Ｇ,654.0,98.0,+17.63%,1770100,－,9.87,－4168,ヤプリ,東Ｇ,851.0,127.0,+17.54%,1270600,15.8,5.49,－3877,中越パ,東Ｐ,1417.0,207.0,+17.11%,553000,5.4,0.32,4.946033,エクストリム,東Ｇ,1299.0,187.0,+16.82%,366700,6.5,1.32,3.089260,ウィズメタク,東Ｐ,1927.0,274.0,+16.58%,2828300,20.6,1.03,1.044259,エクサＷｉｚ,東Ｇ,400.0,56.0,+16.28%,5076900,－,7.28,－5138,リベース,東Ｇ,1193.0,167.0,+16.28%,94100,21.6,4.97,－コード,銘柄名,市場,株価,前日比,前日比.1,出来高,ＰＥＲ,ＰＢＲ,利回り5025,マーキュリー,東Ｇ,790.0,-291.0,-26.92%,517400,44.2,2.77,－6324,ハーモニック,東Ｓ,2149.0,-500.0,-18.88%,1185000,－,2.52,0.933659,ネクソン,東Ｐ,2123.5,-449.0,-17.45%,15240200,16.6,1.77,1.062156,セーラー広告,東Ｓ,424.0,-82.0,-16.21%,266000,－,1.0,1.427794,ＥＤＰ,東Ｇ,700.0,-132.0,-15.87%,372800,－,2.11,－9340,アソインター,東Ｓ,1150.0,-214.0,-15.69%,113500,13.4,2.1,3.486458,新晃工,東Ｐ,3830.0,-700.0,-15.45%,657300,12.6,1.53,3.922173,博展,東Ｇ,542.0,-98.0,-15.31%,693000,10.3,2.87,3.143788,ＧＭＯ－ＧＳ,東Ｐ,2528.0,-409.0,-13.93%,104100,34.7,3.27,1.443077,ホリイフード,東Ｓ,380.0,-60.0,-13.64%,723800,18.7,11.58,－1491,中外鉱,東Ｓ,33.0,-5.0,-13.16%,7651900,8.1,1.2,－2342,トランスＧＧ,東Ｇ,207.0,-31.0,-13.03%,297100,－,0.61,－8918,ランド,東Ｓ,7.0,-1.0,-12.50%,128778400,11.7,1.26,－3769,ＧＭＯ－ＰＧ,東Ｐ,7557.0,-1075.0,-12.45%,1753000,31.0,5.57,1.642304,ＣＳＳ,東Ｓ,803.0,-113.0,-12.34%,65300,8.9,1.5,3.74にほんブログ村
2024年11月13日
閲覧総数 18
-
19
サッカーの試合
多摩市O40のリーグ戦の最終戦だった。この季節にしては暑いくらいの晴天だった。4-2-3-1の右サイドバックで30分間出場だった。前半、相手のフリーキックからショートパスを出され、そこからのシュートが入り失点。後半も相手の抜け出しから失点してしまい、負けてしまった。こちらは、あまりシュートチャンスも作れず、あまりいい内容ではなかった。-----It was the final match of the Tama City O40 league.The weather was unusually warm for this season, with clear skies.I played for 30 minutes as the right sideback in a 4-2-3-1 formation.In the first half, we conceded a goal from a short pass off an opponent's free kick, leading to a shot.In the second half, we allowed another goal after an opponent broke through our defense, resulting in a loss.We couldn't create many shooting opportunities, and overall, it wasn't a great performance.にほんブログ村
2024年11月17日
閲覧総数 40
-
20
本日の急騰・急落株
コード,銘柄名,市場,株価,前日比,前日比.1,出来高,ＰＥＲ,ＰＢＲ,利回り3825,リミックス,東Ｓ,416,80,+23.81%,32272900,73.1,2.72,－5035,ＨＯＵＳＥＩ,東Ｇ,470,80,+20.51%,35800,54.8,1.06,0.649161,ＩＤ＆ＥＨＤ,東Ｐ,6480,1100,+20.45%,943000,13.4,1.17,－4583,カイオム,東Ｇ,180,30,+20.00%,63736100,－,9.36,－3747,インタートレ,東Ｓ,441,69,+18.55%,4784100,317,2.6,－4784,ＧＭＯ－ＡＰ,東Ｓ,661,100,+17.83%,184800,193,2.08,1.047068,ＦフォースＧ,東Ｇ,532,80,+17.70%,1121800,11.5,5.01,1.887362,Ｔ．Ｓ．Ｉ,東Ｇ,1059,150,+16.50%,405800,14.7,1.27,－4499,スピー,東Ｓ,4960,700,+16.43%,16400,－,9.77,－4935,リベルタ,東Ｓ,1193,162,+15.71%,2025700,96.4,4.71,0.75260A,オルツ,東Ｇ,759,100,+15.17%,5837400,－,34.61,－4597,ソレイジア,東Ｇ,50,6,+13.64%,23929300,－,4.93,－3696,セレス,東Ｐ,2640,311,+13.35%,2694000,25.3,3.11,1.524772,ストリームＭ,東Ｇ,131,14,+11.97%,2906000,26.3,2.36,－190A,コーディア,東Ｇ,249,26,+11.66%,5058800,－,4.08,－コード,銘柄名,市場,株価,前日比,前日比.1,出来高,ＰＥＲ,ＰＢＲ,利回り4833,Ｄｅｆコン,東Ｇ,95,-14,-12.84%,10231300,－,5.11,－6573,アジャイル,東Ｇ,98,-14,-12.50%,3354200,－,40.66,－3672,オルトＰ,東Ｓ,91,-10,-9.90%,907000,－,2.56,－265A,Ｈｍｃｏｍｍ,東Ｇ,1404,-149,-9.59%,620600,54.5,3.66,－2134,北浜ＣＰ,東Ｓ,20,-2,-9.09%,24419100,87.0,4.26,－4894,クオリプス,東Ｇ,5180,-500,-8.80%,1994800,－,7.45,－6278,ユニオンツル,東Ｐ,5240,-500,-8.71%,370000,20.1,1.30,1.721773,ＹＴＬ,東Ｐ,61,-5,-7.58%,128000,－,－,－5939,大谷工業,東Ｓ,6100,-490,-7.44%,25300,17.6,1.22,0.494419,フィナＨＤ,東Ｇ,960,-75,-7.25%,492700,272,5.73,－244A,グロースｘＰ,東Ｇ,2280,-173,-7.05%,239000,16.3,3.92,－4166,かっこ,東Ｇ,714,-54,-7.03%,80300,－,2.20,－2150,ケアネット,東Ｐ,608,-45,-6.89%,234900,17.6,2.35,1.97269A,Ｓａｐｅｅｔ,東Ｇ,3210,-235,-6.82%,117100,74.4,29.38,－7074,２４セブン,東Ｇ,280,-20,-6.67%,3873300,－,－,－にほんブログ村
2024年11月22日
閲覧総数 38
-
21
フットサルの練習
八王子のFUNフットサルで練習。ちょっと寒かったけれど、晴れで、いいコンディションだった。18人が参加し、6人のチームを3つ作ってゲームを回した。相手がうまくて、なかなか勝てなかった。ぼくも決定機をポストにあててしまい、得点できなかった。-----We practiced futsal at FUN Futsal in Hachioji. It was a little cold but pleasant, making for great conditions to play futsal. Sixteen people participated, and we formed three teams of six players each to rotate games. The opponents were highly skilled, and we could hardly beat them. Personally, I missed a clear chance and hit the post, so I didn’t score.にほんブログ村
2024年11月23日
閲覧総数 21
-
22
両親と江の島観光
北海道の両親が11/20から4日間、以下の東京、横浜ツアーに参加した。1日目は東京スカイツリーや柴又でうなぎをたべたりしたようだ。ホテルは横浜みなとみらいのアパリゾートだった。2日目は山下公園など横浜観光をしたようだ。3日目は、ぼくは休みをとって、一緒に江の島観光をした。朝7:50自宅を車で出発ひどい渋滞で高速を使っても9:40くらいにホテルに着いた。両親を車に乗せて江の島へ。横浜新道を通って最初は順調だったけれど、すぐに渋滞につかまり江の島についたのは11:30くらいだった。平日のせいか江の島の駐車場が空いていて助かった。すぐに昼食を食べた。昼前なので席があって海鮮丼やしらす丼を食べられた。昼食後、仲見世通りから展望台に向かった。↓途中の江島神社 辺津宮（へつのみや）↓展望台からの景色展望台から降りて、江ノ島水族館に車で移動した。水族館も平日のせいか、割と人が少なく、じっくりと水槽を見ることができた。江ノ島水族館を15:15に出発し、ホテルに向かった。17:06ホテルの駐車場に着いた。両親は夕食はあまり食べないということだったので、ホテルのファミリーマートのイートインで太巻きなどを食べた。明日は、両親がうちに来てくれる。にほんブログ村
2024年11月22日
閲覧総数 31
-
23
業種ごとの時価総額No.1銘柄
四季報2019年12月発売号から業種ごとの時価総額No.1銘柄を確認しました。いわゆる東証33業種ではなく、より実際の事業内容に近い業種が四季報には書かれています。その数60ほど。業種ごとのNo.1に分散投資するときの参考になれば幸いです。銘柄コード 銘柄名 業種1721 コムシスホールディングス(株) 設備工事 時価総額順位 1/48社1801 大成建設(株) 建設・土木 時価総額順位 1/120社1925 大和ハウス工業(株) 住宅建設 時価総額順位 1/35社2502 アサヒグループホールディングス(株) 飲料 時価総額順位 1/22社2914 ＪＴ 食品 時価総額順位 1/167社3141 ウエルシアホールディングス(株) ドラッグストア 時価総額順位 1/15社3288 (株)オープンハウス 不動産（住宅） 時価総額順位 1/93社3382 (株)セブン＆アイ・ホールディングス コンビニ・食品小売り 時価総額順位 1/44社3591 (株)ワコールホールディングス アパレル・アクセサリー 時価総額順位 1/71社3861 王子ホールディングス(株) 紙・パルプ製品・他素材 時価総額順位 1/53社4063 信越化学工業(株) 化学 時価総額順位 1/161社4452 花王(株) トイレタリー・化粧品 時価総額順位 1/27社4502 武田薬品工業(株) 医薬品 時価総額順位 1/38社4543 テルモ(株) ヘルスケア製品・サービス 時価総額順位 1/128社4587 ペプチドリーム(株) バイオテクノロジー 時価総額順位 1/39社4661 (株)オリエンタルランド 外食・娯楽サービス 時価総額順位 1/158社4689 Ｚホールディングス(株) メディア 時価総額順位 1/121社4716 日本オラクル(株) パッケージソフト 時価総額順位 1/66社5020 ＪＸＴＧホールディングス(株) 燃料・資源 時価総額順位 1/44社5108 (株)ブリヂストン タイヤ・ゴム 時価総額順位 1/9社5332 ＴＯＴＯ(株) 住宅設備・機器 時価総額順位 1/58社5401 日本製鉄(株) 鉄鋼 時価総額順位 1/49社5713 住友金属鉱山(株) 非鉄金属・金属製品 時価総額順位 1/31社6098 (株)リクルートホールディングス 他産業サービス・製品 時価総額順位 1/240社6178 日本郵政(株) 金融サービス 時価総額順位 1/43社6301 コマツ 建設農業機械・産業車両 時価総額順位 1/56社6367 ダイキン工業(株) 設備機器・部品 時価総額順位 1/119社6501 (株)日立製作所 総合電機 時価総額順位 1/5社6586 (株)マキタ 建設関連製品・設備 時価総額順位 1/77社6758 ソニー(株) 民生用エレクトロニクス 時価総額順位 1/12社6861 (株)キーエンス 電子部品・産業用電子機器 時価総額順位 1/242社6902 (株)デンソー 自動車部品 時価総額順位 1/126社6954 ファナック(株) 産業機械 時価総額順位 1/135社7186 (株)コンコルディア・フィナンシャルグループ 地方銀行 時価総額順位 1/78社7203 トヨタ自動車(株) 自動車 時価総額順位 1/8社7741 ＨＯＹＡ(株) 電子デバイス製造装置 時価総額順位 1/59社7751 キヤノン(株) 事務機器 時価総額順位 1/24社7956 ピジョン(株) 他個人サービス・製品 時価総額順位 1/99社7974 任天堂(株) 娯楽用品 時価総額順位 1/48社8058 三菱商事(株) 総合商社 時価総額順位 1/8社8252 (株)丸井グループ 百貨店 時価総額順位 1/12社8267 イオン(株) 総合スーパー 時価総額順位 1/9社8306 (株)三菱ＵＦＪフィナンシャル・グループ 大手銀行 時価総額順位 1/10社8572 アコム(株) リース・消費者金融 時価総額順位 1/20社8604 野村ホールディングス(株) 証券・先物 時価総額順位 1/49社8750 第一生命ホールディングス(株) 生命保険 時価総額順位 1/5社8766 東京海上ホールディングス(株) 損害保険 時価総額順位 1/6社8802 三菱地所(株) 不動産（非住宅） 時価総額順位 1/58社9022 東海旅客鉄道(株) 鉄道 時価総額順位 1/25社9062 日本通運(株) 倉庫・運輸サービス 時価総額順位 1/49社9104 (株)商船三井 海運 時価総額順位 1/14社9143 ＳＧホールディングス(株) 陸運 時価総額順位 1/27社9202 ＡＮＡホールディングス(株) 旅客航空輸送 時価総額順位 1/3社9432 日本電信電話(株) 通信サービス 時価総額順位 1/105社9503 関西電力(株) 電力 時価総額順位 1/13社9531 東京ガス(株) ガス 時価総額順位 1/9社9613 (株)ＮＴＴデータ ＳＩ・ソフトウエア開発 時価総額順位 1/194社9831 (株)ヤマダ電機 家電・コンピュータ小売り 時価総額順位 1/13社9843 (株)ニトリホールディングス 他消費財小売り 時価総額順位 1/122社9983 (株)ファーストリテイリング 衣料小売り 時価総額順位 1/38社業種ごとの企業数は以下。合計は3757社。にほんブログ村
2019年12月29日
閲覧総数 1482
-
-
- 楽天ブックス
- Comic ZERO-SUM (コミック ゼロサム)…
- (2024-11-27 18:03:21)
-
-
-
- 連載小説を書いてみようｖ
- 白い沈黙
- (2024-11-26 21:30:07)
-
-
-
- NARUTOが好きな人、投稿はここだって…
- duta89 link daftar terbaik dengan …
- (2024-09-11 01:49:11)
-
