CÙNG HỌC TẬP VÀ CHIA SẺ
 
IndexNỘI QUYCalendarTrợ giúpTìm kiếmĐăng kýĐăng Nhập
Chuyển dữ liệu từ WinCC ra Excel 54.311
Share | 
 

 Chuyển dữ liệu từ WinCC ra Excel

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down 
Chuyển đến trang : 1, 2  Next
Tác giảThông điệp
huudotb
Thành viên đặc biệt
Thành viên đặc biệt


Tổng số bài gửi: 397
Điểm: 1332
Danh tiếng: 61
Ngày tham gia: 30/11/2010
Tuổi: 25
Đến từ: Thái Bình

Bài gửiTiêu đề: Chuyển dữ liệu từ WinCC ra Excel    Tue Jan 04, 2011 10:51 pm

Cùng thảo luận nhé !
đây là 1 VD:
thử xem thế nào nhé !!!Phần này thực tế cũng rất cần !
Example 1: MS Excel
In this example, an output value from an input field is written in an Excel table.
'VBS113
Dim objExcelApp
Set objExcelApp = CreateObject("Excel.Application")
objExcelApp.Visible = True
'ExcelExample.xls is to create before executing this procedure.
'Replace with the real path of the file ExcelExample.xls.
objExcelApp.Workbooks.Open "\ExcelExample.xls"
objExcelApp.Cells(4, 3).Value = ScreenItems("IOField1").OutputValue
objExcelApp.ActiveWorkbook.Save
objExcelApp.Workbooks.Close
objExcelApp.Quit
Set objExcelApp = Nothing


__________________________________________________________________
[You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.]
[You must be registered and logged in to see this link.]


Được sửa bởi huudotb ngày Tue Jan 04, 2011 11:31 pm; sửa lần 1.
Về Đầu Trang Go down
http://diendientu.forumh.net
nguyendien.uneti
Thành viên đặc biệt
Thành viên đặc biệt


Tổng số bài gửi: 307
Điểm: 798
Danh tiếng: 65
Ngày tham gia: 06/12/2010
Đến từ: Nam Định

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Tue Jan 04, 2011 11:00 pm

Đoạn code trên là chuyển dữ liệu j thế ?

__________________________________________________________________
[You must be registered and logged in to see this link.]
Về Đầu Trang Go down
huudotb
Thành viên đặc biệt
Thành viên đặc biệt


Tổng số bài gửi: 397
Điểm: 1332
Danh tiếng: 61
Ngày tham gia: 30/11/2010
Tuổi: 25
Đến từ: Thái Bình

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Tue Jan 04, 2011 11:32 pm

Bạn xem phần chữ xanh nhé ! Mình cũng ko rành lắm đâu có gì sai sót bỏ qua hehehe

__________________________________________________________________
[You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.]
[You must be registered and logged in to see this link.]
Về Đầu Trang Go down
http://diendientu.forumh.net
sokoloemily
Thành viên mới
Thành viên mới


Tổng số bài gửi: 12
Điểm: 23
Danh tiếng: 9
Ngày tham gia: 19/02/2011
Tuổi: 27
Đến từ: hà nội

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Mon Mar 14, 2011 6:15 pm

Đoạn code trên là chuyển dữ liệu từ IOField1 (nơi bạn nhập dư liệu từ màn hình wincc hoặc nơi hiển thị dữ liệu từ các tag nội, ngoại) khi bạn nhấn 1 nút ví dụ như "xuất dữ liệu", . Mình đã làm đoạn code này rùi nhưng nó chỉ là tạo 1 nút ấn "xuất dữ liệu" , ở nút ấn đó bạn viết đoạn code nay vào phần event viết bằng VB....chú ý là tạo file ecxel trước nhé từ đó biết được mình nên xuất dữ liệu ra cột nào , hàng nào. Cái này chỉ xuất được dl từ IOField trong picture mà mình đặt nút ấn thôi...không xuất được IOField từ các picture khác, vì ở các picture khác nhau thì IOField lại trùng tên "IOField1,IOField2...". thêm nữa là nếu ta thay chữ "IOField1" bằng 1 tên tag thì không thể xuất dl từ 1 tag nội hay tag ngoại đó ra được.....
Về Đầu Trang Go down
huudotb
Thành viên đặc biệt
Thành viên đặc biệt


