dポイントプレゼントキャンペーン実施中！

ユーザーフォームチェックボックスの値をセル入力

解決済

  • 質問者：kuma0220
  • 質問日時：
  • 回答数：1件

ユーザーフォームのチェックボックスでチェックされたCaption文字をExcelシート範囲(B2:B9)の入力されている文字の最後尾から続けて入力したいのですがどなたかコードが解る方よろしくお願いします。

「ユーザーフォームチェックボックスの値をセ」の質問画像
通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (1件)

No.1ベストアンサー

  • 回答者： tom04
  • 回答日時：

こんにちは！


こういうコトでしょうか？

Private Sub CommandButton1_Click()
If CheckBox1 = True Then
Range("B2").End(xlDown).Offset(1) = CheckBox1.Caption
CheckBox1 = False
End If
If CheckBox2 = True Then
Range("B2").End(xlDown).Offset(1) = CheckBox2.Caption
CheckBox2 = False
End If
If CheckBox3 = True Then
Range("B2").End(xlDown).Offset(1) = CheckBox3.Caption
CheckBox3 = False
End If
End Sub

外していたらごめんなさいね。m（_ _）m
    • good
    • 0
    • 件
通報する
この回答へのお礼

有難うございます。助かりました。

通報する
お礼日時：2013/03/28 22:41

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

このQ&Aを見た人はこんなQ&Aも見ています

関連するカテゴリからQ&Aを探す

ページトップページトップ

Q質問する（無料）

このQ&Aを見た人がよく見るQ&A

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報