Excel VBA質問スレ Part6

Excel VBA質問スレ Part6 at TECH

948:デフォルトの名無しさん
08/05/28 16:26:21
>>947
オフセットかなんか使って条件分岐するしかないのでは？
B1に何か入力がある時は、A1には入れないみたいな感じで。

Sub nnn()
If Trim(ActiveCell.Offset(0, 1).Value) = "" Then
ActiveCell.Value = Userform1.ListBox1.value
Else: Exit Sub
End If
End Sub

次ページ

続きを表示

1を表示