cách vẽ tự động trong excel (1 người xem)

[phivu238]

Mình muốn nhờ các bạn giúp, mình muốn biết cách vẽ hình tự động trong excel mà chưa làm được
Ví dụ thế này: Mình muốn vẽ một hình cn, mình chỉ cần nhập số liệu về chiều dài, chiều rộng... là excel tự động vẽ cho mình. Khi thay đổi giá trị thì hình cũng thay đổi theo.

 

[dnphuonganh]

Vụ này nghe không ổn! Mấy cái hình bạn cần vẽ có xài AutoCAD được không?

 

[voda]

Các bạn xem file. Bằng cách này có thể vẽ nhiều hình khác nhau.

 

[trantoi]

File đó có gì dâu chỉ vẽ 1 hình chữ nhật thôi mà
Đề ra là: nhập số liệu dài rộng vẽ ra hình chữ nhật có các cạnh tương ứng.

 

[ptm0412]

Đề ra là: nhập số liệu dài rộng vẽ ra hình chữ nhật có các cạnh tương ứng.

Thì chẳng phải có 1 form nhập số liệu dài, rộng rồi sao? (dơn vị tính là pixel)

Bằng cách này có thể vẽ nhiều hình khác nhau

Triển khai ý của Bác Voda, vẽ 2 loại shape: Rectangle và Oval với kích thước là cm luôn.
Thêm 1 nút để sửa shape, nhưng nhờ bácVoda xem giúp, mở form lên rồi chọn shape sau thì được, chọn shape trước mở form sau thì bị lỗi.

 

[voda]

-Lỗi xảy ra vì khi click vào CommandButton2 để mở form, vùng chọn biến mất. Báo lỗi ở dòng vì không nhận ra vùng chọn)

Sub EditShape()
With Selection
[B].Top = Ntop[/B]
.Width = Nwidth
.Left = Nleft
.Height = Nheight
End With
End Sub

-Cách khắc phục đơn giản nhất:

Private Sub CommandButton2_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
   CmdSelect = "Edit"
   FormDraw.Show
End Sub

 

[phivu238]

Mình vẽ được rồi, đúng như ndu nói, sử dụng biểu đồ loại XY scatter, phải lập một bảng bên tính tọa độ từ các số liệu đầu vào như chiều rộng, chiều dài. Mình đang làm thuyết minh cầu đúc hẫng nên mặt cắt thay đổi do vậy mà vẽ cad thì lâu lắm, mình chỉ cần vẽ một mặt cắt sau đó chỉ việc copy và thay số là excel tự vẽ.

 

[ndu96081631]

Mình vẽ được rồi, đúng như ndu nói, sử dụng biểu đồ loại XY scatter, phải lập một bảng bên tính tọa độ từ các số liệu đầu vào như chiều rộng, chiều dài. Mình đang làm thuyết minh cầu đúc hẫng nên mặt cắt thay đổi do vậy mà vẽ cad thì lâu lắm, mình chỉ cần vẽ một mặt cắt sau đó chỉ việc copy và thay số là excel tự vẽ.

Có 1 lần tôi đã nhìn thấy 1 file người ta vẽ hình chử nhật bằng biểu đồ rất đẹp... Nhập chiều dài, chiều rộng vào, nó tự vẽ ra hình mà không cần bất cứ macro nào!
Đáng tiếc tôi yếu về môn Chart này, còn file đó nằm ở đâu giờ không nhớ nổi... nếu không có thể đưa lên cho mọi người tham khảo, bảo đãm không chê vào đâu được (về giãi pháp)
Có ai đã từng gặp loại bài toán dùng biểu đồ để vẽ hình xin post lên đây nhé

 

[macarong24h]

mình cũng đang làm thiết kế tốt nghiệp về cầu đúc hẫng, cần vẽ mặt cắt thay đổi khi thay đổi số liệu. do đó vẽ trong excel là tiện lợi nhất. chỉ cần một bảng số liệu và excel tự vẽ. mình cũng đã thấy một người khóa trước làm được mà không cần sử dụng macro nào cả. vậy bác nào biết thì chỉ dùm em

 

