[数据处理]CST MWS如何通过VBA获取一个点的坐标值

我刚好最近也用到VBA了。下面这段代码应该能解决你的问题： eM?I$ePTN  
Option Explicit Y#P%6Fy  
Sub Main sI^Xb@'09$  
Dim x As Double VZmLS 4E  
Dim y As Double zuy4G9P  
Dim z As Double JB[~;nLlC  
Dim n Vt&2z)Zz  
   n=Pick.GetNumberOfPickedPoints() l3I:Q^x@  
   Pick.GetPickpointCoordinates(1,x,y,z) 4 VW[E1
<  
MsgBox(Str(n) & ":" &Str(x) & Str(y) & Str(z)) }oGA-Qc}B  
End Sub

谢谢 @zhknpu   的帮助， 正是我所需要的代码

jiajia229:谢谢 @zhknpu     的帮助， 正是我所需要的代码 (2013-02-18 14:36)  >H,*H;6  

YS_;OFsd  
不客气哈~~~

zhknpu:我刚好最近也用到VBA了。下面这段代码应该能解决你的问题： BDZ?Ez\Sg  
Option Explicit RY*U"G0#w  
Sub Main $xdy&  
Dim x As Double _t}WsEQ+P  
Dim y As Double {2"zVt#h  
....... (2013-01-20 19:48)  b\+`e
b8_  

##4HYQ%E  
能问你个问题吗？我想用VBA把CST里的probe里的数据导出到EXCEL里，试了用help里提供的 0'o:#-  
Set Exc = mws.Result1D("probe_s(E1(1))") 这个方法，但是就是导不出来啊。想知道CST里1D results里的Probe的数据要怎么导出啊？谢谢！