ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ¦r¦ê¤¤­Y§t¦³?¡A«ç»ò®æ¦¡¤Æ±ø¥ó?

[µo°Ý] ¦r¦ê¤¤­Y§t¦³?¡A«ç»ò®æ¦¡¤Æ±ø¥ó?

½Ð°Ý­Y¦p¤Uª¬ºA¡A¨Ï¥Î²Å¦X±ø¥óÃöÁä¦r"?",±N·|§â¥|­ÓÀx¦s®æ³£®æ¦¡¤Æ±ø¥ó..¦¨¬°¤@ºØÃC¦â
? ¬O¥Nªí©Ò¦³¦r¤¸¡A¤£¯à³æ¿W²Å¦X¤~Åܦâ¶Ü?

       A
1    123?321
2    123
3    ?321
4     123?
  1. Sub Macro2()

  2.     Columns("A:A").Select
  3.     Selection.FormatConditions.Add Type:=xlTextString, String:="?", _
  4.         TextOperator:=xlContains
  5.     Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
  6.     With Selection.FormatConditions(1).Font
  7.         .Color = -16383844
  8.         .TintAndShade = 0
  9.     End With
  10.     With Selection.FormatConditions(1).Interior
  11.         .PatternColorIndex = xlAutomatic
  12.         .Color = 13551615
  13.         .TintAndShade = 0
  14.     End With
  15.     Selection.FormatConditions(1).StopIfTrue = False
  16.     Range("D5").Select
  17. End Sub
½Æ»s¥N½X

¥i¦Ò¼{¥Î¤½¦¡¡G
=FIND("?",A1)

TOP

¥i¦Ò¼{¥Î¤½¦¡¡G
=FIND("?",A1)
­ã´£³¡ªL µoªí©ó 2016-6-13 18:17


ÁÂÁª©¥D~¥i¥H²Å¦X¤F~

TOP

        ÀR«ä¦Û¦b : ¡i¥Í©R¦b©I§l¶¡¡j¦òªû»¡¡G¡u¥Í©R¦b©I§l¶¡¡C¡v¤HµLªkºÞ¦í¦Û¤vªº¥Í©R¡A§óµLªk¾×¦í¦º´Á¡AÅý¦Û¤v¥Ã¦í¤H¶¡¡C¬JµM¥Í©R¥h¨Ó³o»òµL±`¡A§Ú­Ì§óÀ³¸Ó¦n¦n¦a·R±¤¥¦¡B§Q¥Î¥¦¡B¥R¹ê¥¦¡AÅý³oµL±`¡BÄ_¶Qªº¥Í©R¡A´²µo¥¦¯uµ½¬üªº¥ú½÷¡A¬M·Ó¥X¥Í©R¯u¥¿ªº»ù­È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD