ورود

View Full Version : گرفتن خروجی اکسل از بانک اکسس با Caption فارسی



iransim
شنبه 31 خرداد 1399, 20:47 عصر
سلام و عرض ادب خدمت دوستان
من مورد اشکالم رو قبلا جستجو کردم ولی موضوع درخواستی رو پیدا نکردم ، ممنون میشم دوستان راهنمائی کنن
من برای گرفتن خروجی بانک اکسس با فرمت اکسل از دستورهای زیر استفاده میکنم


If IsNull(Me.txtTblName.Value) Or Me.txtTblName.Value = "" Then
MsgBox "لطفا جدولي براي خروجي اکسل انتخاب نماييد", vbExclamation + vbMsgBoxRight, "پيام"
'رفتن به تکسب اکس تيبل
Me.txtTblName.SetFocus
'تغيير رنگ تکس باکس انتخاب جدول به رنگ سبز
Me.txtTblName.BackColor = 13170651
Exit Sub
Else
'خروجي اکسل از تيبل
DoCmd.OpenTable Me.txtTblName, acViewPreview, acReadOnly
DoCmd.RunCommand acCmdExportExcel
DoCmd.Close acTable, Me.txtTblName, acSaveNo
'برگشت رنگ تکسباکس نيبل
Me.txtTblName.BackColor = 16777215
End If

وقتی فایل اکسل مربوطه را باز میکنم عناوین ستونهای جدول همان عناوین لاتین فیلدهای جدول است
چطور میتونم خروجی فایل اکسل من عناوین ستونها همان Caption های انتخابی در جدول باشد و نه عناوین فیلد ( در واقع سر ستونها Caption های فارسی در جدول باشد )
سپاس از همه دوستان

mazoolagh
یک شنبه 01 تیر 1399, 09:55 صبح
قبلا پاسخ داده شده:

https://barnamenevis.org/showthread.php?557217-%D8%A7%D8%B3%D8%AA%D9%81%D8%A7%D8%AF%D9%87-%D8%A7%D8%B2-%D8%A7%D8%B3%D9%BE%D9%84%DB%8C%D8%AA-%D9%81%D8%B1%D9%85-%D8%A8%D8%AC%D8%A7%DB%8C-%D8%B3%D8%A7%D8%A8%D9%81%D8%B1%D9%85&p=2420690&viewfull=1#post2420690

iransim
یک شنبه 01 تیر 1399, 19:13 عصر
سپاس دوست عزیز

iransim
یک شنبه 01 تیر 1399, 19:14 عصر
قبلا پاسخ داده شده:

https://barnamenevis.org/showthread.php?557217-%D8%A7%D8%B3%D8%AA%D9%81%D8%A7%D8%AF%D9%87-%D8%A7%D8%B2-%D8%A7%D8%B3%D9%BE%D9%84%DB%8C%D8%AA-%D9%81%D8%B1%D9%85-%D8%A8%D8%AC%D8%A7%DB%8C-%D8%B3%D8%A7%D8%A8%D9%81%D8%B1%D9%85&p=2420690&viewfull=1#post2420690

سپاس دوست عزیز