Excel VBA質問スレ Part7

Excel VBA質問スレ Part7 at TECH

962:デフォルトの名無しさん
08/08/24 01:35:44
>>959

うっそマジ？
じゃあ例えば

Sub 課長()

Dim 課長 As Integer
Dim ボディ As Boolean
Dim 吐血 As Integer

課長 = 1
吐血 = 101

Do Until 課長 = 吐血

If Cells(課長, 1) = "" Then
ボディ = True
課長 = 課長 + 1
End If

Loop

MsgBox "課長は吐血しました。もうやめて下さい。"

End Sub

とかで課長吐血する？VBAで吐血する？

次ページ

続きを表示

1を表示