שלום,

אני צריך להעביר מערך של תאים באקסל לתוך מערך ב VB - ז"א:

לדוגמא A1:A10 באקסל, לתוך מה שאני מגדיר כך במודול:

Dim MyArra (1 to 10) as integer

כך שהערכים יקלטו מהתאים. ואחר כך אני אמור להחזיר את המערך לתוך התאים באקסל.

מישהו יודע איך לעשות זאת?

תודה מראש

יש מלא דרכים לעשות את זה , לא הגדרת מה תנאי העצירה שלך כי מה קורה אם יש יותר מ- 10 תאים ואיך בדיוק תקרא לפונקציה

public sub Test1(r1 as Excel.Range) 
  dim x1 (1 to r1.rows.count)
  for i = 1 ro r1.rows.count
   x1(i) = r1.Cells(i,0).Value
  next i
end sub