怎麼下載一隻股票的實時成交

⑴ 鑳藉熺湅鑲＄エ瀹炴椂琛屾儏鐨勮蔣浠舵湁鍝浜

1銆侀洩鐞冭偂紲錛氶洩鐞冭偂紲╝pp鏄涓嬈炬潵鑷闆鐞冩姇璧勫畼鏂瑰㈡埛絝錛岀綉絝欑殑鍙ｅ彿鏄錛氳仾鏄庣殑鎶曡祫浜洪兘鍦ㄨ繖閲屻傛彁渚涙勃娣便佹腐鑲°佺編鑲°佸熀閲戙佸哄埜銆佸栨眹絳夊疄鏃跺厤璐硅屾儏錛屼篃鍙浠ュ拰鍏朵粬鐢ㄦ埛鍦ㄧ嚎娌熼氾紝瀛︿範緇忛獙銆

2銆佹柊嫻璐㈢粡錛氭柊嫻璐㈢粡涓嬈句負鎶曡祫鑰呮湇鍔＄殑鎵嬫満鐐掕偂杞浠訛紝鏀鎸佸氬跺埜鍟咥鑲℃墜鏈轟氦鏄撱備駭鍝佽嗙洊娌娣辨腐緹庡熀閲戝叏甯傚満琛屾儏錛屽苟鎻愪緵鐜鐞冨競鍦虹殑涓昏佹寚鏁版暟鎹錛屾柊嫻璐㈢粡鎻愪緵鍏嶈垂鐨勮偂浠鋒彁閱掑強724灝忔椂鐨勫叏鐞冭儲緇忚祫璁銆

3銆佸鉤瀹夎瘉鍒革細騫沖畨璇佸埜鏄騫沖畨璇佸埜鏈夐檺璐ｄ換鍏鍙哥殑瀹樻柟APP錛岃蔣浠朵負鐢ㄦ埛鎻愪緵渚挎嵎鐨勮瘉鍒告湇鍔★紝涓嶄粎鍙浠ラ殢鏃舵煡璇㈣偂紲ㄨ屾儏榪樺彲浠ヤ繚闅滅敤鎴風殑浜ゆ槗瀹夊叏銆傜敤鎴蜂嬌鐢ㄨ蔣浠朵笉浠呭彲浠ヨ繘琛岃瘉鍒告湇鍔★紝榪樺彲浠ヨ繘琛岀悊璐㈡湇鍔°

4銆佸悓鑺遍『錛氬悓鑺遍『鏄鑰佺墝鐨勬墜鏈虹倰鑲¤蔣浠朵簡錛屼篃鏄鐩鍓嶆墜鏈虹倰鑲¤蔣浠朵腑浣跨敤杈冨氱殑銆傚悓鑺遍『鎵嬫満鐐掕偂杞浠舵ц兘紼沖畾銆佹敮鎸佸埜鍟嗗氬苟鏀鎸佹墜鏈哄湪綰誇氦鏄撶殑闅忚韓鍏嶈垂鐐掕偂杞浠訛紝涔熸槸棣栧舵帹鍑烘墜鏈轟笂Level-2鏁版嵁鏌ヨ㈢殑鐐掕偂杞浠躲

5銆佸圭淮璐㈢粡錛氭渶鍚稿紩浜虹溂鐞冪殑鏄疉I鏈哄櫒浜哄啝鍐涚瓥鐣+楂樼駭鎶曢【鍥㈤槦鍧愰晣錛屼漢鏈哄叡鍚岄勬祴鑲＄エ鐨勮屾儏璧板娍銆傚傛灉鍠滄AI杈呭姪涔板崠鍐崇瓥鐨勬姇璧勮呯殑璇濓紝榪欑被杞浠舵槸蹇呴』瑕侀夋嫨鐨勪簡銆傛ゅ栧圭淮璐㈢粡鎻愪緵鍏ㄧ悆鑲″競鐑鐐廣佹秷鎮鎺ㄩ併

鐐掕偂杞浠跺摢涓濂界敤錛

閫氳揪淇★紝鍚岃姳欏猴紝涓滄柟璐㈠瘜榪欏嚑涓涓繪祦APP閮藉彲浠ワ紝澶栫洏鐨勪俊鎮涓滄柟璐㈠瘜姣旇緝璇︾粏錛屼笉榪囨柊鍔犲潯A50寤惰繜鍗佸垎閽燂紝鎵嬫満APP鍚岃姳欏哄仛鐨勪俊鎮鏈濂斤紝鐪嬬編鑲℃瘮杈冩柟渚褲侾C鐗堟湰澶栫洏鍜屾湡璐у緢鍏ㄩ潰銆

