رنگی کردن سلولهای اکسل

[sanaz2007]

با سلام
دوستان من میخوام سلولهای اکسل رو رنگی کنم .نمیدونم چطوری از خاصیت fill color اکسل در کدنویسی وی بی استفاده کنم .لطفا راهنمایی کنید

[فاطمه وطن دوست]

کد از Drag

برای تغییر رنگ سلول ها



Worksheet.Cells(1, 1).Interior.Color = vbRed


و برای تغییر رنگ حاشیه سلول ها



Worksheet.Cells(1, 1).Borders(xlEdgeBottom).Color = vbGreen
Worksheet.Cells(1, 1).Borders(xlEdgeLeft).Color = vbGreen
Worksheet.Cells(1, 1).Borders(xlEdgeTop).Color = vbGreen

Worksheet.Cells(1, 1).Borders(xlEdgeRight).Color = vbGreen

[sanaz2007]

سلام از پاسختون ممنون . یک مسئله دیگه پیش میاد وقتی سلولها رنگی میشن خاصیت border در اکسل هم تغییر میکنه و رنگی میشه نتونستم رنگ حاشیه را عوض کنم .در فایل زیر عکس مربوطه رو گذاشتم.به نظرتون این چطوری حل میشه؟

[فاطمه وطن دوست]

mworksheet.Cells(7, 9).Interior.Color = vbBlue

mworksheet.Cells(7, 9).Borders(xlEdgeBottom).LineStyle = xlContinuous
mworksheet.Cells(7, 9).Borders(xlEdgeBottom).Color = vbRed


mworksheet.Cells(7, 9).Borders(xlEdgeRight).LineStyle = xlContinuous
mworksheet.Cells(7, 9).Borders(xlEdgeRight).Color = vbRed

mworksheet.Cells(7, 9).Borders(xlEdgeTop).LineStyle = xlContinuous
mworksheet.Cells(7, 9).Borders(xlEdgeTop).Color = vbRed

mworksheet.Cells(7, 9).Borders(xlEdgeLeft).LineStyle = xlContinuous
mworksheet.Cells(7, 9).Borders(xlEdgeLeft).Color = vbRed