تبدیل ماتریس n درn به یک ماتریس ستونی

[میثم66]

برنامه ای بنویسید که ماتریس اعداد دلخواهی را از محیط اکسل خوانده و سطر به سطر آن را در یک ستون به دنبال هم چاپ کند.مثل ماتریس زیر.

ورودی

3 2 1

6 5 4

9 8 7
خروجی
1
2
3
4
5
6
7
8
9

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[Amir Ghasemiyan]

برنامه ای بنویسید که ماتریس اعداد دلخواهی را از محیط اکسل خوانده و سطر به سطر آن را در یک ستون به دنبال هم چاپ کند.مثل ماتریس زیر.

ورودی

3 2 1

6 5 4

9 8 7
خروجی
1
2
3
4
5
6
7
8
9

اينم براي اين سوالتون:

Sub meisam()
i = 1
For Each cel In Range("A1:C3")
  Range("D" & i).Value = cel.Value
  i = i + 1
Next cel
End Sub

[میثم66]

اينم براي اين سوالتون:

Sub meisam()
i = 1
For Each cel In Range("A1:C3")
  Range("D" & i).Value = cel.Value
  i = i + 1
Next cel
End Sub

با تشکر.اینو شما فقط برای همین ماتریس نوشتید برای ماتریس های دیگه چی؟ اگه بخوام از دو حلقه for استفاده کنیم چجوری میشه؟مثلا i و j.جور دیگه چجوری میشه.

[Amir Ghasemiyan]

با تشکر.اینو شما فقط برای همین ماتریس نوشتید برای ماتریس های دیگه چی؟ اگه بخوام از دو حلقه for استفاده کنیم چجوری میشه؟مثلا i و j.جور دیگه چجوری میشه.

براي ماتريس هاي ديگه بايد محدوده رو تغيير بدين ديگه. اين كه واضحه.
اگر بخواين با حلقه هاي تو در تو بنويسين به اينصورت در مياد:

Sub meisam()
For i = 1 To 3
    For j = 1 To 3
        k = k + 1
        Range("D" & k).Value = Cells(i, j).Value
    Next j
Next i
End Sub

[میثم66]

 k = k + 1
        Range("D" & k).Value = Cells(i, j).Value 

این خط تو ضیح فارسیش چی میشه؟
بجای عدد3 . n گزاشتم جواب نداد

[Amir Ghasemiyan]

 k = k + 1
        Range("D" & k).Value = Cells(i, j).Value 

این خط تو ضیح فارسیش چی میشه؟
بجای عدد3 . n گزاشتم جواب نداد

اول از همه بايد بدونين كه آدرس دادن در اكسل دو روش داره. يك آدرس به اين صورت هست: A1 و يك آدرس به اين صورت : 1,1
هر دو به سلول A1 اشاره دارن.
اينجا هم بر اساس نياز از هر دو روش آدرس دهي استفاده كردم
range("D"&k) يعني سلول D1 يا D2 يا D3 يا ... كه بستگي به مقدار k داره
cells(i,j) هم بستگي به مقدار i و j به سلول هاي مختلفي اشاره ميكنه. مثلا 1,1 يا 1,2 يا 1,4 يا 3,4 يا ...

در اينجا هم گفتيم كه هر چي مقدار در سلول مثلا 1,1 هست بريز تو سلول D1 و به همين ترتيب

[میثم66]

اول از همه بايد بدونين كه آدرس دادن در اكسل دو روش داره. يك آدرس به اين صورت هست: A1 و يك آدرس به اين صورت : 1,1
هر دو به سلول A1 اشاره دارن.
اينجا هم بر اساس نياز از هر دو روش آدرس دهي استفاده كردم
range("D"&k) يعني سلول D1 يا D2 يا D3 يا ... كه بستگي به مقدار k داره
cells(i,j) هم بستگي به مقدار i و j به سلول هاي مختلفي اشاره ميكنه. مثلا 1,1 يا 1,2 يا 1,4 يا 3,4 يا ...

در اينجا هم گفتيم كه هر چي مقدار در سلول مثلا 1,1 هست بريز تو سلول D1 و به همين ترتيب

خب اینجا k چه نقشی داره ؟

[Amir Ghasemiyan]

خب اینجا k چه نقشی داره ؟

يكم كد رو نگاه كنيد. حرف هايي كه زدم روش فكر كنيد متوجه ميشيد k چه نقشي داره

[میثم66]

يكم كد رو نگاه كنيد. حرف هايي كه زدم روش فكر كنيد متوجه ميشيد k چه نقشي داره

مقدار k با j یکی هست .وقتی تو ستون دوم سطر اول هستیم k میشه 2.این یعنی دومین عدد هست؟

[Amir Ghasemiyan]

مقدار k با j یکی هست .وقتی تو ستون دوم سطر اول هستیم k میشه 2.این یعنی دومین عدد هست؟

نه دوست عزيز اين دو مقدار هيچ ربطي به هم ندارن. ممكنه در بعضي مواقع با هم برابر بشن ولي اين دليل نميشه كه بگين اين دو تا يكي هست
در مورد قسمت دوم سوالتون هم بايد بگم بله. يعني دومين عدد