閫氳揪淇＄殑浼樼偣鏄鏉垮潡緙栧垪瀹㈣傚悎鐞嗭紝琛屼笟鏉垮潡浼氶夊彇鐪熸ｄ富涓氬仛榪欎釜琛屼笟鐨勶紝涓嶅儚鍏朵粬APP鍙瑕佷笟鍔℃簿鐐硅竟灝辯畻榪涙澘鍧楋紝姣旇緝娌℃剰涔夈傜劧鍚庢墜鏈篈PP鍙浠ヨ嚜宸辯紪杈戞寚鏍

鑲＄エapp鍝涓濂界敤

姣旇緝濂界敤鐐掕偂杞浠舵湁澶ф櫤鎱ф墜鏈虹倰鑲¤蔣浠躲佸悓鑺遍『鎵嬫満鐐掕偂杞浠躲佸圭淮璐㈢粡銆佷笢鏂硅儲瀵岄氭墜鏈虹倰鑲¤蔣浠躲佸拰璁鑲＄エ鎵嬫満鐐掕偂杞浠躲佺泭鐩熸搷鐩樻墜鎵嬫満鐐掕偂杞浠躲

1銆佸ぇ鏅烘収鎵嬫満鐐掕偂杞浠

澶ф櫤鎱ф墜鏈虹倰鑲¤蔣浠舵槸鐩鍓嶅浗鍐呮墜鏈虹倰鑲＄敤鎴蜂嬌鐢ㄧ巼杈冮珮銆佹晥鏋滆緝濂界殑鐐掕偂杞浠訛紝鏄姣忎釜鐐掕偂涓撳剁殑闅忚韓宸ュ叿銆備笉浠呰兘婊¤凍鏈嬪弸浠闅忔椂闅忓湴鐨勬煡闃呮勃娣變袱鍦版寚鏁般佷釜鑲″強鏃墮珮閫熻屾儏銆佹妧鏈鍒嗘瀽銆佷釜鑲″熀鏈闈㈣祫鏂欍佷赴瀵岀儹鐐硅祫璁錛岃繕鑳介殢鏃朵拱鍗栥侀殢鏃剁泩鍒┿

2銆佸悓鑺遍『鎵嬫満鐐掕偂杞浠

鍚岃姳欏烘墜鏈虹倰鑲¤蔣浠舵槸涓撻棬涓鴻偂紲ㄦ姇璧勮呯簿蹇冩墦閫犮佽捐＄殑闅忚韓鐐掕偂鍒╁櫒銆傛姇璧勮呭彲閫氳繃璇ヨ蔣浠跺嵆鏃舵妸鎻″ぇ鐩樺強涓鑲¤秼鍔匡紝緔ц拷涓誨姏璧勯噾姝ヤ紣錛屾姇璧勪笅鍗曞厛浜轟竴姝!姝よ蔣浠跺叏闈㈡敮鎸佹勃娣辮屾儏銆佹腐鑲°佹湡璐с佽偂鎸囨湡璐с佸栨眹銆佸叏鐞冭偂鎸囥佹潈璇併佸熀閲戠瓑鏌ヨ銆

3銆佸圭淮璐㈢粡

闅跺睘浜庡叿鏈21騫磋瘉鍒告姇璧勫挩璇㈢粡楠岀殑瀹圭淮璇佸埜鏁版嵁紼嬪簭鍖栨湁闄愬叕鍙革紝鐙瀹剁殑鏁板嶮縐岮I鏅鴻兘鐐掕偂絳栫暐鍩轟簬闀挎湡鐨勫圭粡鍏告姇璧勫垎鏋愭ā鍨嬬殑鑷涓誨︿範鑰屼駭鐢燂紝紿佺牬浼犵粺鐐掕偂鎬濈淮鏉熺細錛屼負鑲℃皯甯︽潵鍏ㄦ柊鐨勬櫤鑳藉寲鐐掕偂浣撻獙銆

4銆佷笢鏂硅儲瀵岄氭墜鏈虹倰鑲¤蔣浠

涓滄柟璐㈠瘜鏄涓鍥借塊棶閲忚緝澶с佸獎鍝嶅姏杈冨ぇ鐨勮儲緇忚瘉鍒擱棬鎴風綉絝欌斾笢鏂硅儲瀵岀綉(300059)鍩轟簬鑷韜鐨勫鉤鍙頒紭鍔挎渶鏂扮爺鍙戠殑涓嬈懼厤璐圭倰鑲¤蔣浠躲備負鎵撻犱腑鍥芥洿鏉冨▉銆佹洿涓撲笟銆佹洿浜掑姩鐨勯噾鋙嶇粓絝錛屼笢鏂硅儲瀵岄氬叏浣撴妧鏈浜哄憳緇忚繃闀挎湡鐮旂┒寮鍙戱紝鍏呭垎鎸栨帢涓滄柟璐㈠瘜緗戝叏鍥界涓鐨勮儲緇忚祫璁騫沖彴浼樺娍錛岃瀺鍚堟渶鏂頒俊鎮鎶鏈錛岀爺鍒跺嚭涓嬈懼畬鍏ㄥ厤璐圭殑浼樿川閲戣瀺緇堢銆

