Excel VBA質問箱 IV

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

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


46076 / 76732 ←次へ | 前へ→

【35635】引数に配列を使った計算
質問  たけぞう  - 06/3/8(水) 20:28 -

引用なし
パスワード
   たけぞうです。配列について教えてください。
先ずは、私が理解しやすいようにモデルを簡単にしました。

1.A1セルに文字列を入力します。
2.B1セルに =hairetu_BBB(A1)を入力して、B1セルに
   1行2列の配列を返します。
3.C1セルに =hairetu_CCC(B1)を入力して、C1セルの値を得ます。

過去ログを調べて =hairetu_BBB(A1) について作成しましたが、L_Bの値が格納されているかわかりません。また、=hairetu_CCC(B1)でB1の値を上手く取り込めなくて困っています。どうぞよろしくお願いします。

Function hairetu_BBB(AAAA As String)
  Dim Buf As Variant
  Dim L_A As Integer
      If Len(AAAA) < 4 Then L_A = 0 Else: L_A = 1
  Buf = Array("Q1", L_A)
  hairetu_BBB = Buf
End Function

Function hairetu_CCC(BBBB As Variant)
  Dim Buf_B As Variant
  Buf_B = Array(BBBB(0), BBBB(1)) '←?どのように記述すれば良いですか?
  
  If Buf_B(0) = 0 Then hairetu_CCC = 0
  If Buf_B(1) = 1 Then hairetu_CCC = 1
 
End Function
7 hits

【35635】引数に配列を使った計算 たけぞう 06/3/8(水) 20:28 質問
【35645】Re:引数に配列を使った計算 ichinose 06/3/8(水) 22:32 発言
【35652】Re:引数に配列を使った計算 たけぞう 06/3/9(木) 8:45 お礼
【35656】セルのColorIndexでVlookupを選択 たけぞう 06/3/9(木) 11:37 質問
【35669】Re:セルのColorIndexでVlookupを選択 ichinose 06/3/9(木) 19:49 発言
【35686】Re:セルのColorIndexでVlookupを選択 たけぞう 06/3/10(金) 11:04 お礼

46076 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free