Tổng số bài gửi: 397
Điểm: 1332
Danh tiếng: 61
Ngày tham gia: 30/11/2010
Tuổi: 25
Đến từ: Thái Bình

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Tue Mar 15, 2011 12:00 am

sokoloemily đã viết:
Đoạn code trên là chuyển dữ liệu từ IOField1 (nơi bạn nhập dư liệu từ màn hình wincc hoặc nơi hiển thị dữ liệu từ các tag nội, ngoại) khi bạn nhấn 1 nút ví dụ như "xuất dữ liệu", . Mình đã làm đoạn code này rùi nhưng nó chỉ là tạo 1 nút ấn "xuất dữ liệu" , ở nút ấn đó bạn viết đoạn code nay vào phần event viết bằng VB....chú ý là tạo file ecxel trước nhé từ đó biết được mình nên xuất dữ liệu ra cột nào , hàng nào. Cái này chỉ xuất được dl từ IOField trong picture mà mình đặt nút ấn thôi...không xuất được IOField từ các picture khác, vì ở các picture khác nhau thì IOField lại trùng tên "IOField1,IOField2...". thêm nữa là nếu ta thay chữ "IOField1" bằng 1 tên tag thì không thể xuất dl từ 1 tag nội hay tag ngoại đó ra được.....
Rất hay cảm ơn bạn đã đóng góp cho diễn đàn : Bạn có thể làm cái Video, Up bài bạn đã thử làm để xuất ra Excel không ? Để mọi người hiểu thêm .Thank

__________________________________________________________________
[You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.]
[You must be registered and logged in to see this link.]
Về Đầu Trang Go down
http://diendientu.forumh.net
huudotb
Thành viên đặc biệt
Thành viên đặc biệt


Tổng số bài gửi: 397
Điểm: 1332
Danh tiếng: 61
Ngày tham gia: 30/11/2010
Tuổi: 25
Đến từ: Thái Bình

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Tue Mar 15, 2011 1:06 am

Mình thấy có đoạn code này tìm thấy trên mạng :

