View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Frank Kabel Frank Kabel is offline
external usenet poster
 
Posts: 3,885
Default Type Mismatch Error

Hi
try something like the following:

sub foo()
dim wks1 as worksheet
dim wks2 as worksheet
set wks1 = worksheets("SUB")
set wks2 = worksheets("SUB.CSV")

with wks2
wks1.range("D"&i).value = Cstr(.Range("D"&x).value) & _
cstr(.Range("F"&x).value) & "/" & Cstr(.range("E" & x).value)

end with
end sub

--
Regards
Frank Kabel
Frankfurt, Germany


SRS Man wrote:
I am receiving a type mismatch error on the below code.

Range("SUB!D" & i).Value = Range("SUB.CSV!D" & x) +
Str(Range("SUB.CSV!F" & x)) + " /" + Range("SUB.CSV!E" & x)

The problem is the Range("SUB.CSV!D" & x) piece of the code can
sometimes have characters, sometimes it has numbers, it varies. Is
there a way around this?

Thank you