Macro in qlikview

[bharatkishore]

Hi All,

I have the below VBA macro which is working fine in excel.

Sub RunRscript()

'runs an external R code through Shell

'The location of the RScript is 'C:\R_code'

'The script name is 'hello.R'

Dim shell As Object

Set shell = VBA.CreateObject("WScript.Shell")

Dim waitTillComplete As Boolean: waitTillComplete = True

Dim style As Integer: style = 1

Dim errorCode As Integer

Dim path As String

path = "C:\Users\test\Documents\R\R-3.4.3\bin\x64\Rscript C:\Users\test\Documents\text_mst.R"

errorCode = shell.Run(path, style, waitTillComplete)

End Sub

Now i want this macro to work in qlikview, because the macro is not working in qlikview, getting an error like Expected end of statement

Can you please tell me how to do,

Thanks,

Bharat

[marcus_sommer]

You need to change the syntax because VBS is a bit different to VBA. You could try it in this way:

Sub RunRscript()

Dim shell, waitTillComplete, style, path

waitTillComplete = True

style = 1

path = "C:\Users\test\Documents\R\R-3.4.3\bin\x64\Rscript C:\Users\test\Documents\text_mst.R"

Set shell = VBA.CreateObject("WScript.Shell")

shell.Run(path, style, waitTillComplete)

End Sub

- Marcus

[bharatkishore]

Hi Marcus,

Thank you so much for your reply.

I am getting an error like Cannot use parentheses when calling a Sub.

Can you please tell me what i need to do.

Thanks,

Bharat

[marcus_sommer]

Just use: Sub RunRscript instead of: Sub RunRscript()

- Marcus

[bharatkishore]

Hi Marcus,

Getting same error. Below code i have used.

Sub RunRscript

Dim shell, waitTillComplete, style, path

waitTillComplete = True

style = 1

path = "C:\Users\test\Documents\R\R-3.4.3\bin\x64\Rscript C:\Users\test\Documents\text_mst.R"

Set shell = VBA.CreateObject("WScript.Shell")

shell.Run(path, style, waitTillComplete)

End Sub

Please let me know if anything i am missing

[marcus_sommer]

Ok. Try it with removing the brackets on the run-statement to:

shell.Run path, style, waitTillComplete

- Marcus

[bharatkishore]

Thank you Marcus.

But when i click the button then instead of running the macro it is going to macro edit module.

Can you please tell me what i need to do.

[marcus_sommer]

Your code accessed external resources and needs therefore system-access (about mid within the left panel in the macro-editor). Further I'm not sure if run could handle your second/third parameter - for testing I would comment them. Also placing some msgbox within the code will show where the exections breaks.

- Marcus

[bharatkishore]

Sure.. thanks .. will try and update you.