Nhờ hướng dẫn cách vẽ biểu đồ đơn giản (2 người xem)

[huongtham89]

mình ko biết gì về excel. nhưng mà làm bài tập hóa lí và thí nghiệm có số liệu cần vẽ đồ thị ra giấy ( vẽ tay) nhưng thường ko chính xác. dạng đồ thì đơn giản Y=aX+b(X,Y đã biết) mục đích chính là vẽ chuẩn để ngoại suy và tính tang(anfa)=k hệ số góc. dạng http://img710.imageshack.us/img710/9004/cachvedothitrenexcel.jpg mong các bạn chỉ hộ mình từng bước củ thể để một người k biết excel có thể làm theo và tương tự làm bài khác. cảm ơn các bạn rất nhiều.

 

[khoavu87]

mình ko biết gì về excel. nhưng mà làm bài tập hóa lí và thí nghiệm có số liệu cần vẽ đồ thị ra giấy ( vẽ tay) nhưng thường ko chính xác. dạng đồ thì đơn giản Y=aX+b(X,Y đã biết) mục đích chính là vẽ chuẩn để ngoại suy và tính tang(anfa)=k hệ số góc. dạng http://img710.imageshack.us/img710/9004/cachvedothitrenexcel.jpg mong các bạn chỉ hộ mình từng bước củ thể để một người k biết excel có thể làm theo và tương tự làm bài khác. cảm ơn các bạn rất nhiều.

Dạng hướng dẫn vẽ đồ thị này có rất nhiều trên diễn đàn.bạn chịu khó tìm chắc chắn sẽ có hưỡng dẫn vẽ.
Mình thử vẽ cho bạn đây :

Sub ve()
Dim chrt As ChartObject
Set chrt = ThisWorkbook.Worksheets("Sheet1").ChartObjects.Add(100, 30, 400, 250)
chrt.Name = "Bieu do"
chrt.Chart.ChartWizard ThisWorkbook.Worksheets("Sheet1").Range("a1:e2"), xlLine, , xlRows, 1, 1, True, "Do thi Y =A*X+B", "Truc Hoanh(X)", "Truc Tung (Y)"
End Sub

- bạn copy đoạn code vào một module ( nhấn Alt+F11--->chọn Insert --->module)--->sau khi copy đoạn code đó rùi bạn nhấn F5-->quay về màn hình xem hình vẽ
- nếu dữ liệu của bạn nằm ở vùng khác chẳng hạn : "b2:F3"---> bạn chỉ cần thay lại dòng này :.....ThisWorkbook.Worksheets("Sheet1").Range("b2:F3").....rùi chạy lại
- bạn xem file đính kèm.

 

[ptm0412]

Theo yêu cầu của người hỏi thì:

1. Tác giả nhờ hướng dẫn cách vẽ đồ thị 1 cách dễ hiểu, không phải hỏi cái code VBA được record lại như vậy. Nếu tác giả tự vẽ được thì đã tự ghi macro được rồi.
Tóm lại, một đoạn code VBA đơn giản được record đó có thể gọi là hướng dẫn dễ hiểu không? có thể áp dụng để vẽ các dạng đồ thị khác không?
Thí dụ dữ liệu X từ 100 đến 500, số liệu Y từ 3.000 đến 10.000, dùng đoạn code đó có thể chỉnh Scale Min và Max của X Axis, Y Axis không? Nếu Khoa lại trả lời bằng code VBA thì đối với người hỏi này mà nói, mỗi lần vẽ sẽ phải hỏi 1 lần nữa. Sao không hướng dẫn cách vẽ chi tiết để người ta tự vẽ?

2. Đã có số liệu XY, vậy phải vẽ đồ thị dạng XY Scatter, không phải dạng line.

3. Chưa thấy trả lời vụ đi tìm tang α ?

 

[vuthithuytrang]

Dạng hướng dẫn vẽ đồ thị này có rất nhiều trên diễn đàn.bạn chịu khó tìm chắc chắn sẽ có hưỡng dẫn vẽ.
Mình thử vẽ cho bạn đây :

- bạn copy đoạn code vào một module ( nhấn Alt+F11--->chọn Insert --->module)--->sau khi copy đoạn code đó rùi bạn nhấn F5-->quay về màn hình xem hình vẽ
- nếu dữ liệu của bạn nằm ở vùng khác chẳng hạn : "b2:F3"---> bạn chỉ cần thay lại dòng này :.....ThisWorkbook.Worksheets("Sheet1").Range("b2:F3").....rùi chạy lại
- bạn xem file đính kèm.

----------------------
Hì, nay chủ nhật
Không thấy người hỏi , hỏi thêm, anh Khoa cho Trang hỏi hai thứ nha.

