COMO SE RECORRE UNA HOJA DE EXCEL PARA ENCONTRAR UNA PALABRA

hola, Yadis !

Mostrar la cita

Estoy creando un formulario para que sea llenado por un usuario y guardo en una hoja de excel
pero no quiero que se repita el nombre... quiero que revise si ya existe... y si existe seguir guardandoa a du derecha.

-> suponiendo que 'el nombre' lo pone el usuario en el TextBox1 del formulario
... y que 'los nombres' estan en la columna 'A' de la hoja activa...
podrias [p.e.] obtener el numero de fila [columna 'A'] donde existe ->la primer coincidencia<- para 'ese nombre'
[no se su pudiera YA haber nombres 'repetidos'] -?-
... o el numero de fila

hola, Yadis ! [perdon... el mensaje anterior 'se me chispotio'] :D

Mostrar la cita

Estoy creando un formulario para que sea llenado por un usuario y guardo en una hoja de excel
pero no quiero que se repita el nombre... quiero que revise si ya existe... y si existe seguir guardandoa a du derecha.

-> suponiendo que 'el nombre' lo pone el usuario en el TextBox1 del formulario
... y que 'los nombres' estan en la columna 'A' de la hoja activa...
podrias [p.e.] obtener el numero de fila [columna 'A'] donde existe ->la primer coincidencia<- para 'ese nombre'
[no se su pudiera YA haber nombres 'repetidos'] -?-
... o el numero de la 'siguiente fila libre'... para agregarlo en la hoja activa ;)

si lo anterior es diferente de lo que necesitas... comentas datos adicionales?
saludos,
hector.
en el modulo de codigo del formulario ==Private Sub CommandButton1_Click()
Dim Fila As Long
If Application.CountIf(Range("a:a"), TextBox1) > 0 Then
Fila = Range("a:a").Find(TextBox1).Row
MsgBox TextBox1 & " ya existe en la fila " & Fila
Else
Fila = Range("a65536").End(xlUp).Offset(1).Row
MsgBox TextBox1 & " sera agregado en la fila " & Fila
End If
End Sub