[求助]EXCELＶＢＡ查询与批量生成图表

yuten · 发表于 2005-9-20 16:15

有偿EXCEL VBA编程求助 1、打开123.xls文档。 2、C列里的数值范围是1-6之间的整数。 3、在excel里建一个数值输入框，用户可以在框中输入1-6之间的整数。 4、当用户输入“2”并提交后，程序运行如下：（1）在C列里寻找第一个“2”。（2）以这个“2”所在的行为中心，向上，向下各六行，在J，K，L，M，N，O进行取值。以第一个“2”为例，所取得值共13行，所的结果如下： 7 22 1.2886 1.2892 1.2879 1.2888 8 1.2887 1.2893 1.2884 1.2886 9 33 1.2887 1.2893 1.2884 1.2890 10 34 1.2889 1.2942 1.2883 1.2938 11 35 1.2939 1.2981 1.2935 1.2965 12 36 1.2964 1.2987 1.2957 1.2981 13 37 1.2982 1.2988 1.2972 1.2982 14 38 1.2983 1.2987 1.2974 1.2986 15 39 1.2985 1.2988 1.2964 1.2972 16 40 1.2971 1.2979 1.2958 1.2975 17 41 1.2976 1.3001 1.2970 1.2982 18 42 1.2982 1.3018 1.2974 1.3014 19 43 1.3013 1.3043 1.3002 1.3034 （3）用所取得值的后四列画出K线图，excel中有此功能（在插入-图表-股票中）。所的结果显示如下：（图片在具体说明里）（4）把在（2），（3）中所得的结果打印到一个新的WORD文档中，此文档存放的目录跟123.xls相同。（5）向下寻找第二个“2” （6）重复（2）-（4）（7）程序运行到找到最后一个“2”后停止。 5、以上是以“2”为例进行说明，1，3，4，5，6均同。具体说明：见附件如果哪位兄弟有意帮忙，请把报价与时间发到dwang7923@hotmail.com 或致电024-82090112徐先生。

rou42pML.zip (8.86 KB, 下载次数: 42)

yuten · 发表于 2005-9-21 03:12

回2楼的兄弟：

放到EXCEL也可，我自己拷出来就成。不知你说的放到EXCEL里，能否放到所有数据的最下面，并且按照图表，数据，图表，数据。。。。图表，数据的方式放，并且一下就能拷贝出来。（不用每个图表拷一次）。

所谓的有偿就是给钱，也不能让兄弟们白费力呀。

yuten · 发表于 2005-9-21 15:31

Long_III论坛神仙，你可真是神仙呀！解决了小弟的燃眉之急，小弟在此望东叩首。不知神仙用不用MSN，如果用请加小弟（daweiwang@hotmail.co.uk)

Long_III · 发表于 2005-9-21 15:47

公司不让用，不好意思哦，有事可以给我邮件

Long_III · 发表于 2005-9-21 11:15

大致做了一个，不知合不合兄台的意，有什么格式或别的要求尽管说，只要不涉及word就行

关于有偿，兄台就说的太客气了，这里是一个免费的地方，大家互相帮助，也许以后我还有事找你帮忙呢 sqHXRwM8.rar (23.77 KB, 下载次数: 126)

操作：在A2输入要查询的，a2下面也可以输入，会依次查询，双击E列的数据可以查看原始数据，如双击E5

[此贴子已经被作者于2005-9-21 12:09:49编辑过]

Long_III · 发表于 2005-9-20 16:21

放到word里不会，放到excel可就没什么问题

不知楼主的有偿，是什么偿？

zhouwei1975 · 发表于 2009-8-20 02:58

VSDVSDSDCSDCSSSDCSD

兰山 · 发表于 2011-11-21 14:47

{:soso_e179:}{:soso_e179:}

goons · 发表于 2012-5-25 23:39

学习收藏好贴

jangsokang · 发表于 2012-8-11 09:05

版主你是怎么做到的呢，学习收藏.

		自动登录	找回密码
密码			免费注册