Is this the proper way to pass a varible parameter to and back from
subroutines?
My code seems a little sloppy, I would think that I'm missing some
delclaration

The subroutine "Orig_WS_name" is call with the following statement:
Call Sub Orig_WS_name("orig_name")

Private Sub Orig_WS_name(WSIn As String)
'WSIn has the value of "orig_name") prior to call
Call Add_WSname_Chars(WSIn)
'WSIn has the value of "orig_name-textadded") after call
End Sub

Private Sub Add_WSname_Chars(WS_name As String)
WS_name = WS_name & "-txt added"
End Sub