[PhanTuHuong]

mình cũng đang làm thiết kế tốt nghiệp về cầu đúc hẫng, cần vẽ mặt cắt thay đổi khi thay đổi số liệu. do đó vẽ trong excel là tiện lợi nhất. chỉ cần một bảng số liệu và excel tự vẽ. mình cũng đã thấy một người khóa trước làm được mà không cần sử dụng macro nào cả. vậy bác nào biết thì chỉ dùm em

Có thể do sử dụng đồ thị, nhập vào là tự thay đổi nên không cần macro.

 

[thanh_dhxd]

anh phantuhuong có cách nào làm được như thế ko
em cung dân cầu đường đây

 

[bmiy_nguyen]

sao không ai chỉ cách làm vậy??? làm ơn chỉ đi các pro

 

[bmiy_nguyen]

không thấy ai làm em làm chơi xem đúng ko? co gì các anh chi cho ý kiến

sao không ai chỉ cách làm vậy??? làm ơn chỉ đi các pro

co phai dang nay ko cac nhi?, em chi lam choi vay thoi. tính vài cái tượng trung thôi

 

[ptm0412]

co phai dang nay ko cac nhi?, em chi lam choi vay thoi. tính vài cái tượng trung thôi

Dùng biểu đồ XY vẽ 1 hình bất kỳ không phải là chuyện khó. Cái khó là khi thay đổi kích thước trên các ô số, biểu đồ cũng thay đổi theo, nhưng tỷ lệ cân đối theo 2 phương X và Y bị mất. Thí dụ đoạn biểu đồ thể hiện 80 dài hơn đoạn biểu đồ thể hiện 100 chẳng hạn.

 

[ptm0412]

Có thể dùng VBA để ấn định tỷ lệ giữa trục X và trục Y bằng 1:1, bằng cách set kích thước Plot Area bằng đúng Max Scale của 2 trục X, Y. Để linh động, ta lấy 2 giá trị này trên sheet để có thể tùy nghi thay đổi.
Lúc đó bảo đảm tỷ lệ dài/ rộng của hình chữ nhật vẽ bằng biểu đồ.

Ghi chú: Hệ số quy đổi: 1 inch = 25.4 mm = 72 pixel

Sub ScaleChart()
    Sheet1.ChartObjects("chart 1").Select
    With ActiveChart.PlotArea
        .Width = Sheet1.[c2]
        .Height = Sheet1.[c3]
    End With
    With ActiveChart.Axes(xlValue)
        .MinimumScale = 0
        .MaximumScale = Sheet1.[c3]
    End With
    With ActiveChart.Axes(xlCategory)
        .MinimumScale = 0
        .MaximumScale = Sheet1.[c2]
    End With
    [a1].Select
End Sub

Code này chỉ chạy 1 lần khi cần thay max width và max height của hình chữ nhật ở B2 và B3. Sau đó yên tâm thay width và height của hình chữ nhật ở B6 và B7.

File đính kèm ứng dụng XY Scatter Chart, Serie dữ liệu giả, XY Chart Labeler, và ứng dụng tô màu bên dưới biểu đồ XY.

 

[vanhieu260876]

Cảm on Vodo bai rat hay

 

[vanthang123]

cách vẽ hình tự động trong excel

ex

co phai dang nay ko cac nhi?, em chi lam choi vay thoi. tính vài cái tượng trung thôi

đuờngChào bạn! mình muốn hỏi cách vẽ hình của bạn . bạn có thể hướng dẫn mình cụ thể được không. vẫn đề của mình là mình lập bảng tính có vẽ biểu đồ nội lực và các mặt cách trong bảng tính. vi dụ mình muốn vẽ đường ảnh hưởng trên excel mình muôn tự động khi thay đổi vị trị đặt lực sẽ ra một một dạng biểu đồ tương ứng. " do không biết gọi xứng hô thế nào nên xưng hô bạn. mong bạn giúp đỡ.