[[20160522142332]] 『マクロでテーブルの列に同じ文字列(又は数字)を』(アルゼンチンのきつね) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『マクロでテーブルの列に同じ文字列(又は数字)をいれたい。』(アルゼンチンのきつね)

エクセル(2013)のテーブルに於いて、VBAによる入力フォームからある文字列(又は数字)を入力すると、その文字列(又は数字)がテーブル内の指定した列(列見出しは除く。)の全てのセルに挿入されるようにしたいのですが、どのようにVBAを記述すればよいのかご指導お願いします。

< 使用 Excel:Excel2013、使用 OS:Windows10 >


叩き台です。
 Private Sub CommandButton1_Click()
    Dim tbl As ListObject

    Set tbl = Sheets("Sheet1").ListObjects(1)

    tbl.ListColumns(2).DataBodyRange.Value = TextBox1.Text

 End Sub

(マナ) 2016/05/22(日) 15:04


素晴らしいです。定義文を付加して、サブプロシージャとして、バッチリうまくいきました。
迅速なアドバイスとともに、本当にありがとうございました。
(アルゼンチンのきつね) 2016/05/22(日) 17:06

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.