For Next döngüsü yardım.

[zeliha]

Cells(c, 2) = ExecuteExcel4Macro("'C:\excel\[" & dosya.Name & "]sayfa1'!R" & a & "C4")

Arkadaşlar,
Bu kodda RaC4 değilde RaCa olarak nasıl yaparım.R" & a & "C& a & ") şeklinde yazıyorum hata veriyor.

 

[Levent Menteşoğlu]

Aşağıdaki gibi deneyin.

Cells(c, 2) = ExecuteExcel4Macro("'C:\excel\[" & dosya.Name & "]sayfa1'!R" & a & "C" & a)

 

[Haluk]

ExecuteExcel4Macro("'C:\excel\[" & dosya.Name & "]sayfa1'!R" & a & "C" & a)

 

[zeliha]

Teşekkür ederim.

Raider ve Leventm ellerinize sağlık.İyiki varsınız...