VBプログラマ質問スレ（6.0以前） Part49
■ このスレッドは過去ログ倉庫に格納されています
0840デフォルトの名無しさん
2006/10/08(日) 11:27:41Private Sub CommandButton1_Click()
Dim y As Integer ←ここにDimを入れてない？
y = y + 1
Range("A1") = Format(y, "000")
End Sub
Dim y As Integer ←一番上の行に入れてみ。
Private Sub CommandButton1_Click()
y = y + 1
Range("A1") = Format(y, "000")
End Sub
■ このスレッドは過去ログ倉庫に格納されています