5銆佸拰璁鑲＄エ鎵嬫満鐐掕偂杞浠

鍜岃鑲＄エ錛屾墦閫犵殑鍏ㄦ柊鎵嬫満璇佸埜緇煎悎浜ゆ槗騫沖彴銆傛敞閲嶄腑鍥借偂姘戠殑鐪嬬洏涔犳儻錛屼互瀹炵敤銆佹槗鐢ㄣ佸ソ鐢ㄤ負瀹楁棬錛屼互鑲＄エ瀹炴椂琛屾儏涓烘牳蹇冿紝閰嶅悎鑲＄エ鍒嗘椂K綰跨瓑鍩烘湰鏁版嵁錛屼緷鎵樺拰璁寮哄姏鏁版嵁鍒嗘瀽鍥㈤槦錛屾彁渚涙渶鏂拌儲鍔¤瘎浼板強鐮旂┒鎶ュ憡鍚勭嶅疄鐢ㄨ偂紲ㄦ妧鏈鎸囨爣錛岃╂偍涓閿灝戒韓鍩烘湰璧勬枡銆佷釜鑲¤祫閲戞祦鍚戙佺浉鍏沖叕鍛娿佹柊闂葷瓑錛屾洿鏈夊拰璁涓烘偍鎻愪緵鐨勭涓鎵嬭偂紲ㄧ爺絀舵姤鍛婂拰璐㈠姟璇勪及銆

涓浜鴻や負榪欎簺app 閮戒笉閿欙細

1銆佽嚜閫夎偂 app 銆傝偂紲ㄤ氦鏄 APP 錛屽寘鍚娌娣便佹腐鑲°佺編鑲′笁澶ц偂紲ㄥ競鍦恆

2銆佸悓鑺遍『 app 銆傚浗鍐呴嗗厛鐨勯噾鋙嶆湇鍔＄Щ鍔ㄥ鉤鍙幫紝鍙涓虹敤鎴鋒彁渚涘紑鎴楓佽屾儏銆佺悊璐銆佸挩璇㈢瓑鏈嶅姟銆

3銆佸ぇ鏅烘収 app 銆傛敮鎸佸氬跺埜鍟嗙櫥褰曚氦鏄撱4銆佸叾浠栬偂紲ㄤ氦鏄撹蔣浠訛細涓滄柟璐㈠瘜緗 app 銆佺泭鐩熸搷鐩樻墜 app 銆佺墰鑲＄帇 app 絳夈

錛

1銆佽偂紲ㄨ蔣浠跺嵆閽堝硅偂紲ㄤ氦鏄撹屽紑鍙戠殑杞浠剁郴緇燂紝涔熻縐頒負鐐掕偂杞浠訛紝鍩虹鍔熻兘鍖呮嫭璐㈢粡璧勮銆佽偂紲ㄨ屾儏銆佹暟鎹鎸栨帢涓庡垎鏋愩佹櫤鑳介夎偂銆佷氦鏄撶郴緇熴傚浗鍐呯殑鑲＄エ杞浠朵粠涓婁笘綰涔濆嶮騫翠唬鍒濈殑灝戞暟鍑犲剁殑鐙棰嗛庨獨錛屽埌宸茬粡鍙戝睍鎴愪負鐧懼墮綈鏀劇殑灞闈錛屾湁鐨勪互琛屾儏瀹炴椂鎬ц侀暱錛屾湁鐨勪互鍜ㄨ㈢爺絀舵搮闀匡紝鍚勫叿鐗硅壊銆

2銆佽偂紲ㄨ蔣浠剁殑瀹炶川鏄閫氳繃瀵瑰競鍦轟俊鎮鏁版嵁鐨勭粺璁★紝鎸夌収涓瀹氱殑鍒嗘瀽妯″瀷鏉ョ粰鍑烘暟錛堟姤琛錛夈佸艦錛堟寚鏍囧浘褰錛夈佹枃錛堣祫璁閾炬帴錛夈傜敤鎴峰垯渚濈収涓瀹氱殑鎶鏈鍒嗘瀽鐞嗚猴紝鏉ュ硅繖浜涚粨璁鴻繘琛岃В閲婏紝涔熸湁涓浜涘偦鐡滃紡鐨勬槗鐢ㄨ蔣浠朵細鐩存帴緇欏嚭涔板崠鐨勫緩璁銆傚叾瀹烇紝姣旇緝姝ｇ『錛屾垨鑰呭疄鍦ㄧ殑鐢ㄦ硶錛屾槸搴旇ユ寫閫変竴嬈炬ц兘紼沖畾銆佷俊鎮綺懼噯鐨勮蔣浠訛紝緇撳悎鑷宸辯殑鐐掕偂緇忛獙錛岀粡榪囨懜緔涔嬪悗錛屽艦鎴愪竴濂楄屼箣鏈夋晥鐨勫簲鐢ㄦ硶鍒欙紝閭ｆ牱鎵嶆槸鍊煎緱淇¤禆鐨勫姙娉曪紝鑰屾満姊板湴杞諱俊杞浠惰嚜鍔ㄥ彂鍑虹殑榪涘満紱誨満鐨勪俊鍙鳳紝寰寰浼氳艾浠ュ崈閲屻

