其他回答(共7条)

• 

  2021-12-23 15:20 龚小英 客户经理

  1、打开目标股票的K线图，输入34；
  2、选数据导出，再选高级导出，以及添加股票，把需要的股票池全部选上；
  3、选择好存放路径；
  4、选开始导出即可。
• 

  2021-12-23 15:07 齐晓娇 客户经理

  这是用股票分析软件来实现的，要是用excel表来实现除非你有股票软件的开源码，来实现嵌入式函数对接，不过太专业了，我的水平肯定不行
• 

  2021-12-23 15:01 齐显尼 客户经理

  自动获取所有股票历史数据，也能获取当天数据
• 

  2021-12-23 14:56 连丽萍 客户经理

  插入股票所在网站的网址即可，Excel中的操作如下图

• 

  2021-12-23 14:24 车庆云 客户经理

  先把数据导入进来，在excel里面，数据里面获取外部数据，获取股票网站的数据，在属性里面设置多长时间刷新一次，数据导入进来其他的就好办了
• 

  2021-12-23 14:00 黄盛林 客户经理

  制作实时股票行情图，应包含如下内容：1.股票数据表，2.股价图，3.实时从网上下载数据的功能
  第一步：制作数据表，数据-导入外部数-新建WEB查询 写入该数据来源地址
  第二步：制作股价图，先用公式按股价图要求的顺序引用到当前表，再插入图表-选股价图（第4种）调整图表
  第三步：编写程序以实现实时刷新功能，可将以下程序按其要求的位置复制过去
  '在模块中编写如下程序段用于刷新行情表，"00:00:10"表示刷新时间间隔，可根据需要进行调整
  Dim 结束标记
  Sub 刷新行情()
  
  Sheets("日线数据").Range("A1").QueryTable.Refresh
  BackgroundQuery:=False
  
  Sheets("分笔数据").Range("A1").QueryTable.Refresh
  BackgroundQuery:=False
  If 结束标记
  <> 1 Then Application.OnTime Now +
  TimeValue("00:00:10"), "刷新行情"
  End Sub
  Sub 开始刷新()
  结束标记 = 0
  刷新行情
  End Sub
  Sub 结束刷新()
  结束标记 = 1
  End Sub
  '在thisworkbook中编写如下代码用于打开该表时就启动行情刷新
  Private Sub Workbook_Open()
  刷新行情
  End Sub
  以上制作完成，保存后打开该表，可得到实用的股票行情图，并可得到实时数据用于数据分析
• 

  2021-12-23 13:58 龚子龙 客户经理

  用wdz程序就可以了，这个wdz软件直接将沪深股票日线、5分钟数据（包括最新数据、历史数据）输出为csv格式，然后双击，直接就在excel中打开了。