2016-09-04 7 views
-2

フォームに入力したデータを別のワークシートに保存する必要があるVBAを使用して、テキストとコンボボックスでExcelフォームを作成しようとしています。データが保存されるように、ユーザーがフォームをクリックするための保存ボタンがフォームにあります。それは可能ですか?助けてくださいVBAを使用したExcelフォームの作成と保存

+3

どうすればいいですか? – user3598756

答えて

0

これは確かに可能ですが、あなたはどの部分で問題が発生しているのかについて具体的に説明できますか?

イベントの一般的なタイムラインは、これを次のようになります。

  1. ユーザーフォームを作成し、テキストボックス、コンボボックスを追加し、ボタンを保存します。 a。コンボボックスの作成方法については、How to add items to a combobox in a form in excel VBA?

  2. 各テキストボックス、コンボボックス、保存ボタンにプロパティ名を付けて、コード内で参照できるようにしてください。

  3. [保存ボタン]イベントにコードを追加します。

    Sheets("Example").Range("A1").Value = textbox.Value

:これを行うには、これはそのボタンがクリックされたとき、あなたはこのような何かを追加することがあります実行されるコードにあなたをもたらすでしょう、[保存]ボタンでユーザーフォームをダブルクリックしに行きますあなたのコメントに答えるために
+0

ありがとう:)何とかフォームを作成することができました:)しかし、私は配列上のcombox値をリストしようとしています。私のコードでは、複数の配列を渡すとエラーになります。以下は私のコードです。 3番目の配列のコメントを外すと、permission deniedと表示されます。最初の2つのエントリを受け入れるだけです。私は10コンボボックスのようにしています。 – Anand

+0

ます。Private Sub UserForm_Initialize() scenariotype.List =配列( "Happyscenario"、 "代替"、 "例外") preparedby.List =配列( "サビオ"、 "sutharsan"、 "Shaji") 「Testtypeselection.List =アレイ( "プロビジョニング"、 "機能"、 "課金"、 "レポート") 'TestingPhase1.List =配列( "UAT"、 "生産") ' Status.List =配列( "パス" は、「失敗しました」、 "のInProgress" は、 "ブロック"、 "NORUN"、 "NotExecutable") 'scenariotype.AddItem "ハッピーシナリオ" ' scenariotype.AddItem "オルタナティブ" "scenariotype.AddItem "例外" End Sub – Anand

+0

ねえ、2つのこと: - ここにコードを投稿するときにコードブロックを使用します。前のコメントにそのコードをコピーして貼り付けると、すべてが1行になり、読むことができなくなります。人々は助けてくれることを喜んでお勧めします。この場合、私は喜んで助けてくれるでしょうが、コードを簡単に読むことができればもっと簡単になります。 - 誰か(この場合は私)があなたの元の質問に答える答えを与えるならば、あなたはその答えを受け入れて、他の人がその質問が答えられ、私の評判スコアが助けられるように見えるようにすべきです。 –

0

あなたはこのようにコンボボックスに配列を追加するすべての問題があってはならない。

Private Sub UserForm_Initialize() 
    ComboBox1.List = Array("One", "Two", "Three") 
    ComboBox2.List = Array("Four", "Five", "Six") 
    ComboBox3.List = Array("Seven", "Eight", "Nine") 
End Sub 

あなたが問題を抱えている場合は、あなたのことを確認してくださいコード、この場合 "ComboBox1 ...など"存在するコンボボックスを指しています。

関連する問題