VBA Excel - cách thiết lập tạo đường viền phác thảo trên một phạm vi ô
ĐANG LÀM VIỆC - chọn một phạm vi ô và áp dụng các đường viền, bao gồm cả các ô bên trong > > Đặt XLRange = xlApp.Range(Rangeval) ' Ví dụ Rangeval = "D6:F12" > > Với XLRange > .Borders.LineStyle = xlContinuous > .Borders. Màu = vbBlack > .Borders.Weight = xlThin > Kết thúc bằng >
>
> KHÔNG LÀM VIỆC - không có đường viền được hiển thị >
> > Đặt XLRange = xlApp.Range(Rangeval) > XLRange.BorderAround LineStyle:=xlContinuous, Color:=vbBlack >
>
> Sự giúp đỡ của bạn sẽ được đánh giá cao. >
>Ian
Trả lời:
CHÀO,
Nếu bạn đang tự động hóa Excel (tức là thao tác Excel từ mã chạy trong MSP), thì bạn cần bao gồm tệp xlAp. khi bạn tham chiếu đến bất kỳ đối tượng Excel nào (như Phạm vi).
> Với xlApp. Range("A1:C4") > .Borders.LineStyle = xlContinuous > .BordersAround Weight:=xlThick > End With > >Nếu không có "xlApp" ở đó, VBA sẽ giả định "Range" là một phương thức thuộc về MSP. > >Điều Bernie muốn nói là đừng đặt tên cho đối tượng Phạm vi của bạn là "XLRange"> Dim xlRng Như Excel.Range
> > Đặt xlRng = xlApp.Range(Rangeval) > > Với xlRng > .Borders.LineStyle = xlContinuous > .Borders.Color = vbBlack > .Borders.Weight = xlThin > Kết thúc bằng >Chúc mừng
Giàu có
Comments
Post a Comment