Option Explicit
Sub colors56() '57 colors, 0 to 56
Const Cot = 5: Const Hang = 1
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual 'pre XL97 xlManual
Dim iZ As Long
Dim str0 As Str
... Đọc thêm »
I. Hàm trả về chỉ số màu & ColorName của ô màu được chỉ định:
Code:
Function O_Mau(rCell As Range, Optional TenColor As Boolean)
Dim StrMau As String, iChiSo As Integer
iChiSo = rCell.Interior.ColorIndex
Select Case iChiSo
Case 1
StrMau = "Black"
Case 2: StrMau = "White"
Case 3: StrMau = "Red"
Case 4: StrMau =
... Đọc thêm »
Tuần tới, Apple có thể sẽ giới thiệu phiên bản iPad 2 có dung lượng 8GB
với giá rẻ hơn để phù hợp với túi tiền bình dân của nhiều người. Phiên
bản này được dự kiến phát hành cùng thời điểm với iPad 3.
Thông tin này được tờ DigiTimes trích dẫn theo
... Đọc thêm »
Photoshop
là một công cụ cho phép chúng ta kết hợp nhiều hình ảnh lại với nhau để
tạo ra một hình ảnh đẹp. Trong hướng dẫn này chúng ta sẽ sử dụng những
hình ảnh có sẵn để tạo ra 1 hình ảnh buồn và ảm đạm như hình trên. Hãy
... Đọc thêm »
