Page 1 of 1

vba excel conditional format

Posted: Sat Sep 08, 2012 4:21 pm
by watt
ผมมีปัญหาต้องการเขียน vba excel conditional format เพื่อให้เปลี่ยนสีใน cell แต่ไม่ทราบว่าสำหรับ blank cell นั้นจะเขียน อย่างไร หาดูมีแต่ เปลียนตามค่ามาก น้อย เท่ากับ แต่ ไม่สามารถหา เมื่อเป็น blank cell จะต้องใช้ ว่าอย่างไร เช่นที่ด้านล่าง

Code: Select all

Dim rngToFormat As Range
   rngToFormat.FormatConditions.Add Type:=xlCellValue, _
       Operator:=xlLess, Formula1:="15"
   rngToFormat.FormatConditions(1).Font.ColorIndex = 3


จึงขอรบกวนถ้าจะกรุณาบอกให้ได้ว่าเมื่อต้องการ .FormatConditions.Add Type:= ......blank cell.....ต้องใช้ code อย่างไร

Re: vba excel conditional format

Posted: Sat Sep 08, 2012 4:31 pm
by snasui
:D การหาค่าเซลล์ว่างสามารถหาได้หลายวิธีครับ สำหรับวิธีง่าย ๆ ลองบันทึก Macro แล้วดู Code และปรับใช้ โดยมีขั้นตอนดังนี้ครับ
  1. คลุมเลือกพื้นที่ที่ต้องการ
  2. กดแป้น F5 > Special > Blanks > OK
  3. กำหนด Format
  4. สังเกต Code ที่ได้
  5. ปรับใช้ใน VBA

Re: vba excel conditional format

Posted: Sat Sep 08, 2012 6:29 pm
by watt
ขอบคุณมากครับ พอจะหาทางไปต่อได้บ้างแล้วครับ