[Resolvido]Urgente! Inserir Registros em tabela sendo o primeiro cheio e outros vazios?

Pelo Topico é dificil explicar, mas o que quero é:
Tenho uma tabela com registros assim:
campo1
Texto1
null
null
null
texto2
null
null
texto3
null
null
null
null
texto4 ...

quero colocar embaixo do texto1 os mesmo texto1, e embaixo do texto2 os mesmo texto2 e asim por diante,
fiz uma variavel global que nem sei se declarei direito e fiz a funçao abaixo, sendo y o campo texto
Function num1(Y)
If Not IsNull(Y) Then
If Y <> n3 Then
n3 = Y
End If
Else
End If
num1 = n3
end function

era pra dar certo mas não dá, quando y é vazio fica vazio, alguem pode ajudar?
Declarei Global n3
mas nao deu certo, como faço para declarar uma variavel que nao perde o valor quando se fecha a funçao, quando reinicia a funça ela continua com o valor, como faz?

Consegui, valeu assim mesmo, era por o campo texto tinha vazios tipo " " ou null
entao nao dava certo, coloquei zeros nos vazios/nulos e deu certo
de qualquer jeito obrigado