EXCEL 求助 可能需要结合MACRO 和GOAL SEEK

leyan

有200组数据 需要用GOAL SEEK 算出数据
请问如何使用MACRO 或者VB 可以实现 快速用GOAL SEEK计算出这200组数据？还是有别的方法也可以实现？
希望大侠指点一下  多谢了


比如 我是在S9 用GOAL SEEK 算出一个让W9 （WKS STOCK）是5的 数据
然后我需要用同样的方法在 COLUMN S 算出其余的200组
请问有什么方法可以解决么？

leyan

VBA?

ahwei

把表格贴上来看看？

Epicmac

VBA感觉好难。。。。

leyan

ahwei 发表于 2013-11-8 09:47
把表格贴上来看看？

你是说EXCEL 表格作为附件贴上来？
我帖子里有贴图啊 可以看见么？

ahwei

leyan 发表于 2013-11-8 10:17
你是说EXCEL 表格作为附件贴上来？
我帖子里有贴图啊 可以看见么？

对啊，看一下表格。只看贴图不知道你到底需要什么啊。

leyan

ahwei 发表于 2013-11-8 10:38
对啊，看一下表格。只看贴图不知道你到底需要什么啊。

有邮箱么？ 附件比较大 传不上来

ahwei

leyan 发表于 2013-11-8 10:43
有邮箱么？ 附件比较大 传不上来

好吧，lishuaiwei@me.com

leyan

ahwei 发表于 2013-11-8 10:47
好吧，

发了  希望能帮助我 谢谢

ahwei

leyan 发表于 2013-11-8 10:55
发了  希望能帮助我 谢谢

如果求w9是5的数据，变化s9，那么Goal seek 在vba的公式是
Range("W9").GoalSeek Goal:=5, ChangingCell:=Range("S9")
只要在你所需做的列里，用vba写一个loop就可以了。

不过我觉得这么小的操作没必要用vba，如果你可以把goalseek里要求的结果用公式表达出来，那么剩下要做的就是复制公式就可以了。不知道你能不能明白这个意思。

leyan

ahwei 发表于 2013-11-8 12:45
如果求w9是5的数据，变化s9，那么Goal seek 在vba的公式是
Range("W9").GoalSeek Goal:=5, ChangingCell: ...

谢谢你的帮助  我是完全不懂VBA 因为同样还要做其他月份的GOAL SEEK。 所以是想用VBA 以后方便。
可以写个全的给我么？ 谢谢

leyan

ahwei 发表于 2013-11-8 12:45
如果求w9是5的数据，变化s9，那么Goal seek 在vba的公式是
Range("W9").GoalSeek Goal:=5, ChangingCell: ...

弄好了  也不是特别复杂。
想请问 VBA GOAL SEEK 模式下出来的数字 可以实现如果是负数 显示为0的功能么？ 是不是还是要在VBA里完成？ 谢谢