Excel VBA質問箱 IV

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

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


4510 / 13644 ツリー ←次へ | 前へ→

【56201】ユーザーフォームについて 江戸Guy 08/6/8(日) 20:07 質問[未読]
【56202】Re:ユーザーフォームについて マクロマン 08/6/8(日) 20:10 発言[未読]
【56203】Re:ユーザーフォームについて kanabun 08/6/8(日) 21:34 発言[未読]
【56207】Re:ユーザーフォームについて 江戸Guy 08/6/8(日) 22:44 お礼[未読]

【56201】ユーザーフォームについて
質問  江戸Guy  - 08/6/8(日) 20:07 -

引用なし
パスワード
   初心者です。
ユーザーフォームを使って複数の値をセルに入れています。
しかし後で値が間違っていることに気づいたりした場合、
またユーザーフォームを広げますと、全ての値を入れなおす
必要があり、面倒で困っています。

セルに代入させた値をユーザーフォームに反映させる方法は
ないでしょうか?

以上

【56202】Re:ユーザーフォームについて
発言  マクロマン  - 08/6/8(日) 20:10 -

引用なし
パスワード
   ユーザーフォームの値をセルに転記するコード
をアップしてみてください。
逆にするだけです。

A=B

B=A

【56203】Re:ユーザーフォームについて
発言  kanabun  - 08/6/8(日) 21:34 -

引用なし
パスワード
   ▼江戸Guy さん:
>ユーザーフォームを使って複数の値をセルに入れています。
>
>セルに代入させた値をユーザーフォームに反映させる方法は
>ないでしょうか?

ユーザーフォームのテキストボックスでしたら、
ControlSource プロパティでリンクしておくことができます。
テキストボックスの値を変更すれば、直ちにリンクしたセルが更新されます。
セルの方を変更すれば、テキストボックスに変更した値が自動で反映します。

Private Sub UserForm_Initialize()
 TextBox1.ControlSource = "Sheet1!A1"
 TextBox2.ControlSource = "Sheet1!B2"
 TextBox3.ControlSource = "Sheet1!C3"
End Sub

【56207】Re:ユーザーフォームについて
お礼  江戸Guy  - 08/6/8(日) 22:44 -

引用なし
パスワード
   ありがとうございました。
助かりました。
一度やってみます。


▼kanabun さん:
>▼江戸Guy さん:
>>ユーザーフォームを使って複数の値をセルに入れています。
>>
>>セルに代入させた値をユーザーフォームに反映させる方法は
>>ないでしょうか?
>
>ユーザーフォームのテキストボックスでしたら、
>ControlSource プロパティでリンクしておくことができます。
>テキストボックスの値を変更すれば、直ちにリンクしたセルが更新されます。
>セルの方を変更すれば、テキストボックスに変更した値が自動で反映します。
>
>Private Sub UserForm_Initialize()
> TextBox1.ControlSource = "Sheet1!A1"
> TextBox2.ControlSource = "Sheet1!B2"
> TextBox3.ControlSource = "Sheet1!C3"
>End Sub

4510 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free