Dynamic Shell Function

[ShuStar]

Hi, got my code all set up but require a dynamic shell function when calling notepad.

Currently it is as below (which works fine):

Call Shell("notepad C:\Users\Shudarstaran.Neel\Desktop\DummyTest.xml", vbNormalFocus)

I would like it to be dynamic and work like below:

Call Shell ("notepad ActiveSheet.Range("KL3") & ActiveSheet.Range("KL4") & ".xml",vbNormal Focus)
application filepath filename


I'll be using this on multiple codes so the easiest way would be great if anyone knows.

Any pointers?

ShuStar

 

[MARK858]

First of all I think you need the quotes below

("notepad [COLOR="#FF0000"]"[/COLOR] &  ActiveSheet.Range("KL3") & ActiveSheet.Range("KL4") & ".xml",vbNormal Focus)

Also what exactly are the contents of KL3 and KL4 including do you have all the backslashes in the cells?

 

[ShuStar]

Nope it doesnt seem to like that. Gives me a compile error "Expected: list separator or )" message pops up highlighting ..Range("KL3").

Yep the backslashes exist in all the cells as needed when creating a standard pathway
KL3 = File path
KL4 = File name

Call Shell ("notepad " & ActiveSheet.Range("KL3") & ActiveSheet.Range("KL4") & ".xml",vbNormal Focus) does not work... any other resolutions i can try maybe?

ShuStar

 

[MARK858]

KL3 = File path
KL4 = File name

No, I asked

 what [B][COLOR="#FF0000"]exactly [/COLOR][/B]are the contents of KL3 and KL4

not what the contents represent.


and

Sub ccc()
Call Shell("notepad " & ActiveSheet.Range("KL3") & ActiveSheet.Range("KL4") & ".xml", vbNormalFocus)
End Sub

gives me no syntax error with

Excel 2010
	KL
3	C:\Users\Shudarstaran.Neel\Desktop\
4	DummyTest
Sheet2

 

[ShuStar]

Apologies, yep you got the content right. I've tried your code again and its working fine now, spaces and speech marks was the issue.

Such a simple fix but incredibly frustrating!! Awesome stuff, thanks for your help.

ShuStar