Change Dim strIn as String to Dim strIn as Variant. See edited post above.
Greg Visit my website: http://gregmaxey.com
View Tag Cloud
Forum Rules