股票交割单制作excel模板可以轻松的帮助你快速的制作出你需要的各种各样的excel表单,现在有需要的朋友就可以马上的来下载股票交割单制作excel模板!疯狂怪兽车(Crazy Monster Car)2.0 安卓版
股票交割单的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
股票交割单怎么看佣金
假如以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(四舍五入)
现在每股成本应该是买入总金额加手续费的和除以买入总股数。
展开

剑踪情缘手游试玩
网络赚钱背景
全职妈妈兼职做什么
美团送一单能赚多少钱
棋牌游戏代理广告设计
青浦棋牌安卓版
舞厅老师带舞赚钱吗
csgo商人怎么赚钱
试玩赚钱一下就没了
哪个手机软件走步赚钱
在家有哪些赚钱方法
有料分享赚钱暴利行业
有啥软件能赚钱的
贪玩真的能赚钱吗
长春民办高校招聘兼职教师
怎样一分钟赚一块钱
知否棋牌规则大全
卓越棋牌下载
网上赚钱方法大全http
主播兼职协议书