Excel 2010 làm thế nào để biết ws.Range("C3:C" & lastRow).Formula = "=row()-2" thành Phông chữ Arial 24, Bold, Fillcolor=65535, Font Color=26368

Xin chào từ Steved

Làm cách nào để tôi nói điều này với ws.Range("C3:C" & lastRow).Formula = "=row()-2"

Để cũng làm như dưới đây

Phông chữ Arial 24,

In đậm,

Tô màu=65535,

Màu chữ=26368

Nỗ lực của tôi

Số phụCột()
Dim ws As Worksheet
Dim lastRow As Long

Với Lựa chọn.Font
.Name = "Arial"
.Size = 24
Kết thúc với
Lựa chọn.Font.Bold = True
Với Lựa chọn. Nội thất
.Pattern = xlSolid
.Màu = 65535
Kết thúc với
Với Lựa chọn.Font
.Name = "Arial"
.Size = 24
Kết thúc với
Với Lựa chọn.Font
.Màu = -26368
Kết thúc với

Đặt ws = ThisWorkbook.Sheets("Sheet1")

lastRow = ws.Range("A" & ws.Rows.Count).End(xlUp).Row

ws.Range("C3:C" & lastRow).Formula = "=row()-2"
ws.Range("E3:E" & lastRow).Formula = "=row()-2"
kết thúc phụ

Trả lời:
Re: Phạm vi phông chữ & màu sắc nội thất

Số phụColumn_R1()
Dim ws As Worksheet
Dim lastRow As Long

Với Lựa chọn.Font
.Name = "Arial"
.Size = 24
.Màu = 16750848 '-26368
.Đậm = Đúng
Kết thúc với
Với Lựa chọn. Nội thất
.Pattern = xlSolid
.Màu = 65535
Kết thúc với

Đặt ws = ThisWorkbook.Sheets("Sheet1")
lastRow = ws.Range("A" & ws.Rows.Count).End(xlUp).Row

Với ws.Range("C3:C" & lastRow)
.Công thức = "=row()-2"
.Font.Name = "Arial"
.Font.Size = 24
.Font.Color = 16750848 '-26368
.Font.Bold = True
.Nội thất.Màu = 65535
Kết thúc với
ws.Range("E3:E" & lastRow).Formula = "=row()-2"
kết thúc phụ
'---

Jim hình nón
Portland, Oregon Hoa Kỳ
công cụ excel miễn phí và thương mại
https://goo.gl/IUQUN2 (Dropbox)


Trả lời:
cố định,

Re: "Ok Làm thế nào chúng ta có thể để Cột A: Ô A3 như cũ

Đừng chọn những gì bạn không muốn thay đổi.
Đoạn mã bên dưới ảnh hưởng đến tất cả các ô được chọn...
'---
Với Lựa chọn.Font
.Name = "Arial"
.Size = 24
.Màu = 16750848 '-26368
.Đậm = Đúng
Kết thúc với
'---

Lưu ý: Cột("A:A"). Các ô đề cập đến toàn bộ cột gồm ~1 triệu ô.
Range("A3") là ô thứ 3 trong cột A.
'---
Jim hình nón