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で吐血する？