濡備綍璇嗗埆

1銆佹槸絎﹀悎鍥藉惰勫畾

2011騫1鏈1鏃ヨ搗錛屻婅瘉鍒告姇璧勯【闂涓氬姟鏆傝岃勫畾銆嬬浜屽嶮涓冩潯瑙勫畾錛氱粓絝璁懼囨墍浣跨敤鐨勬暟鎹淇℃伅鏉ユ簮錛屼互鍙婅幏寰楁暟鎹淇℃伅鐨勬椂闂達紱涔熷氨瑕佹眰鑲＄エ杞浠舵暟鎹鍜岃祫璁蹇呴』鍚堟硶錛屾病鏈夋暟鎹璧勮川鍜岃祫璁璧勮川鐨勫叏閮ㄤ負鉶氬亣璇堥獥浼佷笟銆備細琚璇佺洃浼氫互鍙婂湴鏂硅瘉鐩戝矓璋冩煡銆

2銆佸叕鍙告槸鍚︽湁瀹炲姏錛

閫氳繃鏌ョ湅钀ヤ笟鎵х収鍜岀櫥闄嗗伐鍟嗙綉絝欏彲浠ユ煡鐪嬪埌鍏鍙哥殑鐪熷疄璧勬枡錛屽苟閫氳繃鍏鍙哥殑綆浠嬪規瘮鍙浠ユ煡鐪嬭櫄鍋囧叕鍙告湁鏄庢樉鐨勯犲亣錛屾晠鎰忔崗閫犳垚絝嬫椂闂村拰鑾峰緱鐨勮瘉涔︺

3銆佹槸鍚﹁涓繪祦涓嬭澆絝欐敹褰曪紵

涓嬭澆絝欑紪杈戜竴鑸閮戒細瀵規墍鏀跺綍杞浠惰繘琛岃瘯鐢ㄥ拰瀹℃牳銆備竴嬈捐偂紲ㄨ蔣浠訛紝濡傛灉鍦ㄥぉ絀轟笅杞姐乑OL涓嬭澆銆佸崕鍐涜蔣浠跺洯絳変富嫻佷笅杞界珯閮界湅涓嶅埌錛岄偅灝卞崈涓囪佸綋蹇冧簡銆

4銆佺湅瀹樼綉錛岀湅緇忚惀鐩鐨

涓嬈懼熀浜庢ｉ亾緇忚惀鐨勮偂紲ㄨ蔣浠訛紝鏀跺叆澶ч兘鏉ヨ嚜鏅鴻兘閫夎偂銆乴evel2絳夊炲兼湇鍔★紝濡傛灉涓嬈捐偂紲ㄨ蔣浠剁殑瀛樺湪浠呬粎鏄涓轟簡鎺ㄥ箍浜哄伐鍜ㄨ㈡湇鍔★紝瀹樼綉鍜岃蔣浠剁晫闈㈠勫勬槸璇卞肩敤鎴鋒彁浜よ仈緋葷數璇濓紙鐒跺悗鐤鐙傛潵鐢墊帹騫垮挩璇㈡湇鍔★級錛屽線寰閮藉睘浜庢寕緹婂ご鍗栫嫍鑲夎屽緞錛屽熀鏈鍙浠ュ畾鎬т負楠楀瓙銆

⑵ 買賣股票下載什麼軟體

買賣股票可以下載以下軟體：

一、同花順

同花順是一款非常受歡迎的股票交易軟體，提供行情分析、快速交易、數據資訊等功能。它支持多家券商的交易平台，方便投資者進行股票買賣操作。

二、東方財富

東方財富是一款集股票、期貨、基金等投資品種於一體的綜合性金融服務平台。它提供實時行情、自選股提醒、在線交易等功能，適合投資者進行股票交易和資訊獲取。

三、雪球

雪球是一款以社交投資為主題的股票交易軟體。它不僅提供股票行情和交易功能，還注重投資者之間的交流和分享，幫助投資者更好地了解市場動態和個股情況。

四、大智慧

大智慧是一款功能豐富的股票交易軟體，提供實時行情、技術分析、自選股管理等功能。它還具備智能選股和策略交易等高級功能，適合專業投資者使用。

解釋：

