Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10019 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【24236】コマンドボタンについて わかばまーく 05/4/16(土) 14:45 質問[未読]
【24238】Re:コマンドボタンについて IROC 05/4/16(土) 16:38 回答[未読]
【24241】Re:コマンドボタンについて わかばまーく 05/4/16(土) 19:03 お礼[未読]
【24236】コマンドボタンについて
質問  わかばまーく  - 05/4/16(土) 14:45 -
引用なし
パスワード
   はじめまして
わかばまーく　です。

ワークシート上にコマンドボタンを多数貼り付けてつかっています。
そこで、一つのボタンで循環　実行する事は出来ますか?

例えば　下記の様な場合、今は３つのボタンを貼り付けています。
　
　Caption 消費税なし　１個
　　　　↓
　Caption 消費税あり　１個
　　　　↓
　Caption 帳票貼付け　１個
　　　　↓
　Caption 消費税なし
　　　　↓

これを１つのボタンで
　ボタン(消費税なし)押すとコード実行、Captionも(消費税あり)変わる。
　と言う感じです。

何分　初めての投稿です。
手際よく説明出来づすいません。
宜しくお願い致します。


　　　　　　　　
【24238】Re:コマンドボタンについて
回答  IROC  - 05/4/16(土) 16:38 -
引用なし
パスワード
   Private Sub CommandButton1_Click()
　Select Case CommandButton1.Caption
　Case "消費税なし"
　　CommandButton1.Caption = "消費税あり"
　Case "消費税あり"
　　CommandButton1.Caption = "帳票貼付け"
　Case "帳票貼付け"
　　CommandButton1.Caption = "消費税なし"
　End Select
End Sub
【24241】Re:コマンドボタンについて
お礼  わかばまーく  - 05/4/16(土) 19:03 -
引用なし
パスワード
   IROC さん
御礼 遅くなりまして申し訳ありません。

月曜日 これで会社のワークシートに貼り付けられた、
ボタンの整理整頓ができます。
有難うございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
10019 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free