Laeoli, a principio a rotina está correta, ela só não funcionará se "ActiveCell" ou seja a celula selecionada no momento da execução estiver vazia.

Mauro,

A Linha não esta vazia. Mas, o excel deveria ler a textbox1, e se esta estiver por exemplo com o valor 5 eu quero que a linha 5 seja excluída.

at

Laerte Oliveira

Laerte, então você deveria ter colocado o "Assunto" corretamente, você disse selecionar a linha e não Deletar.

Eu não gosto muito de usar ActiveCell neste tipo de rotina e nem sei o porque está utilizando, mas se quer assim então a rotina seria assim:

Dim x As Integer
x = TextBox1.Value

    If ActiveCell <> 0 Then
        Rows(x).Delete
    End If

[]s

Obrigado Mauro,

contudo, não excluiu a linha carregada na textbox1, apaga uma linha que nem consegui identificar. Esta planilha é carregada constantemente podendo conter até 500 linhas. Depois de uma operação eu identifico a linha correspondente e através do código peço ao excel que exclua esta linha.

Laerte, só pelo que colocou fica dificil dar uma resposta correta, o ideal é anexar seu modelo compactado com dados ficticios para poder analisar melhor.
A rorina para Deletar uma linha é esta que foi postada, mas precisamos entender o que quer dizer : "Depois de uma operação eu identifico a linha correspondente e através do código peço ao excel que exclua esta linha"

[]s

Mauro,

achei o problema, tinha uma mensagem e aí o excel assumia a 1ª celula da coluna C. Coloquei o código abaixo para ativar a linha e depois criei um botão com a rotina que você me passou e deu certo.

Dim x As Integer
x = TextBox1.Value
Plan7.Rows(x + 1).Select

Vou fazer continuar com os testes e se tudo der OK finalizo o post como Resolvido.

Grato!

at
Laerte