買賣股票常用的軟體有同花順、東方財富、雪球和大智慧等。這些軟體主要提供股票行情分析、實時交易、數據資訊等基本功能，方便投資者進行投資決策和操作。其中，同花順和東方財富功能較為綜合，適合各類投資者使用；雪球則注重社交投資，適合喜歡交流分享的投資者；大智慧則提供更多高級功能，適合專業投資者使用。投資者可以根據自己的需求和偏好選擇合適的軟體。這些軟體都可以在官方網站上免費下載，也可以通過應用商店進行下載。

⑶ 怎麼下載股票的分時數據

同花順軟體：工具---數據下載及管理-----數據導出，然後又可以選擇所需要的分時數據。如圖：

個股即時分時走勢圖：

（1） 白色曲線：表示該種股票即時實時成交的價格。

（2） 黃色曲線：表示該種股票即時成交的平均價格，即當天成交總金額除以成交總股數。

（3） 黃色柱線：在紅白曲線圖下方，用來表示每一分鍾的成交量。

（4）成交明細：在盤面的右下方為成交明細顯示，顯示動態每筆成交的價格和手數。

（5）外盤內盤：外盤又稱主動性買盤，即成交價在賣出掛單價的累積成交量；內盤又稱主動性賣盤，即成交價在買入掛單價的累積成交量。外盤反映買方的意願，內盤反映賣方的意願。

⑷ 如何下載股票歷史成交數據到Excel或txt

