Snasui Excel Forum

Posted: **Sun Jun 29, 2014 11:53 pm**

ต้องการจัดรูปแบบข้อมูลในเซลล์ในคอลัมน์เดียวกันโดยให้ข้อความที่อยู่ด้านหลัง Space เป็นสีตัวอักษรน้ำเงิน
แนบไฟล์มาให้แล้วนะคะ อยากขอคำแนะนำหน่อยค่ะ ว่านอกจากคำสั่ง VBA ที่เขียนมาแล้วมีวิธีอื่นๆอีกหรือไม่คะ
หากเพื่อนๆท่านใดมีงานในลักษณะดังกล่าวจะได้นำความรู้ที่ได้ไปใช้เพื่อให้ทำงานได้อย่างสะดวกและราบขึ้นค่ะ
ขอบคุณมากๆค่ะ

Posted: **Mon Jun 30, 2014 8:56 am**

สำหรับการระบายสีอักขระใด ๆ ในเซลล์โดยมีเงื่อนไข ต้องพึ่ง VBA ครับ

สำหรับ Code ที่เขียนมาสามารถปรับให้เหลือแค่ด้านล่างได้ครับ

Code: Select all

Sub FormatActiveCells()
    Dim c As Range
    For Each c In Selection
        If InStr(c.Value, " ") > 0 Then
            c.Characters(InStr(c.Value, " ")).Font.Color = RGB(0, 0, 255)
        End If
    Next
End Sub

Posted: **Mon Jun 30, 2014 9:40 pm**

ข้าน้อยขอคารวะท่านจอมยุทธ

Snasui Excel Forum

จัดรูปแบบในคอลัมน์เดียวกันให้มีสีต่างกัน

จัดรูปแบบในคอลัมน์เดียวกันให้มีสีต่างกัน

Re: จัดรูปแบบในคอลัมน์เดียวกันให้มีสีต่างกัน

Re: จัดรูปแบบในคอลัมน์เดียวกันให้มีสีต่างกัน