"""
Đây là code để tạo một cái file excel và ghi dữ liệu vào đó từ WinCC viết bằng VBS.
(lưu ý: WinCC chỉ hỗ trợ xuất ra file excel bằng excel 2003 thôi nhé, nếu 2007 thì bó tay đó).

Function action

Const ForReading = 1, ForWriting = 2, ForAppending = 8

Dim fso, f,Str,I(5), index

Set fso = CreateObject("Scripting.FileSystemObject")

Str = Replace(Now,"/","_")

Str = Replace(str,":","_")

Str = Replace(str," ","_")

Str = "Report_" & str & ".xls"

Set f = fso.OpenTextFile("\\\D:\\" & str, ForWriting, True)


Set I(1) = HMIRuntime.Tags("Test_Tag1")

Set I(2) = HMIRuntime.Tags("Test_Tag2")

Set I(3) = HMIRuntime.Tags("Test_Tag3")

Set I(4) = HMIRuntime.Tags("Test_Tag4")

Set I(5) = HMIRuntime.Tags("Test_Tag5")


index = 0

f.Write "**** Muon ghi cai gi thi viet vao day cho no dep **** " & vbCrLf & vbCrLf

f.Write Now & vbCrLf


For index = 1 To 5

I(index).Read

f.Write I(index).Name & vbTab & i(index).Value & vbCrLf

Next

f.Close

'MsgBox("Report OK")


End Function


""
Không biết phần I/O file ở trên có quan trọng Excel 2003 hay 2007 hay ko ?

__________________________________________________________________
[You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.]
[You must be registered and logged in to see this link.]
Về Đầu Trang Go down
http://diendientu.forumh.net
nguyendien.uneti
Thành viên đặc biệt
Thành viên đặc biệt


Tổng số bài gửi: 307
Điểm: 798
Danh tiếng: 65
Ngày tham gia: 06/12/2010
Đến từ: Nam Định

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Tue Mar 15, 2011 1:13 am

Ôi , hay quá . 30

__________________________________________________________________
[You must be registered and logged in to see this link.]
Về Đầu Trang Go down
sokoloemily
Thành viên mới
Thành viên mới


Tổng số bài gửi: 12
Điểm: 23
Danh tiếng: 9
Ngày tham gia: 19/02/2011
Tuổi: 27
Đến từ: hà nội

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Wed Mar 16, 2011 1:21 am

chào mọi người...cảm ơn huudotb mĩnh thử đoạn code trên nhưng chưa được,,, rồi mh sẽ tìm ra vấn đề là ở đâu...hi..
À còn đây là video mình làm về xuất từ IOField trên wincc ra excel... nhưng rất tiếc là không thu được tiếng, vì nhà hỏng hết phone rùi...
[You must be registered and logged in to see this link.]
Về Đầu Trang Go down
sokoloemily
Thành viên mới
Thành viên mới


Tổng số bài gửi: 12
Điểm: 23
Danh tiếng: 9
Ngày tham gia: 19/02/2011
Tuổi: 27
Đến từ: hà nội

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Wed Mar 16, 2011 1:50 am

À quên...anh em nào mà làm cái này thì chú ý là bỏ 2 dòng
objExcelApp.Workbooks.Close
objExcelApp.Quit
đi nhé, vì nếu không bỏ đi thì khi click vào nút "xuất dữ liệu" nó mở nên rồi tắt đi liền trong nháy mắt , chẳng xem được gì....
ta phải tạo 1 file excel trước thì biết được ô nào (dòng mấy, cột mấy) sẽ hiển thị dữ liệu ở iofield nào......sau đó save lại, rùi tắt đi........trong code thì có dòng chỉ đến đường dẫn của file đó... bạn không cần mở file excel trước, khi nhấn nút nó sẽ tự mở (objExcelApp.Workbooks.Open "\ExcelExample.xls")....
Về Đầu Trang Go down
lucky
Thành viên đặc biệt
Thành viên đặc biệt


Tổng số bài gửi: 240
Điểm: 580
Danh tiếng: 17
Ngày tham gia: 06/12/2010
Tuổi: 27
Đến từ: Việt Nam

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Wed Mar 16, 2011 2:06 am

sokoloemily bác pro đó!
15 15

__________________________________________________________________
Hãy zui lên và cuộc sống là không được dừng lại!
[You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.]
Về Đầu Trang Go down
huudotb
Thành viên đặc biệt
Thành viên đặc biệt


Tổng số bài gửi: 397
Điểm: 1332
Danh tiếng: 61
Ngày tham gia: 30/11/2010
Tuổi: 25
Đến từ: Thái Bình

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Wed Mar 16, 2011 2:11 am

Đúng rùi 2 câu lệnh này làm cho Excel tự động tắt :
objExcelApp.Workbooks.Close
objExcelApp.Quit


Thấy video rất hay và ý nghĩ.Thank bạn nhé ! Rất cần sự đóng góp hay của bạn và các thành viên

__________________________________________________________________
[You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.][You must be registered and logged in to see this image.]
[You must be registered and logged in to see this link.]
Về Đầu Trang Go down
http://diendientu.forumh.net
tranxuanloc89
Thành viên mới
Thành viên mới


Tổng số bài gửi: 4
Điểm: 5
Danh tiếng: 1
Ngày tham gia: 11/05/2011

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Wed May 11, 2011 6:50 pm

sokoloemily đã viết:
chào mọi người...cảm ơn huudotb mĩnh thử đoạn code trên nhưng chưa được,,, rồi mh sẽ tìm ra vấn đề là ở đâu...hi..
À còn đây là video mình làm về xuất từ IOField trên wincc ra excel... nhưng rất tiếc là không thu được tiếng, vì nhà hỏng hết phone rùi...
[You must be registered and logged in to see this link.]

cảm ơn bài viết và đoạn video của anh rất nhiều, em mới tìm hiểu về wincc để làm đồ án tốt nghiệp nên rất cần thêm nhiều thông tin, nhất là cái hiển thị giá trị trả về của cảm biến đó anh. rất mong được sự giúp đỡ từ anh.
Về Đầu Trang Go down
sokoloemily
Thành viên mới
Thành viên mới


Tổng số bài gửi: 12
Điểm: 23
Danh tiếng: 9
Ngày tham gia: 19/02/2011
Tuổi: 27
Đến từ: hà nội

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Thu May 12, 2011 7:59 am

chào tranxuanloc89... chắc bạn muốn hiển thị giá trị đo được từ cảm biến analog nên win cc phải không?
cb đưa vào plc xử lý bằng hàm FC105 sau đó lấy giá trị ra vào 1 biến vd như MD10 chẳng hạn... sau đó trên Wincc cho 1 i/o hiển thị dl từ MD10 trên plc....về hàm xửu lý analog thì trên diễn đàn cũng đã có bài , bạn hãy tìm đọc...chúc thành công.
Về Đầu Trang Go down
tranxuanloc89
Thành viên mới
Thành viên mới


Tổng số bài gửi: 4
Điểm: 5
Danh tiếng: 1
Ngày tham gia: 11/05/2011

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Thu May 12, 2011 6:13 pm

sokoloemily đã viết:
chào tranxuanloc89... chắc bạn muốn hiển thị giá trị đo được từ cảm biến analog nên win cc phải không?
cb đưa vào plc xử lý bằng hàm FC105 sau đó lấy giá trị ra vào 1 biến vd như MD10 chẳng hạn... sau đó trên Wincc cho 1 i/o hiển thị dl từ MD10 trên plc....về hàm xửu lý analog thì trên diễn đàn cũng đã có bài , bạn hãy tìm đọc...chúc thành công.

thanks sokoloemily. Nếu được tham khảo chương trình bạn viết trong video thi hay quá. :)
Về Đầu Trang Go down
tranxuanloc89
Thành viên mới
Thành viên mới


Tổng số bài gửi: 4
Điểm: 5
Danh tiếng: 1
Ngày tham gia: 11/05/2011

Bài gửiTiêu đề: Re: Chuyển dữ liệu từ WinCC ra Excel    Tue May 24, 2011 12:39 pm

sokoloemily đã viết:
chào tranxuanloc89... chắc bạn muốn hiển thị giá trị đo được từ cảm biến analog nên win cc phải không?
cb đưa vào plc xử lý bằng hàm FC105 sau đó lấy giá trị ra vào 1 biến vd như MD10 chẳng hạn... sau đó trên Wincc cho 1 i/o hiển thị dl từ MD10 trên plc....về hàm xửu lý analog thì trên diễn đàn cũng đã có bài , bạn hãy tìm đọc...chúc thành công.

khi xuất dữ liệu ra excell thi chi lưu được tại ô mình đã chỉ định thôi hả bác. có cách nào để lưu giá trị mới vào cột khác hàng khác được không vậy. mong sokoloemily chỉ giáo
Về Đầu Trang Go down
 

Chuyển dữ liệu từ WinCC ra Excel

Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang 
Trang 1 trong tổng số 2 trangChuyển đến trang : 1, 2  Next

Permissions in this forum:Bạn không có quyền trả lời bài viết
 ::  ::  :: -