Online Forums
Technical support is provided through Support Forums below. Anybody can view them; you need to Register/Login to our site (see links in upper right corner) in order to Post questions. You do not have to be a licensed user of our product.
Please read Rules for forum posts before reporting your issue or asking a question. OPC Labs team is actively monitoring the forums, and replies as soon as possible. Various technical information can also be found in our Knowledge Base. For your convenience, we have also assembled a Frequently Asked Questions page.
Do not use the Contact page for technical issues.
Help with VBA Code
28 Dec 2015 22:03 #3729
by cdunlap
Help with VBA Code was created by cdunlap
Hi,
I am having some trouble building off of one of the VBA Excel examples and I was hoping to get some input on it. This is not specifically related to a problem with the component itself, but more on why certain code works and certain code does not work. I am sure it's more of a lack of knowledge of VBA than anything else, but i was hoping that you could help
.
Basically, If I run the code in the UASubscribeToMultiple3.xls file, everything works great.
I have a customer that tried modifying the declaration of the MonitoredItemArguments to use the 'New' keyword as opposed to a call to CreateObject(). It will not allow anything to be assigned to the 'State' variable, and gives an error message, but I cannot figure out why.
So the original code looks like this:
The slightly altered code looks like this:
The altered code gives back an error on the line that tries to assign a value to the 'State' object that says "Run-time error '424': Object required".
From everything that I can find, it sounds like CreateObject and New are somewhat interchangeable, but that doesn't seem to be the case here.
So basically, I am stumped as to why CreateObject works, but defining it with the 'New' keyword does not. I know that this is more of a VBA question than a specific question about this component, but I was hoping I could get some insight.
Thank you in advance for the help
I am having some trouble building off of one of the VBA Excel examples and I was hoping to get some input on it. This is not specifically related to a problem with the component itself, but more on why certain code works and certain code does not work. I am sure it's more of a lack of knowledge of VBA than anything else, but i was hoping that you could help
.Basically, If I run the code in the UASubscribeToMultiple3.xls file, everything works great.
I have a customer that tried modifying the declaration of the MonitoredItemArguments to use the 'New' keyword as opposed to a call to CreateObject(). It will not allow anything to be assigned to the 'State' variable, and gives an error message, but I cannot figure out why.
So the original code looks like this:
Dim MonitoredItemArguments1: Set MonitoredItemArguments1 = CreateObject("OpcLabs.EasyOpc.UA.OperationModel.EasyUAMonitoredItemArguments")
MonitoredItemArguments1.EndpointDescriptor.UrlString = "http://opcua.demo-this.com:51211/UA/SampleServer"
MonitoredItemArguments1.NodeDescriptor.NodeId.ExpandedText = "nsu=http://test.org/UA/Data/;i=10845"
Set MonitoredItemArguments1.MonitoringParameters = MonitoringParameters
MonitoredItemArguments1.State = "D2"The slightly altered code looks like this:
Dim MonitoredItemArguments1 As EasyUAMonitoredItemArguments
Set MonitoredItemArguments1 = New EasyUAMonitoredItemArguments
Dim Endpoint As String
Dim Node As String
Dim CellName As String
Endpoint = "http://opcua.demo-this.com:51211/UA/SampleServer"
Node = "nsu=http://test.org/UA/Data/;i=10845"
CellName = "D2"
MonitoredItemArguments1.EndpointDescriptor.UrlString = Endpoint
MonitoredItemArguments1.NodeDescriptor.NodeId.ExpandedText = Node
Set MonitoredItemArguments1.MonitoringParameters = MonitoringParameters
' Below is where it fails. ************************************************
MonitoredItemArguments1.State = CellName ' Gives Runtime error 424: object required
' MonitoredItemArguments1.State ="D2" doesn't work either
' *************************************************************************The altered code gives back an error on the line that tries to assign a value to the 'State' object that says "Run-time error '424': Object required".
From everything that I can find, it sounds like CreateObject and New are somewhat interchangeable, but that doesn't seem to be the case here.
So basically, I am stumped as to why CreateObject works, but defining it with the 'New' keyword does not. I know that this is more of a VBA question than a specific question about this component, but I was hoping I could get some insight.
Thank you in advance for the help
Please Log in or Create an account to join the conversation.
Moderators: support
Time to create page: 0.063 seconds