間接関数を使用したExcel依存のドロップダウン

Question

間接関数とデータ検証を使用して、動的なグラフを作成する必要がある依存ドロップダウンを作成しました。

最初のドロップダウンでオプションを選択するときはいつでも、値はそれに応じて更新されますが、関連するオプションを表示するには2番目のドロップダウンをクリックする必要があります。 例： 最初のドロップダウンには、果物、野菜、および色が含まれています。私は果物を最初に選択しました。オプションはバナナ、リンゴ、マンゴーです。 2回目のドロップダウンでマンゴーを選択します。今、最初のドロップダウンで色を選択すると、2番目のドロップダウンにはマンゴーが表示され、それをクリックしてさまざまな色（赤、黄、緑）のオプションが表示されます。

最初のドロップダウンで色を選択すると、最初のオプション（赤色）が2番目のドロップダウンに表示されるような方法がありますか？

依存ドロップダウンのセルリンクの間接を使用しています。

私はあなたがこのW/O VBAのヘルプを達成できるとは思わないVBA

Answer 1

ずに答えを示唆してください。 VBAのアプローチを検討したい場合は、このコードをデータ検証があるシートのWorksheet moduleに貼り付けてください。

Private Sub Worksheet_Change(ByVal Target As Range) 
    If Not Application.Intersect(Range("A1"), Target) Is Nothing Then 
     Dim x As String, y As String 
     x = Range("A1").Value 
     y = Application.WorksheetFunction.VLookup(x, Range("A11:B13"), 2, False) 
     Range("B1").Value = y 
    End If 
End Sub 

これは細胞A1とB1でのデータの検証を持っていることを前提としています。 A列にカテゴリの名前を入れ、関連する最初の値をBに入れる単純なルックアップテーブル（私の例ではA11:B13）を追加する必要があります。カラム。

ワークシート_Changeイベントは、セルA1の値が変更された場合にのみトリガーされます。