股票交割单制作excel模板可以轻松的帮助你快速的制作出你需要的各种各样的excel表单,现在有需要的朋友就可以马上的来下载股票交割单制作excel模板!平安好医生可以提现吗
股票交割单怎么看佣金
假如以13.14的价格买入一只股票2000股,然后又以13.17的价格买入3000股,后来又以13.15的价格买入2900股(买的是同一只股票),则具体的计算方法可以如下:
证券交易是要收一定收手续费(也就是佣金)的,比如广发证券有的是收千分之三,有的是千分之一,还有万分之八的(具体是要看开户的证券公司是怎么定)。还要卖出股票要交税,另外,还有过户费(每1000股一元)。这些支出费用也会算入股票成本里。
所以,我不知道交易手续费是多少,现以千分之一的手续费计算。具体如下:
买入金额:13.14*2000=26280,手续费:26280*0.001=26.28
买入金额:13.17*3000=39510,手续费:39510*0.001=39.51
买入金额:13.15*2900=38135,手续费:38135*0.001=38.14(四舍五入)
现在每股成本应该是买入总金额加手续费的和除以买入总股数。
股票交割单的EXCEL统计代码
Subsumm() DimnrowAsInteger DimnnAsInteger DimiAsInteger DimsumallAsSingle DimnplusAsInteger DimsumplusAsSingle DimtempAsSingle DimstAsLong DimenAsLong i=2 temp=0 st=Range("a2") DoWhileCells(i,4)<>"" IfCells(i,4)="买入"Thentemp=temp-Cells(i,5) IfCells(i,4)="卖出"Thentemp=temp+Cells(i,5) If(Cells(i,4)="买入")And(Cells(i+1,4)="卖出")Then_ en=Range("a"&(i+1)) If(Cells(i,4)="卖出")And((Cells(i+1,4)="买入")_ Or(Cells(i+1,4)=""))Then Cells(i,10)=st&"-"&en st=Range("a"&(i+1)) Cells(i,11)=temp temp=0 EndIf i=i+1 Loop nrow=Range("k65536").End(xlUp).Row If(WorksheetFunction.Max(Range("k2","k"&nrow))>0)Then Range("m2")=WorksheetFunction.Max(Range("k2","k"&nrow)) Else:Range("m2")=0 EndIf If(WorksheetFunction.Min(Range("k2","k"&nrow))<0)Then Range("m3")=WorksheetFunction.Min(Range("k2","k"&nrow)) Else:Range("m2")=0 EndIf sumall=WorksheetFunction.Sum(Range("k2","k"&nrow)) Range("m4")=sumall nn=WorksheetFunction.CountA(Range("k2","k"&nrow)) Fori=2Tonrow If(Range("k"&i)>0)Then nplus=nplus+1 sumplus=sumplus+Range("k"&i) EndIf Nexti Range("m5")=sumplus/nn Range("m6")=(sumall-sumplus)/(nn-nplus) Range("m7")=sumplus/nplus EndSub
展开

最赚钱的手机网络兼职
奇亚币怎么提现
无极棋牌手机版彬彬有励
注册app赚钱
在花样主播赚钱吗
月入43万的野路子
b站变现方式
宁波市区兼职会计招聘
手机赚钱软件平台
网上聊天兼职的平台
石景山远洋山水兼职女
消消乐赚钱软件
形象设计有限公司兼职
剑雨江湖小号赚钱
修电脑和修手机哪个赚钱
近期赚钱好项目0
自动看广告赚钱赚客族
大玩家拉霸棋牌
体育平台送注册金
赚捕鱼游戏币