2015年1月9日金曜日

excelVBA フォントの色が○○の時にセルに値を入力

備忘録用に。

一見黒(ColorIndex1) に見えるフォントが実は-4105という得体のしれない値を示していた。

 Sub Macro2()
     Dim i As Integer
     For i = 9 To 50
         If Cells(i, 2).Font.ColorIndex = -4105 Then Cells(i, 12).Value = "×"
         Next i
   
 End Sub

ついでにこれも。

MsgBox Range("b11").font.ColorIndex

0 件のコメント:

インディアン(ネイティブアメリカン)の強キャラ

漫画でインディアン(ネイティブアメリカン)が描かれると 敵側の強キャラであることが多い気がする。 「バオー来訪者」ウォーケン 「傷追い人」インディアン・ジョー 「THE EDGE」バード バードはインディアンと明言されたわけではないが、バンダナ、長髪、厚い唇、戦闘力などからここに...