- Nhấn Alt+F11 > chọn Insert . Mở ra màn hình MS Visual Basic-Book1

- Kíck module : Mở ra hộp Tex Module1

- Copy đoạn code

Sub ve()
Dim chrt As ChartObject
Set chrt = ThisWorkbook.Worksheets("Sheet1").ChartObjects.Add (100, 30, 400, 250)
chrt.Name = "Bieu do"
chrt.Chart.ChartWizard ThisWorkbook.Worksheets("Sheet1").Range("a1:e2"), xlLine, , xlRows, 1, 1, True, "Do thi Y =A*X+B", "Truc Hoanh(X)", "Truc Tung (Y)" End Sub

- Nhấn F5

Xuất hiện hộp thoại "Microsoft Visual Ba..." thông báo : "Compile error : Syntax error" là sao thế
- Quay về màn hình xem hình vẽ : Không có gì, trang trắng là sao ạ ?

Hai là , nếu không nhấn All+F11 & nhấn F5 thì mở các trình duyệt và thực thi lệnh bằng cách nào khác không.

 

[khoavu87]

- Nhấn F5

Xuất hiện hộp thoại "Microsoft Visual Ba..." thông báo : "Compile error : Syntax error" là sao thế
- Quay về màn hình xem hình vẽ : Không có gì, trang trắng là sao ạ ?

Hai là , nếu không nhấn All+F11 & nhấn F5 thì mởcác trình duyệt và thực thi lệnh bằng cách nào khác không.

- Mình chạy vẫn bình thường mà có lỗi gì đâu? bạn đã khai báo dữ liệu để vẽ biểu đồ chưa vậy? ( ví dụ như biểu đồ mình vẽ dữ liệu thuộc vùng :" a1: e2".
- Để vào nhanh không cần Alt +f11 , thì có thể bạn kích chuột phải trực tiếp vào một trong các sheet của excel rùi chọn : view code.
- rùi copy đoạn code đó vào một module.
- chạy chương trình có hai cách:
+ cách một nhấn f5
+cách hai kích chuột vào vùng giữa đoạn code đó . tiếp theo kích chuột vào cái nút hình tam giác màu xanh ("run sub.....")

 

[ptm0412]

tính theo công thức : tang an pha = (y2-y1)/(x2-x1)

Dãy số bất kỳ không phải đường thẳng thì có tính theo cách ấy đươc không? Ở đây theo bài 1 thì đó là số liệu thống kê của các thí nghiệm hoá lý, làm sao chính xác như đường thẳng mà tính cách này?
Hay là tính liên tục 1 hàng ra 1 đống tang α khác nhau? người ta cần 1 hệ số duy nhất để ngoại suy mà.
Vậy mà lúc trước vẫn còn cãi:

Còn cái vụ tính tang anpha thì tác giả không nhờ tính đâu bác ạ.

Quy trình vẽ biểu đồ như sau:

1. Tô chọn vùng dữ liệu 2 cột, nhấn nút chart wizard trên toolbar, chọn loại đồ thị là XY scatter (không phải line đâu nha) thẳng hoặc cong tuỳ ý

2. Nhấn finish luôn cho lẹ. Nhấn chuột phải vào đường biểu diễn, chọn add trend line

3. Chọn loại trend line là linear (tuyến tính, tức là ax +b)

4. trong tab option click chọn vào display equation on chart

5. Kết quả

6. Tính a và b bằng công thức:

tô chọn 2 ô kế nhau theo hàng ngang, gõ công thức = Linest(dãy Y, dãy X), nhấn Ctrl Shift Enter, sẽ có kết quả 1 ô a, 1 ô b.
Kết quả này bằng chang kết quả equation trên đồ thị

Ghi chú:

Nếu vẽ đố thị dạng line, không tính tang α chính xác được. Đã nói rồi!

 

[dohung25]

Chào các anh.
Hiện tại,em đang có 1 bài tập nhỏ thế này.
Dữ liệu em cập nhật online từ trang web đưa vào file exel,mỗi 5 phút thì nó viết 1 hàng mới vào file , giờ yêu cầu sau mỗi 3h thì vẽ 1 cái biểu đồ vào 1 Sheet,sau đó tự động in ra,lần vẽ sau không được lấy dữ liệu của lần vẽ trước,tất cả đều thực hiện như thế.

Hiện em chưa biết gì về excel trong lập trình,mong các anh chịu khó chỉ bảo giúp em.

 

[nhat chi mai]

Sao mình đọc vẫn chưa hiểu rõ lắm...các anh chị có thể giải thích rõ ràng hơn được không?thanhs ạ