以華中智能股票軟體為例：（以Think pad X13 銳龍版筆記本電腦，Windows 10 操作為例）首先切換到要下載數據的股票K線形態，按「F1」進入「日線某某股票歷史成交」，點擊滑鼠右鍵->數據導出->導出所有數據->在「請選擇導出的類型」中選擇excel或txt
補充資料：
如何獲取所有股票歷史數據：
如果要對股市進行分析，首先就要獲取所有股票的歷史數據，只有通過股票的歷史數據，我們才能分析出股市的規律。
（以Think pad X13 銳龍版筆記本電腦，Windows 10 操作為例）
一、工具/原料
1、EXCEL2007或者以上版本，不能使用WPS
2、電腦1g內存1核處理器及以上配置
3、擁有較強邏輯分析能力以及少量智慧及以上的大腦一顆
方法/步驟：
第一步，獲取股票代碼，復制其中一部分到第一個工作表A4到A127，然後通過程序把每一個代碼寫入到不同的工作表A2位置，並對該工作表以該股票代碼命名。程序如下：
Sub 工作表命名()
For i = 4 To 127
Sheets(i).Range("a2") = "'" & Sheets(1).Range("a" & i)
Next i
For i = 4 To Sheets.Count
Sheets(i).Name = Sheets(i).Range("a2").Value
Next
End Sub
第二步，獲取股票歷史數據。代碼如下：
Private Function GetSource(sURL As String) As String
Dim oXHTTP As Object
Set oXHTTP = CreateObject("MSXML2.XMLHTTP")
oXHTTP.Open "GET"， sURL， False
oXHTTP.Send
GetSource = oXHTTP.responsetext
Set oXHTTP = Nothing
End Function
Sub 歷史數據()
Dim objXML As Object
Dim txtContent As String
Dim i As Integer
Dim strCode As String
Dim gp As String
Dim kaishihang
Dim arr， arr1， arr2， arr3， arr4， arr5， arr6， arr7， arr8， arr9， arr10， arr11
On Error Resume Next
EndRow = Range("a65536").End(xlUp).Row
startRow = 4
If startRow <= EndRow Then
Range(Cells(startRow， 1)， Cells(EndRow， 11)).Value = ""
Else
Exit Sub
End If
Set objXML = CreateObject("Microsoft.XMLHTTP")
gp = [A2]
For h = 1 To 4
For m = 1 To 4
kaishihang = [A65535].End(xlUp).Row
nian = Replace(Str(Year(Now) + 1 - h)， " "， "")
ji = Replace(Str(4 + 1 - m)， " "， "")
With objXML
.Open "GET"， "http://quotes.money.163.com/trade/lsjyj_" + gp + ".html?year=" + nian + "&season=" + ji + ""， False
.Send
If objXML.Status = 200 Then
txtContent = .responsetext
arr = Split(txtContent， "'>")
For i = 1 To UBound(arr)
arr1 = Split(arr(i)， " Cells(i + kaishihang， 1) = Right(Left(arr1(0)， 10)， 10)
arr2 = Split(arr1(1)， Chr(60))
Cells(i + kaishihang， 2) = Mid(arr2(0)， InStr(arr2(0)， ">") + 1)
arr3 = Split(arr1(2)， Chr(60))
Cells(i + kaishihang， 3) = Mid(arr3(0)， InStr(arr3(0)， ">") + 1)
arr4 = Split(arr1(3)， Chr(60))
Cells(i + kaishihang， 4) = Mid(arr4(0)， InStr(arr4(0)， ">") + 1)
arr5 = Split(arr1(4)， Chr(60))
Cells(i + kaishihang， 5) = Mid(arr5(0)， InStr(arr5(0)， ">") + 1)
arr6 = Split(arr1(5)， Chr(60))
Cells(i + kaishihang， 6) = Mid(arr6(0)， InStr(arr6(0)， ">") + 1)
arr7 = Split(arr1(6)， Chr(60))
Cells(i + kaishihang， 7) = Mid(arr7(0)， InStr(arr7(0)， ">") + 1)
arr8 = Split(arr1(7)， Chr(60))
Cells(i + kaishihang， 8) = Mid(arr8(0)， InStr(arr8(0)， ">") + 1)
arr9 = Split(arr1(8)， Chr(60))
Cells(i + kaishihang， 9) = Mid(arr9(0)， InStr(arr9(0)， ">") + 1)
arr10 = Split(arr1(9)， Chr(60))
Cells(i + kaishihang， 10) = Mid(arr10(0)， InStr(arr10(0)， ">") + 1)
arr11 = Split(arr1(10)， Chr(60))
Cells(i + kaishihang， 11) = Mid(arr11(0)， InStr(arr11(0)， ">") + 1)
Next i
End If
End With
Next m
Next h
Set objXML = Nothing
End Sub
第三步，獲取上證歷史數據，並獲取所有股票的歷史數據。程序如下：
Sub 所有股票歷史數據獲取()
Application.ScreenUpdating = False
Dim s As String， gp As String， nian As String， ji As String， s1 As String
Dim arr， arr1， arr2， arr3， arr4， arr5， arr6， arr7， arr8， arr9
Dim i， h As Long
Dim kaishihang
Dim LastRow As Long， r As Long
On Error Resume Next
EndRow = Sheet2.Range("a65536").End(xlUp).Row
startRow = 4
If startRow <= EndRow Then
Sheet2.Range(Sheet2.Cells(startRow， 1)， Sheet2.Cells(EndRow， 9)).Value = ""
Else
Exit Sub
End If
For h = 1 To 5
For m = 1 To 4
kaishihang = Sheet2.[A65535].End(xlUp).Row
nian = Replace(Str(Year(Now) + 1 - h)， " "， "")
ji = Replace(Str(4 + 1 - m)， " "， "")
s1 = "http://quotes.money.163.com/trade/lsjysj_shu_000001.html?year=" + nian + "&season=" + ji + ""
s = GetSource(s1)
arr = Split(s， "'>")
For i = 1 To UBound(arr)
arr1 = Split(arr(i)， " Sheet2.Cells(i + kaishihang， 1) = Right(Left(arr1(0)， 4)， 4) & "-" & Right(Left(arr1(0)， 6)， 2) & "-" & Right(Left(arr1(0)， 10)， 2)
arr2 = Split(arr1(1)， Chr(60))
Sheet2.Cells(i + kaishihang， 2) = Mid(arr2(0)， InStr(arr2(0)， ">") + 1)
arr3 = Split(arr1(2)， Chr(60))
Sheet2.Cells(i + kaishihang， 3) = Mid(arr3(0)， InStr(arr3(0)， ">") + 1)
arr4 = Split(arr1(3)， Chr(60))
Sheet2.Cells(i + kaishihang， 4) = Mid(arr4(0)， InStr(arr4(0)， ">") + 1)
arr5 = Split(arr1(4)， Chr(60))
Sheet2.Cells(i + kaishihang， 5) = Mid(arr5(0)， InStr(arr5(0)， ">") + 1)
arr6 = Split(arr1(5)， Chr(60))
Sheet2.Cells(i + kaishihang， 6) = Mid(arr6(0)， InStr(arr6(0)， ">") + 1)
arr7 = Split(arr1(6)， Chr(60))
Sheet2.Cells(i + kaishihang， 7) = Mid(arr7(0)， InStr(arr7(0)， ">") + 1)
arr8 = Split(arr1(7)， Chr(60))
Sheet2.Cells(i + kaishihang， 8) = Mid(arr8(0)， InStr(arr8(0)， ">") + 1)
arr9 = Split(arr1(8)， Chr(60))
Sheet2.Cells(i + kaishihang， 9) = Mid(arr9(0)， InStr(arr9(0)， ">") + 1)
Next i
Next m
Next h
Application.ScreenUpdating = True
n = Worksheets.Count
For i = 4 To n
Worksheets(i).Activate
歷史數據
Next
End Sub
第四步，保存工作簿，並對該工作簿命名為1，然後復制該工作簿27份，把所有股票代碼寫入每一個工作簿第一個工作表的A3到A127列。然後根據第一步對工作簿內的工作表命名，並在每一個工作表A2單元格內寫入股票代碼。
第五步，把這些工作簿存放到炒股文件夾下的資料庫文件下。然後在炒股文件夾下新建一個工作簿，命名為「一鍵更新表格」，寫入如下代碼：
Sub 所有股票歷史數據更新()
Dim wb As Workbook
For i = 1 To 27
Set wb = Workbooks.Open(ThisWorkbook.Path & "資料庫" & i & "".xlsb"")
Application.Run ""'"" & wb.Path & """" & i & "".xlsb'!所有股票歷史數據獲取""
wb.Save
wb.Close
Next i
End sub
當啟動這一段代碼以後，程序會自動一個一個的打開對應的工作簿然後獲取裡面所有股票的歷史數據，存放在對應的工作表當中。
第六步，對相應的程序添加按鈕，這樣，我們在啟動對應程序時，只需要點一下對應的按鈕就可以實現了。這樣，我們通過多個工作簿就實現了獲取所有股票歷史數據的方法。而後面，我們只需要通過獲取對應股票每一天的歷史數據，我們就能夠在任意一天很快速的能夠擁有所有股票的歷史數據了。
注意事項
1、在後續需要對這些數據進行分析，裡面會加入很多計算，所以啟動所有歷史數據更新時，我們應該要關閉自動更新。
2、因為歷史數據很大，所以這里只獲取四年的數據，想要獲取更多數據，可以更改程序裡面 「For h = 1 To 5」的那個5即可。
3、歷史數據的獲取需要較長的時間，要提前做好准備。
4、如果你想要弄清楚用EXCEL建立炒股系統的整套方法，請看後續內容。"

⑸ 如何獲取股票實時行情數據

股票實時行情可以通過兩種方式來獲取：一種是在網路搜索頁面直接輸入股票代碼，例如輸入000717後，網路會顯示該股票當天的實時走勢，其中分時圖展示了股票在當天的實時走向。

另一種方式是使用炒股軟體，比如東財、同花順等，在這些軟體中，只需輸入股票代碼，比如600854，點擊回車鍵後，即可進入股票當天的實時行情頁面。在股票軟體的分時成交界面，可以查看每一分鍾的成交價和成交手數，這對於判斷股票行情趨勢非常重要。

需要提醒的是，僅依靠分時成交界面的數據還不夠准確，判斷股票行情趨勢時還需結合其他多種指標進行綜合分析。例如，可以參考成交量、股價走勢等數據來輔助判斷。

此外，查看其他股票的實時行情也非常簡單，只需直接鍵入對應的股票代碼，即可查看到該股票當天或某個特定時間段內的行情變化。

綜合來看，獲取股票實時行情數據的方法多種多樣，但無論選擇哪種方式，都需要結合多種指標進行綜合分析，以便更准確地判斷股票的走勢和趨勢。

⑹ 鍚岃姳欏烘庝箞涓嬭澆涓鑲＄殑鎵鏈夊巻鍙叉暟鎹錛

鍚岃姳欏轟笅杞戒釜鑲＄殑鎵鏈夊巻鍙叉暟鎹錛
1銆侀栧厛鍒囨崲鍒拌佷笅杞芥暟鎹鐨勮偂紲↘綰垮艦鎬侊紝鎸夆淔1鈥濊繘鍏モ滄棩綰挎煇鏌愯偂紲ㄥ巻鍙叉垚浜も濓紱
2銆佺偣鍑婚紶鏍囧彸閿->鏁版嵁瀵煎嚭->瀵煎嚭鎵鏈夋暟鎹->鍦ㄢ滆烽夋嫨瀵煎嚭鐨勭被鍨嬧濅腑閫夋嫨excel鎴杢xt錛岋紝鍙鏈夎繖浜岀嶆牸寮忓彲浠ラ夋嫨錛
3銆侀夊彇濂藉悗鐐瑰嚮涓嬩竴姝ワ紝鍦ㄢ滃煎叆瀵煎嚭瀵硅瘽妗嗘ā鏉庫濅腑閫夋嫨瑕佺殑欏圭洰錛
4銆佺偣涓嬩竴姝ワ紝瀹屾垚銆傞粯璁や繚瀛樿礬寰勫湪妗岄潰涓娿
涓銆佸悓鑺遍『杞浠
鍚岃姳欏猴紝鏄涓嬈懼姛鑳介潪甯稿己澶х殑鍏嶈垂緗戜笂鑲＄エ璇佸埜浜ゆ槗鍒嗘瀽杞浠訛紝鎶曡祫鑰呯倰鑲＄殑蹇呭囧伐鍏楓
鍚岃姳欏鴻偂紲ㄨ蔣浠舵槸涓涓鎻愪緵琛屾儏鏄劇ず銆佽屾儏鍒嗘瀽鍜岃屾儏浜ゆ槗鐨勮偂紲ㄨ蔣浠訛紝瀹冨垎涓哄厤璐筆C浜у搧錛屼粯璐筆C浜у搧錛岀數鑴戝鉤鏉誇駭鍝侊紝鎵嬫満浜у搧絳夐傜敤鎬у己鐨勫氫釜鐗堟湰銆傚悓鑺遍『鑲＄エ杞浠舵敞閲嶅悇澶ц瘉鍒告満鏋勩佸箍澶ц偂姘戠殑闇奼傚拰浣跨敤涔犳儻錛屽悓鑺遍『鑲＄エ杞浠跺叏鏂扮増鍏嶈垂鍏嶆敞鍐屻傚叏鏂扮増鍚岃姳欏鴻偂紲ㄨ蔣浠舵柊澧炲己澶у姛鑳斤細鑷涓葷爺鍙戠殑闂璐㈤夎偂鍙婅嚜瀹氫箟閫夎偂錛岄棶璐㈤夎偂鏄鏂頒竴浠ｈ嚜鐒惰璦閫夎偂錛岃В鏋愯嚜鐒惰璦閫夊嚭鑲＄エ銆 鏂板為氳揪淇℃ā寮忋
鍚岃姳欏洪潰鍚戝㈡埛鍙涓洪摱琛屻佽瘉鍒搞佷繚闄┿佸熀閲戙佺佸嫙銆侀珮鏍°佹斂搴滅瓑琛屼笟鎻愪緵鏅鴻兘鍖栬В鍐蟲柟妗堛傛ｅ湪鎷撳睍鑷崇敓媧匯佸尰鐤椼佹暀鑲茬瓑鏇村氶嗗煙銆
浜屻佸悓鑺遍『涓氬姟浠嬬粛
嫻欐睙鏍告柊鍚岃姳欏猴紙300033錛夌綉緇滀俊鎮鑲′喚鏈夐檺鍏鍙稿墠韜涓轟笂嫻鋒牳鏂拌蔣浠舵妧鏈鏈夐檺鍏鍙革紝鎴愮珛浜2001騫8鏈24鏃ャ備負浣垮叕鍙告湁鏇村ソ鐨勫彂灞曠幆澧冿紝浜2007騫5鏈堣縼鍧鍒版澀宸為珮鏂板尯銆
浼佷笟鐢辨槗宄ョ瓑鍥涗釜鑷鐒朵漢鍜屼笂嫻峰嚡澹濂ユ姇璧勫挩璇㈡湁闄愬叕鍙稿叡鍚屾姇璧勭粍寤恆備紒涓氬湪鍖椾含銆佷笂嫻楓佹繁鍦熾佹垚閮姐佽タ瀹夈佸搱灝旀花璁劇珛浜6瀹跺垎鏀鏈烘瀯錛屽苟鎷ユ湁涓瀹跺叏璧勫瓙鍏鍙告澀宸炴牳鏂拌蔣浠舵妧鏈鏈夐檺鍏鍙革紙鎴愮珛浜1994騫達級銆
鍏鍙歌偂鏈538浜垮厓錛屼粠涓氫漢鍛樼害4000浣欎漢錛屽叾涓鐮斿彂浜哄憳鍜屾妧鏈鏈嶅姟浜哄憳鍗65%浠ヤ笂銆
鍏鍙告槸涓撲笟浠庝簨浜掕仈緗戠倰鑲¤蔣浠剁殑寮鍙戙佹彁渚涚倰鑲℃暟鎹鍜岃儲緇忎俊鎮鏈嶅姟鐨勯珮鏂版妧鏈浼佷笟錛屾棗涓嬫嫢鏈夊悓鑺遍『閲戣瀺鏈嶅姟緗戙佸悓鑺遍『鐖卞熀閲戞姇璧勭綉錛屽苟鎺ㄥ嚭浜嗕竴緋誨垪褰㈠紡涓板瘜銆佺嫭鍏風壒鑹茬殑鍒涙柊澧炲兼湇鍔★紝娣卞彈騫垮ぇ璇佸埜鍏鍙搞佽偂姘戠殑嬈㈣繋銆
甯哥敤鑲＄エ杞浠朵笅杞芥柟娉曟湁寰堝氾紝浣犲彲浠ュ湪鐧懼害涓鎵撅紝鎴栬呭湪杞浠剁殑瀹樻柟緗戠珯涓婁笅杞斤紝鎴栬呭湪涓嬭澆騫沖彴鎼滅儲銆傛垜鐢ㄧ殑涔愯偂杞浠舵槸鍦ㄥ畼鏂圭綉絝欎箰鑲＄綉涓婁笅杞界殑銆備綘濡傛灉涔熸兂涓嬭澆涔愯偂杞浠剁殑璇濓紝鍚屾牱鍙浠ュ埌涔愯偂緗戜笂涓嬭澆銆