- ベストアンサー
VBA初心者
kkkkkmの回答
以下のページを参考にしてください。 第7回.テキストボックス(TextBox)の値をセルへ https://excel-ubara.com/excelvba3/EXCELFORM007.html .Cells(lastRow, 1).Value = Me.txtコード.Text のところを テキストボックスの名前を変えなければ TextBox1とかTextBox2とかになりますから A1に入力させたければ .Cells(1, "A").Value = Me.TextBox1.Text とか .Range("A1").Value = Me.TextBox1.Text にしてください。 ユーザーフォームの作り方は以下のページから Excelユーザーフォーム入門 https://excel-ubara.com/excelvba3/
関連するQ&A
- エクセルvba初心者です・・・
エクセルvba初心者です・・・ シート１にあるひとつのセルをコマンドボタンを押した時にそのセル内の文字列をシート２にかいていくようなプログラムをつくりたいです。 例えば シート１のセルに文字入力→”田中”→登録ボタンおす→シート２のセルA１にはいる シート１のセルに文字入力→”竹山”→登録ボタンおす→シート２のセルA２にはいる ・ ・ ・ というようになるコードわかる方いたら教えてください。おねがいします。
- ベストアンサー
- その他（プログラミング・開発）
- ＶＢＡ初心者
いつも大変 たすけられております。 分かる方がみえましたらご教授いただけますと幸いです。 行いたい事 Excelで特定のシート（固定 仮に５sheet）のみを新しいブックとして保存したい。その際、ファイル名はユーザーが手入力で決められるようにしたい。 イメージでは、マクロボタンをクリックすると フォームが開き、その中にはテキストボックスがあり、その中に文字が新しいブックのファイル名となるように出来ますでしょうか。
- 締切済み
- Excel（エクセル）
- エクセルVBA初心者です。マクロを組んでください。
エクセルVBA初心者です。組んで欲しいマクロがあります。 Sheet 1に13桁を入力するセル sheet 2に検索したいデータ 手順としては、 Sheet 1のセルにデータを入力 →13桁以上でマクロが開始(されるように設定します) →Sheet 1のセルと同じ数列をSheet 2の列Aから検索 →該当のセルを含む行をSheet 3にコピー →Sheet 1の入力セルの少し下にもコピー (確認用) というのを一回一回ずつやりたいです。 できれば作業中マウスやキーボードを触りたくないので、そのために、マクロの終わわりには入力セル内の消去、マクロの始まりには確認用でコピーした行の削除もつけて下さい。 検索するSheet 2には同じデータが含まれているので、出来ればひとつずつSheet 3にコピーしたいので組み込んで頂けると幸いです。 よろしくお願いいたします。
- 締切済み
- Visual Basic
- VBAからEXCELの新規ファイルを作成する
VB6.0 Excel2000を使用しています。 VBAからEXCELファイルを参照する方法は前回教えていただきましたが 新規にEXCELファイルを作成する方法がわからないので教えてください。 【やりたいこと】 ・ファイル名は、ダイアログボックスから入力され、フルパスで変数に 格納されています。 ・シート名は固定文字で指定します。 （↑ここまではできています） （↓ここからわかりません） ・セルの内容を編集したあと、指定のファイル名・シート名で保存したい よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルＶＢＡ初心者です。
エクセルＶＢＡ初心者です。 「テキストボックスとコマンドボタンを使って、シートのＡ列にあるセルの文字列を左から検索する」という事をやりたいのですが、うまくいきません。お教えください。ちなみにCtrl+Fではなく、ＶＢＡで。 Private Sub TextBox1_Change() Dim R As Range With ActiveWorkbook.Worksheets("Sheet名") Set R = .Columns(3).Find(Me.TextBox1.Value) End With If R Is Nothing Then MsgBox "該当セルなし" Else R.Activate End If Set R = Nothing End Sub としましたが、テキストボックス入力＋Enterで出来てしまい、コマンドボタンが機能しません。また、BackSpaceやDelをすると、他のセルに飛んでしまいます。？？？？
- ベストアンサー
- Visual Basic
- エクセルVBAでのチェックボックス操作
エクセルを利用した、VBAで困っています。 所定のsheetに埋め込まれたチェックボックスに対して、 別sheet内のセルの値を参照し、結果をオン、オフという 操作を行いたいのですが、チェックボックスに対するVBAでの指定方法 が分かりません。 イメージとしては (1)Sheet1内にチェックボックスがある。 該当チェックボックスは7個のチェックボックスで構成されており それぞれにchb1～chb7といったオブジェクト名がある。 (2)sheet2のA1セルに特定の値が入っていればチェックボックス（chb1） がオン値がなければオフのまま (3)sheet2のB1セルに特定の値が入っていればチェックボックス（chb2） がオン値がなければオフのまま という感じです。 先方より指定された様式なのでsheet1の内容や書式を変更することが出来ないので、なんとか埋め込まれたオブジェクトを操作したいのですが・・・ 良い方法があれば教えてください。
- ベストアンサー
- Visual Basic
- エクセルのマクロで入力文字を一文字ずつ並んだセルに入れる
エクセルマクロ超初心者です。 エクセルVBAでユーザーフォームを作成しました。 テキストボックスに入力した文字列を「登録」ボタン押下後、エクセルシートのセルに一文字づつ入るようにするにはどうすれば良いでしょうか？ 例えばテキストボックスに「ｋｏｈｉｒｏ」と入力するとエクセルのsheet1のA1「ｋ」、B1「ｏ」、C1「ｈ」、D1「ｉ」、E1「ｒ」、F1「o」となるようにしたいのです。入力する文字数は０～３０文字までで、その都度長さは変わります。どうやって、文字をばらせばいいのか、またどうやって可変長の文字列を指定したセルに入力すればいいのかわかりません。どうかよろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- VBAと照合について
VBAと照合について 下記のような3枚のシート（上からシート1，2，3）をエクセル2007で作成しています。 シート1とシート2は全く同じ内容であるべきものです。 しかし、出所が違うため、両者のシートを照合して もし合っていれば、シート1を印刷したいのです。 なお、ここではあえて、1月4日分の売り上げは、わざと違う値を入力しています。 シート3にマクロのボタンを作成し、VBAで二枚のシートを照合し、メッセージボックスで 合っていれば印刷OK,違っていれば印刷中止にしたいのです。 IF関数までは理解でき、シート3のB2からE4までは=IF(sheet1!B2=sheet2!B2,"","×") 等で処理していて、違っているセルに条件付き書式で×を表示するようにしています。 ただ、関数ではなく、照合から印刷までをマクロで自動処理したいので、VBAコードが知りたいです。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- ユーザフォーム（VBA）で入力した内容をシートへコピーするには
ユーザフォーム（VBA）でテキストボックスとボタンを作成しました。 このテキストボックスに入力した内容をボタンを押すことでシート１のＡ１セルにコピーしたいのです。こんな簡単な感じなのですが、 プログラムはどのようにしたらよいのでしょうか？教えてください。 それと、このエクセルファイルを開き、マクロを有効にするのボタンを押すと思うのですが、そのときにすでにユーザフォームが表示されているようにしたいのですが・・・どうすればいいのでしょうか？ ※できたらでよいのですが、もう一つボタンを作成し『クリア』ボタンということで、テキストボックスに入力した内容だけをクリアさせるボタンも作ろうとおもうのですが、それはどうしたらよいのでしょうか？ 困っています。教えてください。
- ベストアンサー
- その他([技術者向] コンピューター)
お礼
ご回答いただきありがとうございます。 フォームは敷居が高い気がして使う事を避けていました。 しかし、いざ見て触ってみて新しく引き出しを増やす事が出来ました。 今回は 私以外のものが触るため、フォームに必要情報を入力する という手間が上手く効きつかう人間が長く使ってくれるような気がします。 また見掛けて頂いた際はよろしくお願いします。