Giúp đỡ tạo biểu đồ cột

[hailong]

Chào cả nhà

Mình muốn tạo đồ thị dạng cột

VD : Tại ô A1 có giá trị là 10 thì ô A2 tô màu xanh
Tại ô B1 có giá trị là 30 thì ô B2 , B3 , B4 tô màu xanh.

Cám ơn nhiều.

HAI LONG NHA TRANG

 

[tigertiger]

Bạn dùng chức năng Fomat \ Conditional Formatting

+ đặt con trỏ tại ô A2
+ vào Fomat \ Conditional Formatting -> chọn Fomular Is (thay Cell Value Is) và nhập box bên cạnh: =A$1/10>=ROW()-1
+ sau đó copy ra những ô tương ứng cần định dạng đồ chị, chẳng hạn A2:J21

khi đó trên các ô A1,B1,...J1 ta có thể nhập các giá trị tương ứng với bđồ cột mong muốn

bạn xem trong file tôi gửi kèm

chúc thành công

 

[SA_DQ]

Thêm 1 phương án nữa:

Option Explicit

Sub ColumnColor()
 Dim Rng As Range
 Dim iJ As Integer, Temp As Integer
 For iJ = 1 To 5
    Temp = Cells(1, iJ) / 10
    Set Rng = Range(Cells(10 - Temp, iJ), Cells(9, iJ))
    With Rng.Interior
        .ColorIndex = 8
        .Pattern = xlSolid
    End With
 Next iJ
 Set Rng = Nothing
End Sub

 

[SoiBien]

Biểu đồ cột

Hoặc bạn dùng cách này.

 

[hailong]

Cám ơn Tigertiger, SA_DQ , Soibien.

Khi nào có dịp các bác ghé qua Nha Trang sẽ kính các bác mấy vại bia.

Chúc sức khỏe