Topic

Access to Cells via VBA

Dieses Thema hat 6 Antworten sowie 3 Teilnehmer und wurde zuletzt vor vor 19 Jahren, 6 Monaten von Christian Muschelknautz aktualisiert.

Anzeigen von 7-Stellen - 1 bis 7 (von insgesamt 7)

Autor

Beiträge
27.10.2005 um 21:56 Uhr #35013

Christian Muschelknautz
Teilnehmer

Probably it’s pretty easy to answer my question, nonetheless here it is:
VBA in Excel permits users to access cells via the expression cells(a, b). Is there an equivalent in VBA for FlexPro? In my special case I want to compare variables with the content of cells.
Thanks for support!

27.10.2005 um 21:56 Uhr #35019

Christian Muschelknautz
Teilnehmer

Probably it’s pretty easy to answer my question, nonetheless here it is:
VBA in Excel permits users to access cells via the expression cells(a, b). Is there an equivalent in VBA for FlexPro? In my special case I want to compare variables with the content of cells.
Thanks for support!

27.10.2005 um 22:36 Uhr #35014

Bernhard Kantz
Teilnehmer

Use the [b]Value[/b] method of the DataSet object.
[code]
Sub Example()
Dim oDataSet As DataSet
Dim V(2) As Double
Set oDataSet = ThisDatabase.RootFolder.Add(“data”, fpObjectTypeDataSet)
V(0) = 1
V(1) = 2
V(2) = 3
oDataSet.Value = V
End Sub
[/code]
See FlexPro Online Help
Automating Tasks
Automation with FlexPro Visual Basic
First Steps with FlexPro Visual Basic
Working with Objects
Working with Data Sets

Support@weisang.com

28.10.2005 um 00:48 Uhr #35015

Christian Muschelknautz
Teilnehmer

First of all thanks for the quick answer. Now I know how to handle “writing to cells” but how can I cope with reading them. In the online manual I could found this example:

Dim S As Signal
Set S = SignalDataSet.Value
Dim Delta As Double
Delta = S.X(1) – S.X(0)

Could you please imbed it into a stand-alone example? Let’s say for a dataset called “Time” which has been imported.
Thanks again…I’m learning …

28.10.2005 um 01:02 Uhr #35016

Bernhard Kantz
Teilnehmer

Here is an example with a time signal which is in the root folder:
[code]
Sub ReadData()
Dim oDataset As DataSet
Dim fXValues, fYValues, fYFirstValue
Set oDataset = ThisDatabase.RootFolder.Object(“Time”, fpObjectTypeDataSet)
fXValues = oDataset.Value(fpDataComponentX)
fYValues = oDataset.Value(fpDataComponentY)
fYFirstValue = oDataset.Value(fpDataComponentY, 1, 1)
End Sub
[/code]
support@weisang.com

28.08.2010 um 03:39 Uhr #35017

Fiette Sebastien
Teilnehmer

Hello,

Is it possible to copy the complete Y column of a signal into the X column of another signal, without doing a loop ?

Thanks

31.08.2010 um 19:47 Uhr #35018

Bernhard Kantz
Teilnehmer

This is possible. Create a FPScript formula with the script:
[code]
Signal(Signal1.Y, Signal2.Y)
[/code]

VBA-Example:
[code]
Dim oFml As Formula

Set oFml = ThisDatabase.RootFolder.Add(“Formula”, fpObjectTypeFormula)
With oFml
.Formula = “Signal(Signal1.Y, Signal2.Y)”
.Evaluate
End With
[/code]

support@weisang.com
Autor

Beiträge

Anzeigen von 7-Stellen - 1 bis 7 (von insgesamt 7)

Du musst angemeldet sein, um auf dieses Thema antworten zu können.