PDA

View Full Version : باز کردن چند فایل اکسل در FlexGrid



amiralex
شنبه 18 مهر 1394, 12:05 عصر
با سلام

من یه FlexGrid دارم که با این کد میتونم یه فایل اکسل و نشون بدم


With CommonDialog1

.FileName = ""


.CancelError = False


.DialogTitle = "Select Files"


.Filter = "*.xls|*.xls"


.ShowOpen


VSFlexGrid2.LoadGrid .FileName, flexFileExcel


End With



اما اگر بخوام چند فایل اکسل و تو همون FlexGrid نشون بدم چی کار کنم؟؟

من این کد و پیدا کردم اما جواب نمیده


Dim vFiles As Variant
Dim lFile As Variant
With CommonDialog1
.FileName = ""
.CancelError = False
.DialogTitle = "Select Files"
.Flags = cdlOFNAllowMultiselect Or cdlOFNExplorer Or cdlOFNHideReadOnly
.Filter = "*.xls|*.xls"
.ShowOpen
vFiles = Split(.FileName, Chr(0), flexFileExcel)
txtmasir = .FileName


For lFile = 1 To UBound(vFiles)
VSFlexGrid2.LoadGrid vFiles(0) + "\" & vFiles(lFile), flexFileExcel
Next lFile


End With

ممنون میشم زودتر جواب بدید

amiralex
یک شنبه 19 مهر 1394, 09:53 صبح
کسی نیست به این سوال جواب بده؟

یه سوال دیگه هم اینجا میپرسم امیدوارم کمکم کنید

من این کد و برای لود کردن یه فایل اکسل تو flexgrid استفاده میکنم و مشکلی نداره

اما فیلد اولم که Pcod باشه از نوع Number نیست از نوع متن هست یعنی عدد رو بصورت 00001 و 00002 و 00003 داخل فایل اکسل هست
اما وقتی با این کد وارد Flexgrid میکنم این اعداد تبدیل به 1 , 2 , 3 میشه. چیکار باید بکنم؟؟؟
این کدیه که استفاده میکنم

adoPrimaryRS4.AddNew Array("Pcod", "Name", "Lname"), Array(Str(.TextMatrix(i, 1)), .TextMatrix(i, 2), .TextMatrix(i, 3),)

یه سوال دیگه هم دارم اینه که من یه گزارش میخوام پرینت بگیرم براش ردیف میذلرم با کد زیر اما موقع نمایش از دیف 2 شروع میکنه به نمایش؟ علت چیه؟؟



Dim i As Double
adoPrimaryRS.MoveFirst
For i = 1 To adoPrimaryRS.RecordCount
adoPrimaryRS.Fields(0) = i
adoPrimaryRS.Update
adoPrimaryRS.MoveNext
Next i

vbhamed
دوشنبه 20 مهر 1394, 05:09 صبح
با سلام
من یه FlexGrid دارم که با این کد میتونم یه فایل اکسل و نشون بدم
اما اگر بخوام چند فایل اکسل و تو همون FlexGrid نشون بدم چی کار کنم؟؟
من این کد و پیدا کردم اما جواب نمیده

سلام
خب مشخصه شما تو کدتون فایلهای اکسل رو به ترتیب بارگذاری می‌کنید و هر بار محتویات قبلی پاک میشه و در نهایت فقط آخرین فایل نمایش داده میشه

اگر ساختار فایلهای اکسل شبیه هم هستن دو تا FlexGrid بزارید و یکی یکی هر فایل اکسل رو در اولی بارگذاری کنید سپس سطرهای Flex اول رو با کدنویسی به فلکس دوم اضافه کنید و همینطور ادامه بدید تا فایل آخر


در مورد سؤالات بعدی هم برای هر سؤال یک تاپیک مجزا بزنید وگرنه پستتون حذف میشه