EXCEL VBAコミュのユーザフォームのデータの表示先セルについて

はじめまして。
ＶＢＡ初心者です。

質問ですが、
まずExcelのsheet上にいくつかコマンドボタンを置き、
【例】
[コマンドボタン1]
[コマンドボタン2]
[コマンドボタン3]
・
・
・

それをクリックしたらユーザーフォームが表示され、

ユーザーフォーム内にはコンボボックスが1つあって、1つ選択しOKボタンを押すようにしたいのですが、

選択したものを表示するセルの指定方法が分かりません。

例えば
[コマンドボタン1]をクリックし、[ユーザーフォーム]を起動させた場合は選択したものをセルA1に表示させたい。
[コマンドボタン２]をクリックした際は、セルA2に表示させたい。
[コマンドボタン３]をクリックした際は、セルA3に表示させたい。

と思っています。

その場合、[ユーザーフォーム]のOKボタンには、どのような指示をすればいいのでしょうか??

尚、[ユーザーフォーム]は同一のものを使用したいです。

可能でしょうか？

コメント(13)

最初
全て
最新の40件

[2] mixiユーザー 06月15日 22:42

> モンテ・クリストさん
ありがとうございます

私も少しこの方法試していて…
コマンドボタンの変数ってどぅやって設定するのかわからないんです

他の方法あるんじゃないかとかゴチャゴチャになってしまって

でも同じ考え持ってる人がいて少し安心しました

も少し頑張ってみようと思います

[3] mixiユーザー 06月15日 23:40

パブリック変数をどこで宣言していますか？
もし、シートモジュールで宣言しているのであれば
シートモジュールではなく、標準モジュールで宣言すれば
問題なく出来ると思いますよ

もしくは、どうしてもシートモジュールで宣言してやりたいなら
Worksheets("Sheet1").行変数
Sheet1.行変数
というようにすれば、シートモジュール[Sheet1 (Sheet1)]で宣言した
パブリック変数の行変数を呼び出せたはずです

が、基本的には標準モジュールで宣言するほうが良いと思います

[4] mixiユーザー 06月16日 02:16

>マリ男さん
ありがとうございます!!
・・・がしかし、標準モジュールでどのような宣言をして良いのかがわかりません；
ド初級者なもので。。。

[7] mixiユーザー 06月16日 02:34

>どのような宣言をして良いのか
宣言の仕方はネット検索などをしても見つかると思いますが
そういったことをされていますか？

[8] mixiユーザー 06月16日 03:27

>マリ男さん
本を読んだり、ネットで色々調べてもよく分からなかったので、書き込みさせていただきました。
今もずっとネットで調べているところです。
色々な情報を元に色々試してはいるのですが、私の力量では難しいようです。
全く知らない所から勉強し、いままで手探りで作成してきました。
しかし、ここへきて何日も行き詰ってしまい、自分1人では解決するのは難しいと感じ、何かいい方法はないかと書き込みさせて頂いた次第です。

[9] mixiユーザー 06月16日 03:30

とりあえず
標準モジュールでパブリック変数行変数をVariant型で宣言し
同一プロジェクト内の全てのモジュールで有効になるようにしておく
CommandButton1がClickされると行変数に 1 が代入され、UserForm1をShowする
UserForm1が読み込まれたあと、UserForm1が表示される前に
行変数をMsgBoxで表示するというコード

[標準モジュール]
Public 行変数 As Variant

[シートモジュール]
Private Sub CommandButton1_Click()
行変数 = 1
UserForm1.Show
End Sub

[フォームモジュール]
Private Sub UserForm_Initialize()
MsgBox 行変数
End Sub

[10] mixiユーザー 06月16日 12:05

> マリ男さん
ありがとうございました

無事プログラミングすることが出来ました