VBAコンボボックスから値を取得して行を非表示にする

コンボボックスの値を取得するのが少し難しいです。このコンボボックスのプロパティは、すでに「C10」セルにリンクされています。だから、私はコンボボックス値= C10値と仮定しました。コンボボックスの値は、C10 = CMまたはQM又はQMCまたはCMVBAコンボボックスから値を取得して行を非表示にする

If Worksheets("QC Generator").Range("C10").Value = "QM,PM,QMC,CM" Then 
Worksheets("page2").Rows("43").EntireRow.Hidden = False 
Else 
Worksheets("page2").Rows("43").EntireRow.Hidden = True 
End If

の値が助けてくれてありがとう

出典

2016-09-21 Ibrahim Al Rosid

どのようなコンボボックスタイプがありますか？「フォーム」または「ActiveX」ですか？ – user3598756

ActiveXコンボボックス –

は、アレイ上のフィルタ方法を使用してみた場合、未使用の列を隠すことになっています値の

allowed = Array("QM", "PM", "QMC", "CM") 

If UBound(Filter(allowed, Range("C10").Value)) > -1 Then 
    Worksheets("page2").Rows("43").EntireRow.Hidden = False 
Else 
    Worksheets("page2").Rows("43").EntireRow.Hidden = True 
End If

出典

2016-09-21 04:04:16

実際に動作します！コンボボックスが文字通り "PM" "CM" "QMC"だけでなく、 "PM-F" "PM-F-LV" "CM-S"などの独自のタイプを持っていればどのようにすればよいでしょうか？それで、最も左の単語で検出することは可能ですか？すべての可能性を書き留めておくべきですか？ –

コンボがどのように配置されているかによって、その範囲を配列ソースとして使用するように配列を設定することができます。彼らが型を変更し、ユーザー定義の値を作成できる場合は、値をどこかに格納し、格納されたリストに対して入力された値をチェックし、値がない場合は追加します。ああ、左の大部分のええ、左（範囲（ "C10"）の値、2）を試してみてください....おそらく2を値の検索の結果の最大値に変更し、 " - "と値それは私の頭の上から外れています。あなたはどこに行くのか見て行きましょう。 –

私はすでにどのように考えていましたか、私は2番目のコンボボックスを1番目のコンボボックスに、1番目のコンボボックスをキーワードにしました。ご協力いただきありがとうございます！ –

VBAコンボボックスから値を取得して行を非表示にする

答えて

関連する問題