Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


26831 / 76732 ←次へ | 前へ→

【55227】Re:IF文の逆は?
質問  きたさん  - 08/4/22(火) 23:05 -

引用なし
パスワード
   55216の質問で罫線を利用しよう!って閃きました☆笑

1列に罫線がなくて40列目に罫線がある場合にメッセージを
表示させたいのですが何も表示されません・・・
なぜでしょうか?

Sub Macro1()

Dim a As Integer
Dim c As Integer
  
  c = 11
  
Do While a < 100

  If Cells(40, c).Borders(xlEdgeBottom).LineStyle <> xlNone Then
    If Not Cells(1, c).Borders(xlEdgeBottom).LineStyle <> xlNone Then
    MsgBox "OK"
    End If
  End If
  
  a = a + 1
  c = c + 1
Loop

End Sub
0 hits

【55221】IF文の逆は? きたさん 08/4/22(火) 22:17 質問
【55222】Re:IF文の逆は? かみちゃん 08/4/22(火) 22:21 発言
【55224】Re:IF文の逆は? きたさん 08/4/22(火) 22:38 質問
【55226】Re:IF文の逆は? かみちゃん 08/4/22(火) 22:51 発言
【55227】Re:IF文の逆は? きたさん 08/4/22(火) 23:05 質問
【55228】Re:IF文の逆は? かみちゃん 08/4/22(火) 23:11 発言
【55231】Re:IF文の逆は? きたさん 08/4/23(水) 0:24 お礼

26831 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free