Assign cell content to variable

try replacing wsExcel with worksheets("apha")... and check that it is spelled correctly (pay attention to capital and lowercase letters)
--
“What is well conceived is clearly expressed, and the words to say it come easily.”
Nicolas Boileau

It gets stuck on the line where I assign sType
sType = wsExcel.Range("L" & Lig).Value

I did the step-by-step method (F8) and it stops at this line...

On which line is it stuck? Have you done a step-by-step run to see if all the variables or objects are initialized correctly?

--
“What is well conceived is clearly expressed, and the words to say it come easily.”
Nicolas Boileau

re,

Long is preferable if you do not know the number of lines to be processed

Then, you need to do:

Dim wsExcel As Worksheet Set wsExcel = Worksheets("alpha")

That's what I see for now.

;o)

polux
--
«What is well conceived is clearly stated, And the words to say it come easily.»
Nicolas Boileau

Hello,

What does wsExcel represent? And Type is a reserved word in VB and VBA. Change the name of your variable.

The following syntax works:

Dim sType As String Dim lig As Long lig = 14 sType = worksheets("Feuil1").Range("L" & lig).Value

;o)

polux
--
“What is well conceived can be clearly stated, And the words to say it come easily.”
Nicolas Boileau

Hi,

what happens if you remove your .value?