ComboBox com RowSource ignorar celulas em branco

Olá a todos,

Sou um novo membro e tenho pouca experiencia com VBA. Estou criando uma planilha de entrada e retirada de dados baseado em UserForm.

A ideia é que a entrada de dados na combobox seja dinamica, ou seja, ao retirar um produto ele sairá da combobox. Ainda estou começando a escrever o código, mas ja me deparei com um problema, utilize a função RowSource para encontrar meus produtos em uma determinada coluna, porem, quero que meu código ignore celulas em branco desta coluna e me mostre em sequência o proximo produto da lista.

Agradeço qualquer contribuição.

Segue código que possuo:

Private Sub UserForm_Initialize()

TData = Date

Dim TBC As Integer

TBC = Range(“CodigosLivres!A1”).End(xlDown).Row

codigotbc.RowSource = “CodigosLivres!A2:A” & TBC

End Sub

Att,
Magni