Dificuldades com IS NOT NULL?

Question

Alguém poderia ajudar? Excel e Access 2007.

Nessa tabela existem campos vazios e não quero vê-los.

Minha tabela está assim:

Salgados / Bebidas / Sorvetes

Coxinha / Coca Cola / Kibon

Kibe / Pepsi   / Pablito

       / Fanta / Magnum

      /         /  Frutare    

Testei  os códigos abaixos:

Obs: Opcao é uma variável pública que armazena a coluna que o usuário escolhe ao clicar em um botão.

Dim Cx As New Classeconexao
Dim banco As ADODB.Recordset
Dim sql As String, nProduto As String, Imagem As String

Set banco = New ADODB.Recordset

sql = " SELECT * FROM Grupo_de_Produtos "
sql = sql & " WHERE NOT '" & Opcao & "' IS NULL " '"

sql = " SELECT * FROM Grupo_de_Produtos "
sql = sql & " WHERE '" & Opcao & "' NOT IS NULL " '"

Cx.Conectar

On Error Resume Next
banco.Open sql, Cx.Conn

While Not banco.EOF

nProduto = banco.Fields(Opcao)

banco.MoveNext

Wend

Cx.Desconectar

Queria que o While percorresse somente os campos preenchidos. Ex: Se essa variável Opcao estiver com Salgados, que percorra até a segunda linha dessa coluna e depois saia fora, encerre o while. Atualmente ele percorre até a quarta linha por causa da coluna Sorvetes que tem mais produtos;

Obs: Sei que resolveria isso criando uma tabela para cada Produto, mas pretendo usar assim mesmo, algumas colunas vão ter campos vazios, sei que se o IS NOT NULL pode resolver, só não estou sabendo como fazer.

Obrigado.

At