Skip to main content
8 de 12
adicionou 376 caracteres ao conteúdo
user avatar
user avatar

Selecção de células

Eu preciso de selecionar a linha com o valor da combobox 1 e com a data da combobox 3 para selecionar logo a linha pretendida para eliminar. Este é o problema que tenho para resolver.

Alguém me consegue ajudar?

Este é o código que tenho para seleccionar a célula da combobox1:

Private Sub RemverRegisto_Click()
Range("E3").Select

While ActiveCell <> ""
If CB_TipoFralda.Text = ActiveCell Then
Resposta = MsgBox("Registo encontrado, deseja excluir?", vbYesNo)
End If
If Resposta = vbYes Then
ActiveCell.EntireRow.Delete
Exit Sub
End If
ActiveCell.Offset(1, 0).Activate
Wend
Exit Sub
End Sub

Vou colocar uma imagem para mostrar o que pretendo:

inserir a descrição da imagem aqui

Quero ativar a linha com os valores da combobox produto e da data para eliminar e com o código acima só ativo a linha com o valor da combobox produto, logo precorre todas as linhas em que encontra o produto da combobox1.

user77403