![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
VBも素人なんですが、スプレッドのとり方を教えてください。
以下のスプレッドが既存で存在していてチェックボックスが各行ごとにあるのですが、チェックしたときに呼ばれる関数を以下に書きました。
例えば002という値を取得したいときどうコーディングしたらよいでしょうか?
_____________
| 001 | AAAA | a |
|-----|------|----------|
| 002 | BBBB | b |
|-----|------|----------|
| 003 | CCCC | c |
|-----|------|----------|
※関数の中身は適当です。どうやったらとれるか試行錯誤しています。。。
Private Sub sprService_ButtonClicked(ByVal Col As Long, ByVal Row As Long, ByVal ButtonDown As Integer)
Dim intbutton As Integer
Col = Row
intbutton = ButtonDown
sprService.Col = sprService.Row
sprService.Col = sprService.Row2
End Sub
No.2ベストアンサー
- 回答日時:
方法は2種類あります。
'方法1
Dim strResalt as String '値を入れる変数
Spread1.Row = Row 'チェックをした行を設定
Spread1.Col = 1 '1列目を設定
strResalt = Spread1.Text '値を取得して変数にセット
'BBBBを取得したかったら、Spread1.Col = 2と
してやればよいわけです。
'方法2
Dim varResalt as Variant '値を入れる変数
Dim blnRC as Boolean 'GetTextが成功したかの戻り値
blnRC = Spread1.GetText(1,Row,varResalt)
'BBBBを取得したかったら、GetTextの1つ目のパラメータを2にします。
速度は方法2のほうが速いです。
方法2は変数がVariant型になるので注意。
いろいろ方法があるのですね。
方法2のほうが一般的なのでしょうか?
見た感じ方法2のほうがよさそうですね。
試してみます。
ありがとうございました。
No.3
- 回答日時:
Private Sub sprService_ButtonClicked(ByVal Col As Long, ByVal Row As Long, ByVal ButtonDown As Integer)
Dim tmp
If ButtonDown = 1 then
sprService.GetText 1, Row, tmp
Else
tmp = ""
End If
End Sub
この方法で、チェックボックスにチェックがついたときに、列1の内容を取りに行きます。
No.1
- 回答日時:
a,b,cがチェックボックスだと仮定して書きますが
Private Sub sprService_ButtonClicked(ByVal Col As Long, ByVal Row As Long, ByVal ButtonDown As Integer)
dim varGetExt
if col = <> 3 then
exit sub
end if
sprService.GetText 1, Row , varGetTxt
これでチェックされた行の1番目の列の値がとれますよ
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Visual Basic(VBA) VBAで質問ですが、皆さんはどの様に導き出しているのでしょうか? 6 2022/05/03 21:53
- Visual Basic(VBA) VBA 別ブックからの転記の高速化について VBA 別ブックからの転記の高速化についてご教授下さい。 19 2022/07/26 13:07
- Excel(エクセル) B列に文字がはいったらA列に数字が入るマクロードを完成させたい 4 2023/04/21 01:58
- Visual Basic(VBA) 稀に1円合いません? Sheet1から金額と個数を貼り付ける下記コードで、金額を切り上げるコードを何 3 2022/09/05 15:11
- Visual Basic(VBA) 別シートのデータを参照して値を入れたい。 まとめデータシートのC列D列の値を商品一覧シートのコードが 7 2022/08/17 13:20
- Visual Basic(VBA) EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい 1 2023/03/16 07:05
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 6 2022/06/08 12:55
- Visual Basic(VBA) ワークシート内を検索 1 2022/12/19 23:46
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
テキストボックスのvalueとtext...
-
値を返さないコード パス
-
VB.NETでコンボボックスの1行目...
-
C#の質問です
-
[VBA]選択範囲の下から上に処理...
-
Excel VBA 複数選択したリスト...
-
テキストボックスの設定。
-
【C++/CLI.NET】コンボボックス...
-
マクロ 特定のセル値のみクリ...
-
Excel VBAのリストボックスの値...
-
スプレッドについて
-
不定値の出力について
-
textboxとLabelを動的に変更する
-
コンボボックスの幅の変更について
-
VBAでWEB上の入力項目に値をい...
-
VBA ドロップダウンリストを残...
-
AccessVBA 帳票フォームの非連...
-
VB.net ByVal ByRef
-
VB.NET 自作プロパティが変更さ...
-
setcookieで「path」に複数の値...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
テキストボックスのvalueとtext...
-
マクロ 特定のセル値のみクリ...
-
Geogebraの操作方法について
-
VB.NETでコンボボックスの1行目...
-
VB初心者。小数点以下の表示で...
-
変数名の取得
-
値を返さないコード パス
-
【C++/CLI.NET】コンボボックス...
-
Excel VBAのリストボックスの値...
-
PL/SQLでのTO_DATEの時間取得に...
-
Powershellのparamについて
-
vbaの繰り返しで求める最大値に...
-
C#の質問です
-
VBA ドロップダウンリストを残...
-
VBA(自然数)
-
シーケンサで最小値を保持する
-
[VBA]選択範囲の下から上に処理...
-
vbscriptを使いexcelを参照して...
-
[VB.net] DataGridViewのコンボ...
-
変数に代入してある数値を表示...
おすすめ情報