I have a worksheet that worked fine in XP Pro but fails in Windows 7 at the "trim(str(.,.)"
at the bottom of this snipppet saying "Can't find Project or Library". I thought trim and str were internal functions.
Thanks for any help and happy thanksgiving!
Private Sub cmdOutPut_Click()
Dim fname As String
Dim TParkId As String
Dim wsTabFile As Worksheet
Dim rngInput As Range
Dim rngDepDate As Range
Dim a As Currency
Dim i As Integer
Dim j As Integer
Dim vData As Variant
Set wsTabFile = Worksheets("Computer")
Set rngInput = Range("tblInput")
Set rngDepDate = Range("depDate")
TParkId = wsTabFile.Range("PropNum")
fname = "\OT" & Trim(Str(Month(rngDepDate))) & Trim(Str(Day(rngDepDate))) &
Trim(Str[(Year(rngDepDate))) & "R" & Range("ReportNum") & ".txt"