Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

49459 / 76735

←次へ　｜　前へ→


	【32186】Re:使用状況

kobasan - 05/12/8(木) 16:04 -


	引用なし

	パスワード

皆さん　今日は。

Private Sub CommandButton1_Click()
　　行 = Application.Match(Me.TextBox1.Text, Range("A1:A10"), 0)
　　列 = Application.Match(Me.TextBox2.Text, Range("A1:F1"), 0)
　　Cells(行, 列).Value = Me.TextBox3.Value
End Sub

これで試してみてください。
それとＡ列の書式を文字列に指定しておくとより確実になると思います。

>>Cells(行, 列).Value = cmb3　←ここが黄色くなるのですが？
>>　↑
>>ここのいみは？これは行と列の基準を作っているのですか？
>CELLSに関してはHELPを見てください。
>
>エラーになるということは
>>　　行 = Application.Match(cmb1, Range("A1:A10"), 0)
>>　　列 = Application.Match(cmb2, Range("A1:F1"), 0)
>のどちらか一方でも見つからなかったということです。
>テキストボックス１と同じ内容がA1からA10にありますか？
>テキストボックス２と同じ内容がA1からF1にありますか？

0 hits

▼

【32163】使用状況 悩みまくり・・・ 05/12/7(水) 19:43