すみません。どなたか教えて下さい。
シートを非表示にするとエラーになってしまいます。
多分、selectが悪いと思うのですが・・・よくわかりません。
わかる方教えてくださーい。
宜しくお願いします。
Private Sub 新規顧客入力ボタン_Click()
If 新規顧客 = "" Then
MsgBox "氏名を入力してください。"
Exit Sub
End If
With Sheets("顧客入力").Select
i = Cells(Rows.Count, 7).End(xlUp).Row + 1
Cells(i, 7).Value = Me.新規顧客.Value
Me.新規顧客.Value = ""
End With
Unload Me
End Sub
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
こんばんは!
「新規顧客」シートは入力後非表示にした方が良いのですね。
※ 「新規顧客入力ボタン」とはユーザーフォームのコマンドボタン
「新規顧客」とはユーザーフォームのテキストボックスで
それぞれオブジェクト名を変えているのですね。
コマンドボタンのコードを以下のようにしてみてはどうでしょう。
Private Sub 新規顧客入力ボタン_Click()
Dim i As Long
With 新規顧客
If .Value = "" Then
MsgBox "氏名を入力してください。"
.SetFocus
Exit Sub
End If
End With
With Sheets("顧客入力")
.Visible = True
.Select
i = Cells(Rows.Count, 7).End(xlUp).Row + 1
.Cells(i, 7).Value = Me.新規顧客.Value
新規顧客.Value = ""
.Visible = False '//★//
End With
Unload Me
End Sub
※ 「顧客入力」シートを表示させておきたい場合は
コード内の「★」の行を削除してください。m(_ _)m
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・ハマっている「お菓子」を教えて!
- ・最近、いつ泣きましたか?
- ・夏が終わったと感じる瞬間って、どんな時?
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・都道府県穴埋めゲーム
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Google form グーグルフォーム...
-
エクセルでセル未入力時の初期...
-
PDF 入力途中で改行したい
-
「ドゥ」の簡単なローマ字入力方法
-
googleカレンダーの予定を入力...
-
Office Word [ここに入力] が...
-
MACで化学式を入力する方法を教...
-
「ディ」はどう入力すればいい...
-
Chem Draw 7.0
-
ワレスの木 (Wallace Tree)につ...
-
powerpointで空白を作ることが...
-
濁点のつく字が入力出来ないと...
-
論理回路 3入力AND,ORによる回...
-
ダウンロードしたフォーマット...
-
Googleスプレッドシートで時間...
-
画像認証について
-
よく使う単語をショートカット...
-
小さい「う」
-
(1)~(20)までは入力できますが...
-
パソコンの入力文字の表示が出ない
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Google form グーグルフォーム...
-
「ドゥ」の簡単なローマ字入力方法
-
PDF 入力途中で改行したい
-
googleカレンダーの予定を入力...
-
エクセルでセル未入力時の初期...
-
「ディ」はどう入力すればいい...
-
Office Word [ここに入力] が...
-
濁点のつく字が入力出来ないと...
-
エクセルでのパーセントの計算
-
小さい「う」
-
powerpointで空白を作ることが...
-
MACで化学式を入力する方法を教...
-
Excel共有設定で入力セルがずれる
-
iPhone メモ帳のトラブル
-
り を数字で表す
-
数量と個数の違いについて
-
Googleスプレッドシートで時間...
-
ブラウザ Firefox でパソコンか...
-
文字入力済みのセルに続けて入力
-
EXCEL VBA でインプットボック...
おすすめ情報