transfer the commands to command promt

Hello,
I need to transfer two commands to command prompt. The first one is always the same and it calls a command line of another application (BEAM).
The second command is for the BEAM command line. It is taken from an Excel cell.
The code I managed to write is transfering only the first command, probably because after execution of the first command command prompt is getting BEAM command line.
I don't know what to do...

Public Clipboard As New MSForms.DataObject
Sub Mymacro()
    Dim DataObj As New MSForms.DataObject
    Dim strContents As String
    Dim strCmd As String
    Dim RetVal, A, fs
        
    Range("A1").Copy
    
    DataObj.GetFromClipboard
    strContents = DataObj.GetText
    strCmd = "cmd.exe /S /K C:\temp\beam-cli.bat"
    
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set A = fs.CreateTextFile("C:\temp\vb.bat", True)
    A.writeline strCmd
    A.writeline strContents
    A.Close

    RetVal = Shell("C:\temp\vb.bat", 1)

End Sub

Code Tags Added
Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found at http://www.excelforum.com/forum-rule...rum-rules.html



(Because you are new to the forum, I have added them for you today. Please take a few minutes to read all Forum Rules and comply in the future.)

A N Rahman

Unfortunately your post does not comply with Rule 2 of our Forum RULES. Do not post a question in the thread of another member -- start your own thread.

If you feel an existing thread is particularly relevant to your need, provide a link to the other thread in your new thread.

Old threads are often only monitored by the original participants. New threads not only open you up to all possible participants again, they typically get faster response, too.