Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11265 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【17033】テキストボックスの値の交換 両津 04/8/20(金) 8:01 質問[未読]
【17035】Re:テキストボックスの値の交換 IROC 04/8/20(金) 8:35 回答[未読]
【17069】Re:テキストボックスの値の交換 両津 04/8/20(金) 17:46 質問[未読]
【17071】Re:テキストボックスの値の交換 IROC 04/8/20(金) 18:15 回答[未読]
【17076】Re:テキストボックスの値の交換 両津 04/8/20(金) 22:42 お礼[未読]
【17033】テキストボックスの値の交換
質問  両津 E-MAIL  - 04/8/20(金) 8:01 -
引用なし
パスワード
   いつも利用させていただきありがとうございます。またしても質問なんですが、
ユーザーフォームで考えたコードを記述します。

sub commandbutton1_click()

dim x as integer
x=textbox1.text
textbox1.text=textbox2.text
textbox2.text=x

end sub()


こんな感じでコードを書いたのですが、
texbox1.textとtexbox2.textの内容を交換するだけで新たな変数を宣言しなければ
行けないのですが、この動作をより簡単にすることはできないでしょうか？
できれば1行くらいのコードでできればうれしいのですが・・・
お願いします
【17035】Re:テキストボックスの値の交換
回答  IROC  - 04/8/20(金) 8:35 -
引用なし
パスワード
   良い方法は思いつきませんが、
この状況になる前の処理で対応できないのでしょうか？
【17069】Re:テキストボックスの値の交換
質問  両津 E-MAIL  - 04/8/20(金) 17:46 -
引用なし
パスワード
   やりたいことは数字の順番がランダムになっているのを
大きい方から並べていく、という感じのプログラムなんですが、
自分はif文での値の交換しか思いつかなくて・・・
よい方法はあるでしょうか？
【17071】Re:テキストボックスの値の交換
回答  IROC  - 04/8/20(金) 18:15 -
引用なし
パスワード
   セルに１列に入れて「並び替え」してはいかがですか？
【17076】Re:テキストボックスの値の交換
お礼  両津 E-MAIL  - 04/8/20(金) 22:42 -
引用なし
パスワード
   >セルに１列に入れて・・・
そうかぁ！その手がありましたか。
ありがとうございました！！
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11265 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free